Google
 

Trailing-Edge - PDP-10 Archives - tops10_703_distr_bb-x140b-sb - 10,7/703mon/monend.mac
There are 2 other files named monend.mac in the archive. Click here to see a list.
TITLE	MONEND - THE END OF THE MONITOR NON-ZERO SECTION HIGH SEGMENT

	SEARCH	F,S
	$RELOC
	$HIGH

;THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY ONLY BE USED
;  OR COPIED IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE.
;
.CPYRT<1984,1986>
;COPYRIGHT (c) 1984,1986
;BY DIGITAL EQUIPMENT CORP., MAYNARD, MASS.
;ALL RIGHTS RESERVED.

;THIS MODULE MUST BE LOADED LAST (AFTER ALL NON-ZERO SECTION HIGH
;SEGMENT CODE) AS MONEND IS DEFINED IN THIS MODULE.

	ENTRY	MONEND		;FORCE LOAD IF LIBRARY SEARCH
	MONEND==:.		;END OF NON-ZERO SECTION MONITOR HIGH SEGMENT

IFN FTXMON,<
	$PSECT(SKY)		;INTO SKY HIGH SEGMENT
	ZZ==.-1			;LAST ADDRESS USED IN SKY HIGH SEGMENT
	$LOW			;INTO LOW SEGMENT
SKYEND::EXP	ZZ		;STORE FOR ONCE
>; END IFN FTXMON

	END