URL
https://opencores.org/ocsvn/t400/t400/trunk
Subversion Repositories t400
[/] [t400/] [tags/] [rel_1_1/] [sw/] [verif/] [black_box/] [rmb_smb/] [test.asm] - Rev 176
Compare with Previous | Blame | View Log
;; *******************************************************************
;; $Id: test.asm,v 1.1.1.1 2006-05-06 01:56:45 arniml Exp $
;;
;; Checks the RMB and SMB instructions.
;; Starting with 0 in M, all bits are set and then reset.
;; All intermediate values are checked.
;;
;; the cpu type is defined on asl's command line
org 0x00
clra
;; *******************************************************************
;; Set bits
;;
;; clear M
X 0x0
clra
;; set bit 0
smb 0x0
aisc 0x1
ske
jmp fail
;; set bit 1
smb 0x1
aisc 0x2
ske
jmp fail
;; set bit 2
smb 0x2
aisc 0x4
ske
jmp fail
;; set bit 3
smb 0x3
aisc 0x8
ske
jmp fail
;; *******************************************************************
;; Reset bits
;;
;; reset bit 0
rmb 0x0
comp
aisc 0x1
comp
ske
jmp fail
;; reset bit 1
rmb 0x1
comp
aisc 0x2
comp
ske
jmp fail
;; reset bit 2
rmb 0x2
comp
aisc 0x4
comp
ske
jmp fail
;; reset bit 3
rmb 0x3
comp
aisc 0x8
comp
ske
jmp fail
;; test passed
jmp pass
org 0x100
include "pass_fail.asm"