sim/testsuite/sim/fr30/call.cgs

   1 # fr30 testcase for call @$Ri
   2 # mach(): fr30
   3
   4         .include "testutils.inc"
   5
   6         START
   7
   8         .text
   9         .global call
  10
  11         ; Test call $Ri
  12         mvi_h_gr        #func1,r0
  13         set_cc          0x0f            ; condition codes shouldn't change
  14 call1:
  15         call            @r0
  16         fail
  17 func1:
  18         test_cc         1 1 1 1
  19         mvi_h_gr        #call1,r7
  20         inci_h_gr       2,r7
  21         testr_h_dr      r7,rp
  22
  23         mvi_h_gr        #func2,r0
  24         set_cc          0x0f            ; condition codes shouldn't change
  25 call2:
  26         call:d          @r0
  27         ldi:8           1,r0            ; Must assume this works
  28         fail
  29 func2:
  30         test_cc         1 1 1 1
  31         mvi_h_gr        #call2,r7
  32         inci_h_gr       4,r7
  33         testr_h_dr      r7,rp
  34         testr_h_gr      1,r0
  35
  36         pass