1  /* Test accesses to global array elements in PIC code.  */
       2  /* { dg-do compile } */
       3  /* { dg-options "-O1 -march=z10 -mzarch -fPIC" } */
       4  
       5  extern char a[] __attribute__ ((aligned (2)));
       6  extern char *b;
       7  
       8  void c()
       9  {
      10    b = a + 4;
      11    /* { dg-final { scan-assembler "(?n)\n\tlgrl\t%r\\d+,a@GOTENT\n" { target lp64 } } } */
      12    /* { dg-final { scan-assembler "(?n)\n\tlrl\t%r\\d+,a@GOTENT\n" { target { ! lp64 } } } } */
      13    /* { dg-final { scan-assembler-not "(?n)\n\tlarl\t%r\\d+,a\[^@\]" } } */
      14  }