sim/testsuite/frv/call.pcgs

   1 # frv parallel testcase for call $label24
   2 # mach: fr500 fr550 frv
   3
   4         .include "testutils.inc"
   5
   6         start
   7
   8         .global call
   9 call:
  10         set_spr_immed   0,lr
  11         call            ok1
  12 bad1:
  13         fail
  14 ok1:
  15         test_spr_addr   bad1,lr
  16
  17         set_spr_immed   0,lr
  18         setlos.p        0,gr5
  19         call.p          ok2
  20         bra             bad3
  21 bad2:
  22         setlos          5,gr5
  23         fail
  24 bad3:
  25         fail
  26 ok2:
  27         test_spr_addr   bad2,lr
  28         test_gr_immed   0,gr5
  29
  30         pass