.LIST	TTM
	.NLIST	SYM
	.TITLE	CRAYZO - YELLOW ZONE STACK VIOLATION
	.IDENT	/V01   /
	.PSECT	CRAYZO

	.MCALL	EXIT$S
;
;	THIS PROGRAM DEMONSTRATES A CRASH CAUSED BY
;	A RED ZONE STACK VIOLATION.
;
;	ASSEMBLY INSTRUCTIONS:
;
;	CRAYZO=EXEMC/ML,RSXMC/PA:1,CRAYZO
;

CRAYZO::
	CALL	$SWSTK,100$	;;;SWITCH TO SYSTEM STATE
	MOV	#0,R0
10$:
	MOV	R0,-(SP)	;;;PUSH INCREASING NUMBERS ON STACK
	INC	R0
	BR	10$
	RETURN			;;;SHOULD NEVER GET THIS FAR
100$:
	EXIT$S
	.END	CRAYZO