A_SUBROUTINE:
	CALL	SAVE_CONTEXT
; some work
	CALL	RESTORE_CONTEXT
	RET