sim/testsuite/sim/sh64/media/mabsl.cgs

   1 # sh testcase for mabs.l $rm, $rd -*- Asm -*-
   2 # mach: all
   3 # as: -isa=shmedia
   4 # ld: -m shelf64
   5
   6         .include "media/testutils.inc"
   7
   8         start
   9
  10         .global mabsl
  11 init:
  12         pta wrong, tr0
  13
  14 mabsl1:
  15         # Pack { 1 3 } into R0.
  16         _packl 1, 3, r0
  17
  18         mabs.l r0, r1
  19
  20         # Test for { 1 3 } in R0.
  21         _packl 1, 3, r2
  22         bne r0, r2, tr0
  23
  24 mabsl2:
  25         # Pack { -1, -1 } into R0.
  26         _packl 1, 1, r0
  27
  28         # Set the left sign bit.
  29         movi 1, r1
  30         shlli r1, 63, r1
  31         or r0, r1, r0
  32
  33         mabs.l r0, r2
  34
  35 okay:
  36         pass
  37
  38 wrong:
  39         fail