head	1.1;
access;
symbols
	rel_1_1:1.1
	rel_1_0:1.1
	rel_0_1_beta:1.1;
locks; strict;
comment	@;; @;


1.1
date	2006.06.05.02.12.19;	author arniml;	state Exp;
branches;
next	;
commitid	3a2e448393024567;


desc
@@


1.1
log
@initial check-in
@
text
@	;; *******************************************************************
	;; $Id$
	;;
	;; Checks interrupt on a sequence of "transfer of control"
	;; instructions.
	;;

	;; the cpu type is defined on asl's command line

	include	"int_macros.inc"

	org	0x00
	clra

	int_flag_clear
	lei	0x02
	jp	int_mark

	org	0x030
int_mark:
	nop
	nop
int_instr:
	jmp	+
+	jp	+
+	jsrp	jsrp_target
	jsr	jsrp_target
	lqid
	nop
ret_instr:
	jmp	+
	org	0x040
+	int_flag_check
	jmp	pass


	org	0x080
jsrp_target:
	ret



	;; *******************************************************************
	;; Interrupt routine
	;;
	org	0x0fd
	jmp	fail
int_routine:
	nop
	save_a_m_c
	int_flag_set
	check_sa	ret_instr
	restore_c_m_a
	ret


	org	0x200
	include	"int_pass_fail.asm"
@