URL
https://opencores.org/ocsvn/t48/t48/trunk
Subversion Repositories t48
[/] [t48/] [tags/] [rel_1_3/] [sw/] [verif/] [black_box/] [dec/] [a/] [test.asm] - Rev 331
Compare with Previous | Blame | View Log
;; *******************************************************************
;; $Id: test.asm 295 2009-04-01 19:32:48Z arniml $
;;
;; Test DEC A.
;; *******************************************************************
INCLUDE "cpu.inc"
INCLUDE "pass_fail.inc"
ORG 0
;; Start of test
mov a, #001H
dec a
jnz fail
dec a
jb0 ok_0
jmp fail
ok_0: inc a
jnz fail
mov a, #10100101B
dec a
add a, #01011101B
dec a
jnz fail
pass: PASS
fail: FAIL