.TITLE	STOPIT	Abort section of code
	.IDENT	/V01.00/

	;
	; This routine exits back to the routine that called SAVPOS, and
	;	exits back to the previous level
	;
STOPIT::
	MOV	ENV$$$,R5
	JMP	CRET$
	;
ENV$$$::
	.WORD	0
	.END