gcc/testsuite/gcc.dg/tls/emutls-1.c

   1 /* { dg-do run { target *-wrs-vxworks } } */
   2 /* { dg-require-effective-target tls } */
   3
   4 /* vxworks' TLS model requires no extra padding on the tls proxy
   5    objects.  */
   6
   7 __thread int i;
   8 __thread int j;
   9
  10 extern int __tls__i;
  11 extern int __tls__j;
  12
  13 int main ()
  14 {
  15   int delta = ((char *)&__tls__j - (char *)&__tls__i);
  16
  17   if (delta < 0)
  18     delta = -delta;
  19
  20   return delta != 12;
  21 }