1# cr16 testcase for jfs (repl)
2# mach(): cr16
3
4 .include "testutils.inc"
5
6 start
7
8 .global jfs
9jfs:
10 movd $ok, (r7,r6)
11 lshd $-1, (r7,r6)
12
13 mvi_h_condbit 0
14 movw $0xaa, r4
15 movw $0xaa, r5
16 addb r4, r5
17 jfs (r7,r6)
18not_ok:
19 fail
20ok:
21 pass
22