(root)/
gcc-13.2.0/
gcc/
testsuite/
gcc.target/
s390/
nobp-indirect-jump-attr.c
       1  /* { dg-do run } */
       2  /* { dg-options "-O3 -march=z10 --save-temps -mindirect-branch-table" } */
       3  /* { dg-require-effective-target label_values } */
       4  
       5  /* This is a copy of the gcc.c-torture/execute/20040302-1.c
       6     testcase.  */
       7  
       8  int code[]={0,0,0,0,1};
       9  
      10  void
      11  foo(int x) {
      12    volatile int b;
      13    b = 0xffffffff;
      14  }
      15  
      16  void __attribute__((indirect_branch_jump("thunk")))
      17  bar(int *pc) {
      18    static const void *l[] = {&&lab0, &&end};
      19  
      20    foo(0);
      21    goto *l[*pc];
      22   lab0:
      23    foo(0);
      24    pc++;
      25    goto *l[*pc];
      26   end:
      27    return;
      28  }
      29  
      30  int main() {
      31    bar(code);
      32    return 0;
      33  }
      34  
      35  /* 2x bar */
      36  /* { dg-final { scan-assembler-times "jg\t__s390_indirect_jump" 2 } } */
      37  /* { dg-final { scan-assembler "exrl" } } */
      38  
      39  /* { dg-final { scan-assembler     "section\t.s390_indirect_jump" } } */
      40  /* { dg-final { scan-assembler-not "section\t.s390_indirect_call" } } */
      41  /* { dg-final { scan-assembler-not "section\t.s390_return_reg" } } */
      42  /* { dg-final { scan-assembler-not "section\t.s390_return_mem" } } */