CLEAR STORAGE 1     ,008015,022026,030037,044,049,053053N000000N00001026                                         1
CLEAR STORAGE 2     L068116,105106,110117B101/I9I#071029C029056B026/B001/0991,001/001117I0?                      2
BOOTSTRAP           ,008015,022029,036040,047054,061068,072/061039              ,0010011040                      3

                          FORTRAN COMPILER -- CONTINUE PHASE -- PHASE 45                                 PAGE    1

 SEQ PG LIN  LABEL  OP    OPERANDS                                            SFX CT  LOCN  INSTRUCTION TYPE  CARD

 101                JOB   FORTRAN COMPILER -- CONTINUE PHASE -- PHASE 45
 102                CTL   6611
 103         *
 104         * NO OBJECT-TIME INSTRUCTIONS ARE GENERATED FOR THESE
 105         * STATEMENTS.  THIS PHASE PASSES INFORMATION REQUIRED BY
 106         * THE RESORT PHASES OF THE COMPILER.
 107         *
 108         X1     EQU   89                                                          0089
 109         X3     EQU   99                                                          0099
 110         *
 111         * STUFF IN THE RESIDENT AREA
 112         *
 113         PHASID EQU   110  PHASE ID, FOR SNAPSHOT DUMPS                           0110
 114         GLOBER EQU   184  GLOBAL ERROR FLAG -- WM MEANS ERROR                    0184
 115         SNAPSH EQU   333  CORE DUMP SNAPSHOT                                     0333
 116         LOADNX EQU   700  LOAD NEXT OVERLAY                                      0700
 117         CLEARL EQU   707  CS AT START OF OVERLAY LOADER                          0707
 118         *
 119                ORG   838                                                                0838
 120         LOADDD EQU   *&1          LOAD ADDRESS                                   0838
 121    838  BEGINN BCE   DONE,0&X1,                                               8  0838  B 861 0|0            4
 122    846         MCW   0&X1,CODSEQ                                              7  0846  M 0|0 925            4
 123    853         BCE   CONT,CODSEQ-3,C  CONTINUE STATEMENT?                     8  0853  B 884 922 C          4
 124    861  DONE   BSS   SNAPSH,C                                                 5  0861  B 333 C              4
 125    866         SBR   CLEARL&3,GMWM                                            7  0866  H 710 931            4
 126    873         LCA   DOMSK,PHASID                                             7  0873  L 930 110            5
 127    880         B     LOADNX                                                   4  0880  B 700                5
 128    884  CONT   LCA   0&X1,0&X3                                                7  0884  L 0|0 0?0            5
 129    891         SAR   X1                                                       4  0891  Q 089                5
 130    895         C     0&X3                                                     4  0895  C 0?0                5
 131    899         SAR   X3                                                       4  0899  Q 099                5
 132    903         LCA   1&X1,2&X3  REPLACE STATEMENT CODE BY GMWM                7  0903  L 0|1 0?2            5
 133    910         C     0&X1                                                     4  0910  C 0|0                6
 134    914         SAR   X1                                                       4  0914  Q 089                6
 135    918         B     BEGINN                                                   4  0918  B 838                6
 136         *
 137         * DATA
 138         *
 139    925  CODSEQ DCW   #4                                                       4  0925                       6
 140    930  DOMSK  DCW   @DOMSK@                                                  5  0930                       6
 141    931  GMWM   DCW   @}@                                                      1  0931              GMARK    6
 142                ORG   201                                                                0201
 143    203         DSA   LOADDD    LOAD ADDRESS FOR CARD-TO-TAPE PROGRAM          3  0203  838                  7
 144                EX    BEGINN                                                            B 838                8
 145                END                                                                     / 000 080
                          FORTRAN COMPILER -- CONTINUE PHASE -- PHASE 45                                 PAGE    2

SYMBOL  ADDRESS  SYMBOL  ADDRESS  SYMBOL  ADDRESS  SYMBOL  ADDRESS  SYMBOL  ADDRESS  SYMBOL  ADDRESS  SYMBOL  ADDRESS  

BEGINN    838    CLEARL    707    CODSEQ    925    CONT      884    DOMSK     930    DONE      861    GLOBER    184   
GMWM      931    LOADDD    838    LOADNX    700    PHASID    110    SNAPSH    333    X1         89    X3         99