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

Subversion Repositories t400

[/] [t400/] [trunk/] [sw/] [verif/] [black_box/] [rmb_smb/] [test.asm] - Blame information for rev 179

Details | Compare with Previous | View Log


        ;; *******************************************************************
        ;; $Id: test.asm 179 2009-04-01 19:48:38Z arniml $
        ;;
        ;; Checks the RMB and SMB instructions.
        ;; Starting with 0 in M, all bits are set and then reset.
        ;; All intermediate values are checked.
        ;;
 
        ;; the cpu type is defined on asl's command line
 
        org     0x00
        clra
 
 
        ;; *******************************************************************
        ;; Set bits
        ;;
 
        ;; clear M
        X       0x0
        clra
 
        ;; set bit 0
        smb     0x0
        aisc    0x1
        ske
        jmp     fail
 
        ;; set bit 1
        smb     0x1
        aisc    0x2
        ske
        jmp     fail
 
        ;; set bit 2
        smb     0x2
        aisc    0x4
        ske
        jmp     fail
 
        ;; set bit 3
        smb     0x3
        aisc    0x8
        ske
        jmp     fail
 
 
        ;; *******************************************************************
        ;; Reset bits
        ;;
 
        ;; reset bit 0
        rmb     0x0
        comp
        aisc    0x1
        comp
        ske
        jmp     fail
 
        ;; reset bit 1
        rmb     0x1
        comp
        aisc    0x2
        comp
        ske
        jmp     fail
 
        ;; reset bit 2
        rmb     0x2
        comp
        aisc    0x4
        comp
        ske
        jmp     fail
 
        ;; reset bit 3
        rmb     0x3
        comp
        aisc    0x8
        comp
        ske
        jmp     fail
 
 
        ;; test passed
        jmp     pass
 
 
        org     0x100
        include "pass_fail.asm"

Line No.	Rev	Author	Line
1	2	arniml	`;; *******************************************************************`
2	179	arniml	`;; $Id: test.asm 179 2009-04-01 19:48:38Z arniml $`
3	2	arniml	`;;`
4			`;; Checks the RMB and SMB instructions.`
5			`;; Starting with 0 in M, all bits are set and then reset.`
6			`;; All intermediate values are checked.`
7			`;;`
8
9			`;; the cpu type is defined on asl's command line`
10
11			`org 0x00`
12			`clra`
13
14
15			`;; *******************************************************************`
16			`;; Set bits`
17			`;;`
18
19			`;; clear M`
20			`X 0x0`
21			`clra`
22
23			`;; set bit 0`
24			`smb 0x0`
25			`aisc 0x1`
26			`ske`
27			`jmp fail`
28
29			`;; set bit 1`
30			`smb 0x1`
31			`aisc 0x2`
32			`ske`
33			`jmp fail`
34
35			`;; set bit 2`
36			`smb 0x2`
37			`aisc 0x4`
38			`ske`
39			`jmp fail`
40
41			`;; set bit 3`
42			`smb 0x3`
43			`aisc 0x8`
44			`ske`
45			`jmp fail`
46
47
48			`;; *******************************************************************`
49			`;; Reset bits`
50			`;;`
51
52			`;; reset bit 0`
53			`rmb 0x0`
54			`comp`
55			`aisc 0x1`
56			`comp`
57			`ske`
58			`jmp fail`
59
60			`;; reset bit 1`
61			`rmb 0x1`
62			`comp`
63			`aisc 0x2`
64			`comp`
65			`ske`
66			`jmp fail`
67
68			`;; reset bit 2`
69			`rmb 0x2`
70			`comp`
71			`aisc 0x4`
72			`comp`
73			`ske`
74			`jmp fail`
75
76			`;; reset bit 3`
77			`rmb 0x3`
78			`comp`
79			`aisc 0x8`
80			`comp`
81			`ske`
82			`jmp fail`
83
84
85			`;; test passed`
86			`jmp pass`
87
88
89			`org 0x100`
90			`include "pass_fail.asm"`

Browse

Tools

Subversion Repositories t400

[/] [t400/] [trunk/] [sw/] [verif/] [black_box/] [rmb_smb/] [test.asm] - Blame information for rev 179