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

Subversion Repositories t48

[/] [t48/] [tags/] [rel_0_2_beta/] [sw/] [verif/] [black_box/] [add/] [a_data/] [test.asm] - Blame information for rev 335

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

Line No. Rev Author Line
1 12 arniml
        ;; *******************************************************************
2
        ;; $Id: test.asm,v 1.1.1.1 2004-03-25 22:29:16 arniml Exp $
3
        ;;
4
        ;; Test ADD A, data without carry.
5
        ;; *******************************************************************
6
 
7
        INCLUDE "cpu.inc"
8
        INCLUDE "pass_fail.inc"
9
 
10
        ORG     0
11
 
12
        ;; Start of test
13
        mov     a, #000H
14
 
15
        add     a, #055H
16
        jz      fail
17
        ;; exact check for 055H
18
        jb0     ok_1
19
        jmp     fail
20
 
21
ok_1:   jb1     fail
22
 
23
        jb2     ok_2
24
        jmp     fail
25
 
26
ok_2:   jb3     fail
27
 
28
        jb4     ok_4
29
        jmp     fail
30
 
31
ok_4:   jb5     fail
32
 
33
        jb6     ok_6
34
        jmp     fail
35
 
36
ok_6:   jb7     fail
37
 
38
        add     a, #0AAH
39
        jz      fail
40
        add     a, #001H
41
        jnz     fail
42
 
43
        add     a, #011111110B
44
        jb0     fail
45
 
46
        add     a, #011111111B
47
        jb1     fail
48
        jb0     ko_1
49
        jmp     fail
50
 
51
ko_1:   add     a, #011111110B
52
        jb2     fail
53
        jb1     ko_2
54
        jmp     fail
55
 
56
ko_2:   add     a, #011111100B
57
        jb3     fail
58
        jb2     ko_3
59
        jmp     fail
60
 
61
ko_3:   add     a, #011111000B
62
        jb4     fail
63
        jb3     ko_4
64
        jmp     fail
65
 
66
ko_4:   add     a, #011110000B
67
        jb5     fail
68
        jb4     ko_5
69
        jmp     fail
70
 
71
ko_5:   add     a, #011100000B
72
        jb6     fail
73
        jb5     ko_6
74
        jmp     fail
75
 
76
ko_6:   add     a, #011000000B
77
        jb7     fail
78
        jb6     pass
79
 
80
fail:   FAIL
81
 
82
pass:   PASS

powered by: WebSVN 2.1.0

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