Google
 

Trailing-Edge - PDP-10 Archives - decus_20tap4_198111 - decus/20-0125/monret.mac
There are 2 other files named monret.mac in the archive. Click here to see a list.
	TITLE	MONRET
	;
	; THIS IS A FORTRAN CALLABLE SUBROUTINE TO
	; RETURN TO MONITOR WITHOUT FORTRAN'S EXIT
	; MESSAGE
	;
	ENTRY	MONRET
	;
L=16
P=17
MONRET:	SKIPA			; FORTRAN-10 AND
	PUSH	P,L		; F40 COMPATIBLE
	EXIT	1,		; RETURN TO MONITOR
	POPJ	P,		; ALLOW CONTINUES ETC.
	END