21 lines
232 B
Text
21 lines
232 B
Text
# cr16 testcase for jfc (repl)
|
|
# mach(): cr16
|
|
|
|
.include "testutils.inc"
|
|
|
|
start
|
|
|
|
.global jfc
|
|
jfc:
|
|
movd $ok, (r7,r6)
|
|
lshd $-1, (r7,r6)
|
|
|
|
mvi_h_condbit 0
|
|
movw $2, r4
|
|
movw $1, r5
|
|
subw r4, r5
|
|
jfc (r7,r6)
|
|
not_ok:
|
|
fail
|
|
ok:
|
|
pass
|