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

Subversion Repositories t400

[/] [t400/] [tags/] [rel_1_1/] [sw/] [verif/] [int/] [jmp/] [test.asm] - Blame information for rev 84

Go to most recent revision | Details | Compare with Previous | View Log


        ;; *******************************************************************
        ;; $Id: test.asm,v 1.2 2006-05-28 13:36:19 arniml Exp $
        ;;
        ;; Checks interrupt on JMP.
        ;;
 
        ;; the cpu type is defined on asl's command line
 
        include "int_macros.inc"
 
        org     0x00
        clra
 
        lei     0x02
        jp      int_mark
 
        org     0x030
int_mark:
        nop
        nop
int_instr:
        jmp     +
 
 
        org     0x03d
        jmp     fail
        org     0x03f
+       aisc    0xf
ret_instr:
        jmp     pass
 
 
        org     0x0fd
        jmp     fail
int_routine:
        nop
        save_a_m_c
        check_sa        ret_instr
        restore_c_m_a
        ret
 
 
        org     0x200
        include "int_pass_fail.asm"

Line No.	Rev	Author	Line
1	75	arniml	`;; *******************************************************************`
2	84	arniml	`;; $Id: test.asm,v 1.2 2006-05-28 13:36:19 arniml Exp $`
3	75	arniml	`;;`
4			`;; Checks interrupt on JMP.`
5			`;;`
6
7			`;; the cpu type is defined on asl's command line`
8
9			`include "int_macros.inc"`
10
11			`org 0x00`
12			`clra`
13
14			`lei 0x02`
15			`jp int_mark`
16
17			`org 0x030`
18			`int_mark:`
19			`nop`
20			`nop`
21			`int_instr:`
22			`jmp +`
23
24
25			`org 0x03d`
26			`jmp fail`
27			`org 0x03f`
28			`+ aisc 0xf`
29			`ret_instr:`
30			`jmp pass`
31
32
33			`org 0x0fd`
34			`jmp fail`
35			`int_routine:`
36			`nop`
37	84	arniml	`save_a_m_c`
38	75	arniml	`check_sa ret_instr`
39	84	arniml	`restore_c_m_a`
40	75	arniml	`ret`
41
42
43			`org 0x200`
44			`include "int_pass_fail.asm"`

Browse

Tools

Subversion Repositories t400

[/] [t400/] [tags/] [rel_1_1/] [sw/] [verif/] [int/] [jmp/] [test.asm] - Blame information for rev 84