Return to main page

Assembly Listings for the IBM 1401 FORTRAN II phases

Fortran-v3m0-listing

courtesy of Van Snyder :-))
"The attached zip file Mokotoff.zip is a transcription of Gary's listings, for V3M0"
the program number is 1401-FO-050

lib-2-l.snapshot LIBRARY -- SNAPSHOT ROUTINE
lib-2-2.monitor
lib-2-3.aritf ARITHMETIC INTERPRETER
lib-2-4 FORTRAN COMPILER -- SENTINEL AFTER FIXED LIBRARY
phase-0-2.1 SNAPSHOT, SYSTEM MONITOR, AND LOADER PHASE
phase-0-2.1_alt SNAPSHOT, SYSTEM MONITOR, AND LOADER PHASE
phase-3.2 SCANNER PHASE: INSERT STATEMENT NUMBERS (NOT LABELS)
phase-4.3 SORT ONE PHASE: DETERMINE WHETHER THERE IS SUFFICIENT ROOM
phase-5.4 SORT TWO PHASE: ADD THREE CHARACTERS TO EACH STATEMENT AND
phase-6.5 SORT THREE PHASE: SORT STATEMENTS BY TYPE, SHIFT TO LOW
phase-7.6 REPLACE THE COLON (5-8) THAT SEPARATES EACH STATEMENT FROM
phase-8.7 REMOVE STATEMENT KEYWORDS
phase-9.8 A TABLE OF ARRAYS IS GENERATED AT THE END OF STORAGE.
phase-10.9 ASSURE ALL ARRAYS PRESENT IN EQUIVALENCE STATEMENTS ARE
phase-11.10 THE DIMENSION TABLE IS ALTERED TO SHOW THE RELATIONSHIP
phase-12.11 ON ENTRY, X3 IS ONE BELOW THE GROUP MARK BELOW THE BOTTOM OF
phase-13.12 THE SOURCE PROGRAM IS SCANNED FOR VARIABLES. SIMPLE
phase-14.13 THE ENTIRE PROGRAM IS SHIFTED TO THE TOP (LEFTMOST PART) OF
phase-15.14 THIS PHASE DOES HOUSEKEEPING FOR VARIABLES PHASE 4
phase-16.15 THE COMPILER FIRST SCANS INPUT-OUTPUT LISTS AND THE LEFT
phase-17.16 A CHECK IS MADE FOR UNREFERENCED VARIABLES
phase-18.17 CONSTANTS IN THE SOURCE PROGRAM ARE NOTED AND NORMALIZED
phase-19.18 SAME AS VARIABLES PHASE TWO. THE TABLE OF SIMPLE VARIABLES
phase-20.19 CONSTANTS ARE PLACED IN THEIR OBJECT-TIME LOCATIONS AT THE
phase-21.20 SUBSCRIPTS WHICH MUST BE COMPUTED AT OBJECT TIME ARE REDUCED
phase-22.21 ALL STATEMENT NUMBERS THAT APPEAR IN THE PROGRAM ARE REDUCED
phase-23.22 FORMAT STATEMENTS ARE CHECKED TO INSURE THAT THEY ARE
phase-24.23 THE OBJECT-TIME FORMAT STRINGS ARE DEVELOPED AND STORED
phase-25.24 DUPLICATE LISTS ARE CHECKED AND ELIMINATED TO OPTIMIZE
phase-26.25 THE OBJECT-TIME LIST STRINGS ARE DEVELOPED AND STORED
phase-27.26 EACH INPUT-OUTPUT STATEMENT IS REDUCED TO THE ADDRESS OF
phase-28.27 THE ENTIRE SOURCE PROGRAM IS SHIFTED TO THE TOP (LEFTMOST
phase-29.28 THE THREE-CHARACTER EQUIVALENTS OF STATEMENT NUMBERS
phase-30.29 THE THREE-CHARACTER EQUIVALENTS OF STATEMENT NUMBERS WHICH
phase-31.30 UNDEFINED STATEMENT NUMBERS ARE NOTED.
phase-32.31 THE LINKAGE TO THE OBJECT FORMAT ROUTINE FROM THE INPUT-OUTPUT
phase-33.32 THIS IS A HOUSEKEEPING PHASE. THE UNARY MINUS (NEGATE) AND
phase-34.33 ALL ARITHMETIC AND IF STATEMENTS ARE UNNESTED USING A
phase-35.34 INITIALIZATION FOR ARITH PHASE FOUR TAKES PLACE.
phase-36.35 STRINGS GENERATED BY ARITH PHASE TWO ARE OPTIMIZED TO REDUCE
phase-37.36 IF STATEMENT EXITS AND STRINGS FOR EXPONENTIATION ARE CREATED.
phase-38.37 OPTIMIZATION OF TEMPORARY STORAGE AREAS TAKES PLACE.
phase-39.38 IN-LINE INSTRUCTIONS ARE GENERATED FOR EXECUTING END FILE,
phase-40.39 STATEMENTS WITH TWO TO TEN EXITS GENERATE IN-LINE INSTRUCTIONS.
phase-41.40 AN UNCONDITIONAL BRANCH INSTRUCTION IS GENERATED IN-LINE
phase-42.41 THE PROPER INSTRUCTIONS TO 1. HALT, 2. HALT, CONTINUE,
phase-43.42 IN-LINE INSTRUCTIONS ARE GENERATED.
phase-44.43 IN-LINE INSTRUCTIONS ARE GENERATED FOR IF ( SENSE SWITCH I )
phase-45.44 NO OBJECT-TIME INSTRUCTIONS ARE GENERATED FOR THESE
phase-46.45 STRINGS OF UNCONDITIONAL BRANCH INSTRUCTIONS AND PARAMETERS
phase-47.46 AN AREA IS MADE AVAILABLE FOR A TABLE TO ASSIST IN RESORTING
phase-48.47 THE RESORT TABLE IS FILLED WITH THE CURRENT LOCATION
phase-49.48 THE SOURCE PROGRAM IS RESORTED BACK TO ITS ORIGINAL ORDER.
phase-50A.49 THE STATEMENTS ARE RELOCATED TO THE POSITIONS THEY WILL OCCUPY
phase-50B.50 CONSTANTS, FORMATS AND LIST STRINGS ARE MOVED INTO THEIR
phase-51.51 OBJECT-TIME INSTRUCTIONS WHICH REFERENCE STATEMENT NUMBERS
phase-52A.52 AS THE OBJECT CODING MAY ORIGINATE AT 1697, THE CODING FOR
phase-52BC.53.54 RELOCATABLE FUNCTION ROUTINES AND SUBROUTINES ARE LOADED.
phase-53R.242 THE SNAPSHOT CODING WHICH WAS REPLACED BY 52B IS RETAINED.
phase-53S.243 SAME AS SNAPSHOT IN PHASE 00
phase-54A.244 THIS PHASE SELECTS THE PROPER I/O ROUTINE AND LOADS IT INTO
phase-54B.245 LIMITED I/O ROUTINE -- NO FORMATTING
phase-54CD.246.247 NORMAL FORMAT ROUTINE
phase-55.248 ADDRESS OF THE FIXED- AND FLOATING-WORD WORK-AREAS ARE
phase-56.249 A SNAPSHOT OF THE GENERATED PROGRAM IS PRINTED IF REQUESTED
phase-57.250 WHEN REQUESTED (IF THERE ARE NO INPUT ERRORS), THE COMILER
phase-58.251 THIS PHASE PUNCHES CARDS THAT WILL INITIALIZE THE INDEX
phase-60.311 STUFF IN THE RESIDENT AREA
phase-61.312 THIS PHASE PRINTS THE END OF COMPILATION MESSAGE, INITIALIZES
phase-62.314 THE ARITHMETIC ROUTINE IS LOIADED. COMMUNICATION IS
phase-63.315 THIS PHASE IS COMPRISED OF THE ARITHMETIC ROUTINE WHICH IS