Trailing-Edge
-
PDP-10 Archives
-
bb-bt99h-bb
-
algcon.c09
There are 14 other files named algcon.c09 in the archive. Click here to see a list.
REP 3/1 ;09C1
;COPYRIGHT (C) 1975,1982,1983 BY
WIT
;COPYRIGHT (C) 1975,1982,1983,1984 BY
DEL 1/32 ;09C2
REP 4/34 ;09C3
JRST TERMIN ; CANT OPEN, QUIT
LOOKUP 5,CSFILE ; FIND THE FILE IF THERE IS ONE
JRST TERMIN ; FILE CANNOT BE READ
WIT
JRST CCLBAD ;[355] CAN'T, COMPLAIN
LOOKUP 5,CSFILE ; FIND THE FILE IF THERE IS ONE
JRST CCLBAD ;[355] FILE CANNOT BE FOUND
INS 51/34 ;09C4
;Here when CCL started but can't find TMPCOR file. Issue message and exit.
CCLBAD: OUTSTR [ASCIZ/?Cannot find or cannot open TMPCOR file
/] ;[355] ISSUE ERROR
SETZM CSFILE ;[355] NO MORE FILE NAME
JRST QUIT ;[355] FINISH
REP 16/45 ;09C5
ALGOL: ASCIZ /ALGOL: / ;[251]
WIT
ALGOL: ASCIZ /ALGOL: / ;[251]
REP 26/64 ;09C6
OUTSTR [ASCIZ /
? SOURCE STATEMENT TOO LONG /] ; [E025] NO - TELL USER
WIT
OUTSTR [ASCIZ/
?SOURCE STATEMENT TOO LONG
/] ; [E025] NO - TELL USER
REP 61/137 ;09C7
FAIL (84,HARD,NSYM,VARIABLE CANT BE USED HERE)
WIT
FAIL (84,HARD,NSYM,VARIABLE CANNOT BE USED HERE)
REP 4/146 ;09C8
[ASCIZ /EXPRESSION TOO LONG/] ; 83
WIT
[ASCIZ \EXPRESSION TOO LONG, USE /TEMPCODE SWITCH TO INCREASE TEMPCODE SPACE\];[350] 83
SUM 115733