Trailing-Edge
-
PDP-10 Archives
-
bb-kl11c-bm_tops20_v6_1_atpch1_16
-
autopatch/lptspl.c12
There are 2 other files named lptspl.c12 in the archive. Click here to see a list.
REP 8/2 ;12C1
LPTMAN==:3117 ;Maintenance edit number
WIT
LPTMAN==:3132 ;Maintenance edit number
REP 87/4 ;12C2
WIT
***** Release 5.0 -- begin maintenance edits *****
3130 Increment maintenance edit level for version 5 of GALAXY.
3131 5.1226 16-Oct-85
Reset the EOL counter (J$PRNT) for each file in a print job
3132 5.1227 17-Oct-85
Reset the forms characteristics when a request is aborted
INS 7/31 ;12C3
;**;[3131]Add 2 lines at NXTFIL:+2L JCR 10/16/85
MOVE S1,J$WITH(J) ;[3131]Get the EOL counter value
MOVEM S1,J$PRNT(J) ;[3131]Reset the EOL counter
INS 56/71 ;12C4
;**;[3132]At FORM.7:+2L insert 1 line JYCW 10/17/85
PUSHJ P,FRMINI ;[3132]Reset the forms characteristics
REP 10/72 ;12C5
FRMI1B: GETLIM T2,.EQLIM(J),FORM ;GET FORMS
CAMN T1,T2 ;MATCH??
WIT
;**;[3132]At FRMI1B: replace 2 lines with 1 JYCW 10/17/85
FRMI1B: CAMN T1,J$FORM(J) ;[3132]Match against currect forms type
SUM 236318