Enter your search terms Submit search form
	Web pdp-10.trailing-edge.com

	title crhalt - exit for fortran quietly
;
;	This subroutine, when called from a fortran program, will
;	exit from fortran without printing any messages, but will
;	do all the usual fortran cleanup stuff. It uses a special FOROP%
;	call to accomplish this.
;					Kevin Ashley 6 Jul 82
;
	search	vtmac
	regdef
	entry	crhalt			;our name
	external	forop.,exit.	;FOROTS entry points

crhalt:	movei	0,12			;argument for forop - quiet exit
	setz	t1,			;arg val - none
	call	forop.			;go to forots
	call	exit.			;and close out
	ret				;return in case of continue
	end