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