gold/testsuite/split_s390x_1_z4.s

   1 # split_s390x_1_z4.s: s390x specific test case for -fsplit-stack -
   2 # conditional call, alfi.
   3
   4         .text
   5
   6         .global fn1
   7         .type   fn1,@function
   8 fn1:
   9         .cfi_startproc
  10         ear     %r1, %a0
  11         sllg    %r1, %r1, 32
  12         ear     %r1, %a1
  13         lg      %r1, 0x38(%r1)
  14         algfi   %r1, 0x100000
  15         cgr     %r15, %r1
  16         larl    %r1, .L1
  17         jgl     __morestack
  18         .section .rodata
  19         .align 8
  20 .L1:
  21         .quad   0x100000
  22         .quad   0
  23         .quad   .L2-.L1
  24         .previous
  25 .L2:
  26         stmg    %r13, %r15, 0x68(%r15)
  27         .cfi_offset     %r13, -0x38
  28         .cfi_offset     %r14, -0x30
  29         .cfi_offset     %r15, -0x28
  30         aghi    %r15, -0xa0
  31         .cfi_adjust_cfa_offset  0xa0
  32         brasl   %r14, fn2
  33         lmg     %r13, %r15, 0x108(%r15)
  34         .cfi_restore    %r13
  35         .cfi_restore    %r14
  36         .cfi_restore    %r15
  37         .cfi_adjust_cfa_offset  -0xa0
  38         br      %r14
  39         .cfi_endproc
  40         .size   fn1,. - fn1
  41
  42         .section        .note.GNU-stack,"",@progbits
  43         .section        .note.GNU-split-stack,"",@progbits