URL https://opencores.org/ocsvn/t400/t400/trunk

Subversion Repositories t400

[/] [t400/] [trunk/] [sw/] [verif/] [int/] [jmp/] [test.asm] - Diff between revs 84 and 87

Rev 84	Rev 87
Line 1...	Line 1...
`;; *******************************************************************`	`;; *******************************************************************`
`;; $Id: test.asm,v 1.2 2006-05-28 13:36:19 arniml Exp $`	`;; $Id: test.asm,v 1.3 2006-05-28 15:28:30 arniml Exp $`
`;;`	`;;`
`;; Checks interrupt on JMP.`	`;; Checks interrupt on JMP.`
`;;`	`;;`

`;; the cpu type is defined on asl's command line`	`;; the cpu type is defined on asl's command line`
Line 9...	Line 9...
`include "int_macros.inc"`	`include "int_macros.inc"`

`org 0x00`	`org 0x00`
`clra`	`clra`

	`int_flag_clear`
`lei 0x02`	`lei 0x02`
`jp int_mark`	`jp int_mark`

`org 0x030`	`org 0x030`
`int_mark:`	`int_mark:`
Line 25...	Line 26...
`org 0x03d`	`org 0x03d`
`jmp fail`	`jmp fail`
`org 0x03f`	`org 0x03f`
`+ aisc 0xf`	`+ aisc 0xf`
`ret_instr:`	`ret_instr:`
	`int_flag_check`
`jmp pass`	`jmp pass`


`org 0x0fd`	`org 0x0fd`
`jmp fail`	`jmp fail`
`int_routine:`	`int_routine:`
`nop`	`nop`
`save_a_m_c`	`save_a_m_c`
	`int_flag_set`
`check_sa ret_instr`	`check_sa ret_instr`
`restore_c_m_a`	`restore_c_m_a`
`ret`	`ret`