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

Subversion Repositories t400

[/] [t400/] [trunk/] [sw/] [verif/] [black_box/] [rc_sc/] [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 RC and SC instructions.
        ;;
 
        ;; the cpu type is defined on asl's command line
 
        org     0x00
        clra
 
        ;; preload M with 0x8
        smb     0x3
        rmb     0x2
        rmb     0x1
        rmb     0x0
 
        ;; check initial value of C
        skc
        jmp     ok_res
        jmp     fail
ok_res:
 
        sc
        skc
        jmp     fail
 
        rc
        skc
        jmp     ok_rc
        jmp     fail
ok_rc:
 
        asc
        asc
        nop
        skc
        jmp     fail
 
        rc
        skc
        jmp     pass
        jmp     fail
 
        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 RC and SC instructions.`
5			`;;`
6
7			`;; the cpu type is defined on asl's command line`
8
9			`org 0x00`
10			`clra`
11
12			`;; preload M with 0x8`
13			`smb 0x3`
14			`rmb 0x2`
15			`rmb 0x1`
16			`rmb 0x0`
17
18			`;; check initial value of C`
19			`skc`
20			`jmp ok_res`
21			`jmp fail`
22			`ok_res:`
23
24			`sc`
25			`skc`
26			`jmp fail`
27
28			`rc`
29			`skc`
30			`jmp ok_rc`
31			`jmp fail`
32			`ok_rc:`
33
34			`asc`
35			`asc`
36			`nop`
37			`skc`
38			`jmp fail`
39
40			`rc`
41			`skc`
42			`jmp pass`
43			`jmp fail`
44
45			`org 0x100`
46			`include "pass_fail.asm"`

Browse

Tools

Subversion Repositories t400

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