sim/testsuite/sim/sh64/compact/shld.cgs

   1 # sh testcase for shld $rm, $rn -*- Asm -*-
   2 # mach: all
   3 # as: -isa=shcompact
   4 # ld: -m shelf32
   5
   6         .include "compact/testutils.inc"
   7
   8         start
   9
  10         .global null
  11 null:
  12         mov #1, r0
  13         mov #0, r1
  14         shld r1, r0
  15         # no shift is performed.
  16         assert r0, #1
  17
  18         .global gt0
  19 gt0:
  20         mov #4, r0
  21         mov #3, r1
  22         shld r1, r0
  23         # shift left 3 bits.
  24         assert r0, #32
  25
  26         .global lt0
  27 lt0:
  28         mov #32, r0
  29         mov #3, r1
  30         neg r1, r1
  31         shld r1, r0
  32         # shift right 3 bits.
  33         assert r0, #4
  34
  35         .global fill
  36 fill:
  37         mov #1, r0
  38         rotr r0
  39         mov #1, r1
  40         rotr r1
  41         shld r1, r0
  42         assert r0, #0
  43
  44 okay:
  45         pass
  46 wrong:
  47         fail
  48