Google
 

Trailing-Edge - PDP-10 Archives - bb-kl11c-bm_tops20_v6_1_atpch1_16 - autopatch/pat.c15
There are no other files named pat.c15 in the archive.
 INS 1/1	;15C1
	; *** Edit 444 to PAT.MAC by WONG on 24-Jun-86, for SPR #21229 (TCO none)
	; Edit 442 breaks some Cobol and TOPS-10 programs. Delete two lines at
	; UUOPEN:+0
 REP 10/2	;15C2
	.EDIT==443
 WIT
	.EDIT==444	;EDIT NUMBER
 REP 12/27	;15C3
	UUOPEN:	UMOVE C,(A)		;[442] GET FLAGS
		HRRZM C,FLAGWD(BB)	;[442] AND SAVE EM
		UMOVE C,2(A)		;SIXBIT NAME FROM USER
 WIT
	;**;[444]At UUOPEN:+0L delete two lines  JYCW  6/18/86
	UUOPEN:	UMOVE C,2(A)		;SIXBIT NAME FROM USER
 SUM 218703