URL
https://opencores.org/ocsvn/t400/t400/trunk
Subversion Repositories t400
Compare Revisions
- This comparison shows the changes necessary to convert path
/t400/trunk/sw/verif/black_box/asc
- from Rev 25 to Rev 176
- ↔ Reverse comparison
Rev 25 → Rev 176
/test.asm
0,0 → 1,189
;; ******************************************************************* |
;; $Id: test.asm,v 1.2 2006-05-16 23:43:45 arniml Exp $ |
;; |
;; Checks the ASC instruction. |
;; |
|
;; the cpu type is defined on asl's command line |
|
org 0x00 |
clra |
|
;; preload M with 0x5 |
rmb 0x3 |
smb 0x2 |
rmb 0x1 |
smb 0x0 |
|
clra |
rc |
;; test a0 + m5 + c0 |
asc |
jmp ok_a0_m5_c0_carry |
jmp fail |
ok_a0_m5_c0_carry: |
skc |
jmp ok_a0_m5_c0_c |
jmp fail |
ok_a0_m5_c0_c: |
ske |
jmp fail |
|
;; test a5 + m5 + c0 |
asc |
jmp ok_a5_m5_c0_carry |
jmp fail |
ok_a5_m5_c0_carry: |
skc |
jmp ok_a5_m5_c0_c |
jmp fail |
ok_a5_m5_c0_c: |
aisc 16+5 - 10 |
nop |
ske |
jmp fail |
|
rc |
asc |
;; test a10 + m5 + c0 |
asc |
jmp ok_a10_m5_c0_carry |
jmp fail |
ok_a10_m5_c0_carry: |
skc |
jmp ok_a10_m5_c0_c |
jmp fail |
ok_a10_m5_c0_c: |
aisc 16+5 - 15 |
nop |
ske |
jmp fail |
|
rc |
asc |
asc |
;; test a15 + m5 + c0 |
asc |
jmp fail |
skc |
jmp fail |
rc |
aisc 16+5 - 20 |
nop |
ske |
jmp fail |
|
sc |
clra |
;; test a0 + m5 + c1 |
asc |
jmp ok_a0_m5_c1_carry |
jmp fail |
ok_a0_m5_c1_carry: |
skc |
jmp ok_a0_m5_c1_c |
jmp fail |
ok_a0_m5_c1_c: |
aisc 16+5 - 6 |
nop |
ske |
jmp fail |
|
sc |
;; test a5 + m5 + c1 |
asc |
jmp ok_a5_m5_c1_carry |
jmp fail |
ok_a5_m5_c1_carry: |
skc |
jmp ok_a5_m5_c1_c |
jmp fail |
ok_a5_m5_c1_c: |
aisc 16+5 - 11 |
nop |
ske |
jmp fail |
|
rc |
asc |
sc |
;; test a10 + m5 + c1 |
asc |
jmp fail |
skc |
jmp fail |
aisc 16+5 - 16 |
nop |
ske |
jmp fail |
|
rc |
asc |
asc |
sc |
;; test a15 + m5 + c1 |
asc |
jmp fail |
skc |
jmp fail |
;; aisc 16+5 - 21 |
nop |
ske |
jmp fail |
|
|
rc |
aisc 0xa |
x 0x0 |
clra |
;; test a0 + m15 + c0 |
asc |
jmp ok_a0_m15_c0_carry |
jmp fail |
ok_a0_m15_c0_carry: |
skc |
jmp ok_a0_m15_c0_c |
jmp fail |
ok_a0_m15_c0_c: |
ske |
jmp fail |
|
rc |
;; test a15 + m15 + c0 |
asc |
jmp fail |
skc |
jmp fail |
aisc 16+15 - 30 |
nop |
ske |
jmp fail |
|
sc |
clra |
;; test a0 + m15 + c1 |
asc |
jmp fail |
skc |
jmp fail |
aisc 16+15 - 16 |
nop |
ske |
jmp fail |
|
sc |
;; test a15 + m15 + c1 |
asc |
jmp fail |
skc |
jmp fail |
;; aisc 16+15 - 31 |
nop |
ske |
jmp fail |
|
|
jmp pass |
|
org 0x100 |
include "pass_fail.asm" |