sim/testsuite/cr16/jfc.cgs

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