Trailing-Edge
-
PDP-10 Archives
-
bb-bt99g-bb
-
cpylib.c13
There are 10 other files named cpylib.c13 in the archive. Click here to see a list.
REP 35/1 ;13C1
CPYEDT==7 ;CURRENT EDIT LEVEL
WIT
CPYEDT==10 ;CURRENT EDIT LEVEL
INS 65/2 ;13C2
;.ENDA
;.ENDV
;.VERSION 12C
;.AUTOPATCH 13
;
;.EDIT 10 Fix extract to insert a line feed in the output file when
;; a form feed is found in the library.
; MJC,24-APR-85,SPR:10-35137
; A:SRC CPYLIB
;
;.ENDA
INS 17/102 ;13C3
MOVEI CH,.CHLFD ;[10]
CAME CH,0(P) ;[10] WAS THE SAVED CH A LINE FEED?
PUSHJ P,PUTOFF ;[10] NO, PUT OUT A LINE FEED
SUM 217000