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

Subversion Repositories t400

[/] [t400/] [trunk/] [sw/] [verif/] [include/] [int_pass_fail.asm] - Blame information for rev 179

Details | Compare with Previous | View Log

Line No. Rev Author Line
1 63 arniml 
        ;; *******************************************************************
2 179 arniml 
        ;; $Id: int_pass_fail.asm 179 2009-04-01 19:48:38Z arniml $
3 63 arniml 
        ;;
4 
        ;; Provides pass/fail signalling via port D for interrupt tests.
5 
        ;;
6 
        ;; Signalling on D:
7 
        ;;   0x1
8 
        ;;   0x2
9 
        ;;   0x4
10 
        ;;   0x8
11 
        ;;    0xf -> pass
12 
        ;;    0x0 -> fail
13 
        ;;
14 
 
15 
        ;; catch spurious code execution
16 
        jmp     fail
17 
 
18 
PROLOGUE        MACRO
19 
        ;; output 0x1 on D
20 
        clra
21 
        aisc    0x1
22 
        cab
23 
        obd
24 
        ;; output 0x2 on D
25 
        aisc    0x1
26 
        cab
27 
        obd
28 
        ;; output 0x4 on D
29 
        aisc    0x2
30 
        cab
31 
        obd
32 
        ;; output 0x8 on D
33 
        aisc    0x4
34 
        cab
35 
        obd
36 
        ENDM
37 
 
38 
 
39 
pass:
40 
        PROLOGUE
41 
        ;; output 0xf to D
42 
        aisc    0x7
43 
        cab
44 
        obd
45 
        jp      .
46 
 
47 
fail:
48 
        PROLOGUE
49 
        ;; output 0x0 to D
50 
        clra
51 
        cab
52 
        obd
53 
        jp      .

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.