Google
 

Trailing-Edge - PDP-10 Archives - de-10-omona-v-mc9 - patch.mac
There are 11 other files named patch.mac in the archive. Click here to see a list.
TITLE	PATCH - PATCH AREA FOR T.S. MONITOR



;THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY ONLY BE USED
;  OR COPIED IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE.
;
;COPYRIGHT (C) 1976,1977,1978 BY DIGITAL EQUIPMENT CORP., MAYNARD, MASS.
SUBTTL	A. FRANZ/RAP  TS3.19  4 JAN 72  V003
	SEARCH	F,S

	$RELOC
	$LOW
;THIS PROGRAM SHOULD BE LOADED AFTER LAST NEEDED PROGRAM
;BUT BEFORE EXEC DDT, AND ONCE

ENTRY PATCH
INTERN PAT,PATEND
PATCH:	BLOCK 300
PAT=PATCH+10	;DEFINE PAT OFFSET SOME SO WE
		;  HAVE SOME ROOM FOR POKE. UUO
PATEND=.-1	;DEFINE LAST LOC. IN PATCH AREA AS A WARNING AND FOR FILDDT

;SET JOBDDT NON-ZERO SO SYMBOLS WILL BE SAVED.

ZZ=.
LOC 74
	EXP 401
RELOC ZZ

	END