A_SUBROUTINE1:
	CALL	SAVE_CONTEXT
; some doing
	CALL	A_SUBROUTINE2
; some doing
	CALL	RESTORE_CONTEXT
	RET
;
A_SUBROUTINE2:
	CALL	SAVE_CONTEXT
; some doing
	CALL	RESTORE_CONTEXT
	RET