Trailing-Edge
-
PDP-10 Archives
-
bb-bt99g-bb
-
ufdset.c08
There is 1 other file named ufdset.c08 in the archive. Click here to see a list.
REP 2/1 ;08C1
SUBTTL D. Mastrovito /DPM 7-Feb-84
WIT
SUBTTL D. Mastrovito /DPM 26-Mar-84
REP 38/1 ;08C2
UFDEDT==35 ;EDIT LEVEL
WIT
UFDEDT==36 ;EDIT LEVEL
INS 92/2 ;08C3
;
; 36 Avoid RENAME error 26 by renaming the UFD before defining the
; search list which could set the structure status to NOWRITE.
REP 18/8 ;08C4
PUSHJ P,DEFJSL ;DEFINE THE NEW JOB SEARCH LIST
PUSHJ P,RENUFD ;RENAME THE UFD
WIT
PUSHJ P,RENUFD ;RENAME THE UFD
PUSHJ P,DEFJSL ;DEFINE THE NEW JOB SEARCH LIST
SUM 71309