1 /* { dg-do compile } */
2 /* { dg-options "-O2" } */
3 /* { dg-require-effective-target tls_native } */
11 extern __thread const unsigned char *tcc1, **tcc2;
13 extern inline const unsigned char ** __attribute__ ((const))
16 const unsigned char **a = &tcc1;
23 bar (const struct A *x)
30 return a > 0 && ((*foo ())[a] & 64);
34 baz (const struct A *x, char *y)
38 for (a = x; !!a->a1; a++)
50 /* Verify tcc1 and tcc2 variables show up only in the TLS access sequences. */
51 /* { dg-final { scan-assembler "tcc1@" { target i?86-*-* x86_64-*-* } } } */
52 /* { dg-final { scan-assembler "tcc2@" { target i?86-*-* x86_64-*-* } } } */
53 /* { dg-final { scan-assembler-not "tcc1\[^@\]" { target i?86-*-* x86_64-*-* } } } */
54 /* { dg-final { scan-assembler-not "tcc2\[^@\]" { target i?86-*-* x86_64-*-* } } } */