Program Logic Manual - All about the IBM 1130 Computing System

More documents

Recommendations

Info

Source CodingObject CodingObject CodingWith TraceIF (A) 111,100,113 LIBF FLD100 CONTINUE DC ALD 3 +126LIBF SFIFBSC L ADR1,+ZBSC L ADR2, -ZADR1 (coding generated from statement 111)ADR2 (coding generated from statement 113)IF (A+I) 100,111,100 LD L I100 CONTINUE LIBF FLOATLIBF FADDDC ALD 3 +126LIBF SFIFBSC L ADR1,+-ADR1 (coding generated from statement 111)IF (I) 111,111,112LD L IBSC L ADR1,+BSC L ADR2, -ZLIBF SIIFBSC L ADR1,+BSC L ADR2, -ZADR1 (coding generated from statement 111)ADR2 (coding generated from statement 112)PAUSE StatementPAUSE 11LIBF PAUSEDC ADR1ADR1 DC /11STOP StatementSTOP 21LIBF STOPDC ADR1ADR1 DC /21Appendix A. Examples of FORTRAN Object Coding 317
Source CodingObject CodingRETURN Statementsfor (REAL) FUNCTION subprogram LIBF FLDwhere the subprogram name is COMP DC COMPBSC I address of subprogram linkword in transfer vectorfor (INTEGER) FUNCTION subprogram LD L ICOMPwhere the subprogram name is ICOMP BSC I address of subprogram linkword in transfer vectorfor SUBROUTINE subprogram BSC I address of subprogram linkword in transfer vectorEND StatementThe END statement produces no object coding.I/O Initialization CallsThe following coding for the initialization of the FORTRAN I/O subroutines at execution time is generated and inserted into the programby the compiler.LIBF UFIO ,(see Note 2)DC /000XLIEF SDFIC (see Note 3)DC /000XLIBF MO (see Note 4)DC /00YXDC /0016LIBF TYPEZ or LIBF WRTYZ (see Note 5)DC 0LIBF CARDZ (see Note 6)DC 0LIEF PRNTZDC 0LIBF PAPTZDC 0LIBF PRNZDC 0LIBF TYPEZ (see Note 5)DC 0LIEF WCHRIDC 0LIBF READ ZDC 0LIEF PNCHZ (see Note 6)DC 0LIBF F1,13 (or ELD)LIBF FSTO (or ESTO)318
Page 1 and 2:
File Number 1130-36Form Y-26-3714-2
Page 3 and 4:
CONTENTSSECTION 1. INTRODUCTION 1 S
Page 5:
IntroductionProgram Analysis Proced
Page 8 and 9:
SUP05„ Supervisor, XEQ Processing
Page 10 and 11:
to be fetched as a result.Phase 2 o
Page 12 and 13:
Table 1. The Contents of COMMALABEL
Page 14 and 15:
"Table 1 . The Contents of COMMA (C
Page 16 and 17:
Table 2. The Contents of DCOM (Conc
Page 18 and 19:
Likewise, information acquired by P
Page 20 and 21:
1Subphase 2Subphase 2 contains the
Page 22 and 23:
prior to performing any disk operat
Page 24 and 25:
Cold StartLoaderResidentImageParame
Page 26 and 27:
Page Blank In Original
Page 28 and 29:
Page 30 and 31:
lank (the mainline is in Working St
Page 32 and 33:
Page 34 and 35:
Page 36 and 37:
Page 38 and 39:
0 0 0 0COMMA, COMMA, COMMA, COMMA,S
Page 41 and 42:
SECTION 8. CORE LOAD BUILDERFLOWCHA
Page 43 and 44:
core load is executed) below locati
Page 45 and 46:
LOCALs AND SOCALsIf during the firs
Page 47 and 48:
LOWCORE./‘. BSC L I FL210 I BSS 1
Page 49 and 50:
SubroutineMC000RL000FunctionMaster
Page 51 and 52:
PHASE 6Phase 6 performs several mis
Page 53 and 54:
DUP CONTROL RECORDSIn the table bel
Page 55 and 56:
LocationPIHDRSIHDRPTHDRCIHDRPhase N
Page 57 and 58:
specified on the DUP control record
Page 59 and 60:
the disk area reserved for DUP phas
Page 61 and 62:
DCTL SubroutinesThese subroutines m
Page 63 and 64:
SNOFF SubroutineFixed Area is the b
Page 65 and 66:
XW000This subroutine places the dat
Page 67 and 68:
IITo delete the FORTRAN Compiler, t
Page 69 and 70:
If // or * is found in column 1, th
Page 71 and 72:
PRECIThis phase is read into core s
Page 73 and 74:
Subroutine in execution Contents of
Page 75 and 76:
phase. When the overlay phase compl
Page 77 and 78:
PHASE 2Phase 2 handles the processi
Page 79 and 80:
SCANThe SCAN subroutine collects th
Page 81 and 82:
Figure 14, panel 3 shows the layout
Page 83 and 84:
PhaseNumber Phase NameFunctionPhase
Page 85 and 86:
0 0 0 0 0 0 0 0COMMA,SkeletonSuperv
Page 87 and 88:
If at any time during the compilati
Page 89 and 90:
Dimension Information Array Name75
Page 91 and 92:
calls the System Core Dump program
Page 93 and 94:
Pass 1 of phase 4 examines all COMM
Page 95 and 96:
phase 16, when an arithmetic operat
Page 97 and 98:
Phase 11 then calculates the subscr
Page 99 and 100:
A DO Table entry is made for each D
Page 101 and 102:
associated string and performs the
Page 103 and 104:
All calls to these subprograms are
Page 105 and 106:
Errors DetectedThere are no errors
Page 108 and 109:
SECTION 12. SYSTEM LIBRARYFLOWCHART
Page 110 and 111:
Function Name(s) Type Subtype Refer
Page 112 and 113:
Page 114 and 115:
Page 116 and 117:
If (1) cylinder zero is defective,
Page 118 and 119:
1130 Disk Data File Conversion Prog
Page 120 and 121:
into a 31 word work area which has
Page 122 and 123:
Acknowledge and Receive. If the ope
Page 124 and 125:
Write Response (Transmit). If the t
Page 126 and 127:
ead response routine to handle the
Page 128 and 129:
Normal EBCDIC text. This interrupt
Page 130 and 131:
Notes. FIRST is set non-zero during
Page 132 and 133:
Notes. During call processing SYN5
Page 134 and 135:
switches and storage locations requ
Page 136 and 137:
Settings.Negative = EOTZero = Block
Page 139 and 140:
SECTION 14. STAND-ALONE UTILITIESDI
Page 141 and 142:
PROGRAM ANALYSIS PROCEDURESINTRODUC
Page 143 and 144:
SUBROUTINE ERROR NUMBER/ERROR STOPL
Page 145 and 146:
•Table 8. Error Number List (Cont
Page 147 and 148:
COMMA,SkeletonSupervisorCOMMA,Skele
Page 149 and 150:
Assumes CoreLocation Procedureshave
Page 151 and 152:
StepProcedureContinue nowhaving the
Page 153 and 154:
SUBROUTINE DATA CHARTSSYSTEM DEVICE
Page 155 and 156:
Register status:MainlineSaved at/re
Page 157 and 158:
Significant variables:Symbolic loca
Page 159 and 160:
Page 161 and 162:
Page 163 and 164:
Page 165 and 166:
Page 167 and 168:
Page 169 and 170:
Page 171 and 172:
Page 173 and 174:
TYPE ZFlowchart: F1012Used by: SFIO
Page 175 and 176:
PRNZFlowchart: FI010Used by: SFIOSu
Page 177 and 178:
Page 179 and 180:
Page 181 and 182:
Page 183 and 184:
Register status:MainlineSaved at/re
Page 185 and 186:
READ1Used by: Assembler Language pr
Page 187 and 188:
Page 189 and 190:
Page 191 and 192:
Page 193 and 194:
Register status:ACC EXT XR1 XR2 XR3
Page 195 and 196:
Page 197 and 198:
Page 199 and 200:
Page 201 and 202:
Page 203 and 204:
Register status:ACC EXT XR1 XR2 XR3
Page 205 and 206:
DISK1Used by: Monitor system progra
Page 207 and 208:
Page 209 and 210:
Postoperative conditions and entry
Page 211:
Significant variables: (Continued)S
Page 214 and 215:
mom texauao ularAS • TO •LkS 2.
Page 216 and 217:
MAINS• ENTER FROM• PHASE 1•SE
Page 218 and 219:
•.4ISLA11.41.0..005•• • •
Page 220 and 221:
••••10•ENTER FROM COLD.
Page 222 and 223:
****A1**********ENTER FROM CORE** I
Page 224 and 225:
J P300****A1**********ENTRY FROM Su
Page 226 and 227:
****AI*ENTER HF.E F.OM♦* PHASE 3
Page 228 and 229:
***** *Sim*000* 5 * * 008*%al* * A2
Page 230 and 231:
.•.•••▪NNA L FRM CORE.•
Page 232 and 233:
• A4 :...CM000CM11;... A4114**Al
Page 234 and 235:
SOZ sixelpAAINAnoTvezifemul gaaprin
Page 236 and 237:
• •• Ah •• •CCATiiA4...
Page 238 and 239:
•003•• Al•• ••iSTOREA
Page 240 and 241:
..*006 *.Al.•006•. A2• •
Page 242 and 243:
E T z siautromoiacuninact umi2oad A
Page 244 and 245:
• D Al•••DUMPLET*A/• EXEC
Page 246 and 247:
DEFINE0 *****1000* ******0*****ENTE
Page 248 and 249:
•014.• Al.• •PRECI*rnA•EN
Page 250 and 251:
A l•ENTER FROM MCRA•B145TAIVral
Page 252 and 253:
• ENTER FROM •• PHASE 1 •
Page 254 and 255:
•RHAN4 ;FLIPPER•• •x81•
Page 256 and 257:
.-706 FROM •• PHASE 3 ••
Page 258 and 259:
• ENTER FROM •• PHASE 9 •
Page 260 and 261:
.1/1E11/2 *PHA S 7 FLIPPER:BI•RES
Page 262 and 263:
•• ENTER FROM •• PHASE 9
Page 264 and 265:
LDLBL Al• CONVERT LABEL •• TO
Page 266 and 267:
DTHORAlCOMPUTE OSFBLOCK MORDCOUNT%I
Page 268 and 269:
INT2AlFETCH DISKBUFFERADDRESSESBI
Page 270 and 271:
EM0001•FETCH •APPROPRIATE •ER
Page 272 and 273:
AlSAV5014yEAREAX81 82•"• INITIA
Page 274 and 275:
• •• A4 •• •XF0000 F150
Page 276 and 277:
STARTST1CKRLAl•"INITIALIZE PASSON
Page 278 and 279:
•OOP•%AI*•NXTPOAlINIUNZE•
Page 280 and 281:
•008.• AI.• •BEGIN1A• •
Page 282 and 283:
Esz SDIETT0AA0T3L asvtid (aaudutop
Page 284 and 285:
SSZ sprIpmoid6 asviTcl gaalPlum0 NV
Page 286 and 287:
• A3 ••• • •STARTAlINIT
Page 288 and 289:
STARTAl••• INITIALIZE TO •*
Page 290 and 291:
XSTARTAlA4•• I NIT I ALIZESUBSC
Page 292 and 293:
ENEAlINITIALIZE PHASE • ••STA
Page 294 and 295:
6T as'otici ‘aaudurop NV/U.1103
Page 296 and 297:
ENTAl• MOVE STRINGNEXT TO SYRT8L.
Page 298 and 299:
••ENT 12012Al A2 ..• ••IN
Page 300 and 301:
ENTAlINITIALIZEPHASE• B/ •.X.
Page 302 and 303:
RC000A2:REVAIHLPHISE•B2• LOAD S
Page 304 and 305:
FSLEN•Al:FSICUEStitiCeDD•SYSTEM
Page 306 and 307:
DISCAl•CALIO •• ••READ ID
Page 308 and 309:
IDENTAl•CALPR 007A1•.----------
Page 310 and 311:
swIrommaAc103 tAreaqn tuaiskS • 8
Page 312 and 313:
EEZ sUrqamoil.LaIsa (Areaqm uia4sA5
Page 314 and 315:
.012•• Al.• •M0530•%Al•
Page 316 and 317:
*****. YES *010.Er000 .FC015 * 02**
Page 318 and 319:
.0/2** A3** *)7(*****A3***********C
Page 320 and 321:
ICNVT****A1*** ***** *ENTER I - * C
Page 322 and 323:
INSRT .4. .4.Al *. 44 *. *****As **
Page 324 and 325:
INT2 ..*A1***** *******• SENSE &
Page 326 and 327:
XMTNTAt .. *.4:00* ******** .1,1. *
Page 328 and 329:
SCAT3 s****A1************SAVE RUGS.
Page 330 and 331:
%.• • * • **▪ 208* *0013*AL
Page 332 and 333:
SEAL...•.A1ENTRYARK)•• ENTRY
Page 334 and 335:
•003*• A/o• •.0*.*•003•
Page 336 and 337: ..Al....A; .... ao•• COLUMN •
Page 338 and 339: RAPT!..•.AI+ENTRY VIA LIEF• PAP
Page 340 and 341: • A2 •12300 X 12100 72400••
Page 342 and 343: PACES PNCHZ P2080••••Al ...
Page 344 and 345: HOLE/'ENTRY VIA LEAF •HOLEZ•
Page 346 and 347: Z'90£ •OHDNdBacirl tualsAS 'S TO
Page 348 and 349: ******504*• Al.*****A1***•**•
Page 350 and 351: as*** **•• *555 *****0065 *006*
Page 352 and 353: **•**anon*41** *****•*.4 4 * 4.
Page 354 and 355: **AI******** BRANCH TO** INTERRuPT
Page 356 and 357: **•* ****• * r *• 143 5 * A4
Page 358 and 359: *5****0/4** B,** * **014** 84** *01
Page 360 and 361: **•**• A4 B...* ***** XX.*.A? *
Page 362 and 363: ST .90E•OCILIVD 'Axemui tualsAs '
Page 364 and 365: XA l *. *.* *.NO . READ .....**. RE
Page 366 and 367: ZZ '90E •TUHYD 1 .A.re/qci utalsA
Page 368 and 369: '90E•oavau `icluacin tua 3sAs 'LE
Page 370 and 371: pLOTI****A/********* •*ENTER VIA
Page 372 and 373: 8Z '90£LT,Old `Ireami tualsAs TtOL
Page 374 and 375: 0X.*.2*•A5 *.•.* LAST 5.REMOVE
Page 376 and 377: APPENDIX A. EXAMPLES OF FORTRAN OBJ
Page 378 and 379: Object CodingSource Coding Object C
Page 382 and 383: Source CodingObject CodingObject Co
Page 388 and 389: Source CodingObject CodingNon-Disk
Page 390 and 391: Source CodingObject CodingWRITE (2'
Page 392 and 393: APPENDIX B. LISTINGSThis appendix c
Page 394 and 395: ADOR REL OBJECT ST.NO. LABEL OPCD F
Page 396 and 397: ADDR RFL OBJECT ST.NO. LABEL OPCD F
Page 398 and 399: ADOR REL OBJECT ST.NO. LABEL OPCD F
Page 400 and 401: ADDR REL OBJECT ST.NO. LABEL OPCD F
Page 404 and 405: AMA REL OBJECT ST.NO. LABEL OPCD FT
Page 408 and 409: SYMROL VALUE REL DEFN REFERENCESSSC
Page 410 and 411: APPENDIX C. ABBREVIATIONSBelow is a
Page 412 and 413: Abbreviation Meaning Abbreviation M
Page 414: Abbreviation Meaning Abbreviation M
Page 417 and 418: Disk Monitor Microfiche Disk Monito
Page 419 and 420: Disk Monitor Microfiche Disk Monito
Page 421 and 422: cters respectively.CSP D1 FORMAT:CS
Page 423 and 424: APPENDIX G: FIELD TYPE COMPRESSIONS
Page 425 and 426: Disk I/O subroutineResident monitor
Page 427 and 428: Arithmetic and function subroutines
Page 429 and 430: READER'S COMMENT FORMIBM 1130 Disk
show all

Program Logic Manual - All about the IBM 1130 Computing System

You also want an ePaper? Increase the reach of your titles

Delete template?

Save as template?