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

Subversion Repositories t400

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

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


        ;; *******************************************************************
        ;; $Id: test.asm,v 1.1.1.1 2006-05-06 01:56:45 arniml Exp $
        ;;
        ;; Checks the CASC instruction.
        ;;
 
        ;; the cpu type is defined on asl's command line
 
        org     0x00
        clra
 
        ;; preload M0 with 0xa
        smb     0x3
        rmb     0x2
        smb     0x1
        rmb     0x0
 
        rc
        asc     0xf
        ;; test a15 + m5 + c0
        casc
        jmp     ok_a15_m5_c0_carry
        jmp     fail
ok_a15_m5_c0_carry:
        skc
        jmp     ok_a15_m5_c0_c
        jmp     fail
ok_a15_m5_c0_c:
        ske
        jmp     fail
 
 
        jmp     pass
 
        org     0x100
        include "pass_fail.asm"

Line No.	Rev	Author	Line
1	2	arniml	`;; *******************************************************************`
2			`;; $Id: test.asm,v 1.1.1.1 2006-05-06 01:56:45 arniml Exp $`
3			`;;`
4			`;; Checks the CASC instruction.`
5			`;;`
6
7			`;; the cpu type is defined on asl's command line`
8
9			`org 0x00`
10			`clra`
11
12			`;; preload M0 with 0xa`
13			`smb 0x3`
14			`rmb 0x2`
15			`smb 0x1`
16			`rmb 0x0`
17
18			`rc`
19			`asc 0xf`
20			`;; test a15 + m5 + c0`
21			`casc`
22			`jmp ok_a15_m5_c0_carry`
23			`jmp fail`
24			`ok_a15_m5_c0_carry:`
25			`skc`
26			`jmp ok_a15_m5_c0_c`
27			`jmp fail`
28			`ok_a15_m5_c0_c:`
29			`ske`
30			`jmp fail`
31
32
33			`jmp pass`
34
35			`org 0x100`
36			`include "pass_fail.asm"`

Browse

Tools

Subversion Repositories t400

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