Trailing-Edge
-
PDP-10 Archives
-
BB-L014E-BM
-
autopatch/cobolb.c04
There are no other files named cobolb.c04 in the archive.
REP 23/1 ;04C1
WIT
;DMN 19-JAN-82 [1332] Fix PROGRAM COLLATING SEQUENCE not to advance
; too far
;JEH 01-JAN-82 [1330] Warning for invalid memory size
;JEH 17-DEC-81 [1325] SHUT OFF DCCFLG SO SOURCE NOT LOST W/ DATE-COMPILED COMMENT
INS 48/4 ;04C2
IFN ANS74 < ;[1325]
SETZM DCCFLG ;[1325] OUT OF DATE-COMPILED STATEMENT
>; ANS74 ;[1325]
INS 9/12 ;04C3
CAILE TB,777777 ;[1330] MAX SIZE IN WORDS = 777777
JRST [HRRZS TB ;[1330]
CAIE TB,0 ;[1330] GREATER THAN 262,144 WORDS?
EWARNW E.652 ;[1330] YES - WARNING
HRRZI TB,777777 ;[1330] SET TO MAX
JRST .+1] ;[1330]
REP 21/48 ;04C4
JRST IA0.G ;GET NEXT WORD
WIT
POPJ PP, ;[1332]
SUM 157134