gcc/testsuite/gcc.target/s390/nodatarel-1.c

   1 /* Test -mno-pic-data-is-text-relative option.  No relative addressing
   2    of elements in .data and .bss are allowed with that option.  */
   3
   4 /* { dg-do compile } */
   5 /* { dg-options "-O3 -fno-optimize-sibling-calls -fpic -mno-pic-data-is-text-relative -march=z10 -mtune=z9-109 -mzarch" } */
   6
   7 static int a = 3;
   8
   9 /* With -mno-pic-data-is-text-relative these must be addressed via
  10    GOT.  */
  11
  12 int __attribute__((noinline,noclone))
  13 foo ()
  14 {
  15   return a;
  16 }
  17
  18 static int __attribute__((noinline,noclone))
  19 foostatic (void)
  20 {
  21   return a;
  22 }
  23
  24 /* Just to make a potentially modified.  */
  25
  26 void
  27 bar (int b)
  28 {
  29   a = b;
  30 }
  31
  32 /* { dg-final { scan-assembler-times "a@GOTENT" 3 } } */
  33
  34 /* The exrl target is a label_ref which should not be affected at
  35    all.  */
  36
  37 void
  38 mymemcpy (char *dst, char *src, long size)
  39 {
  40   __builtin_memcpy (dst, src, size);
  41 }
  42
  43 /* { dg-final { scan-assembler "exrl" } } */
  44
  45
  46 /* PLT slots can still be addressed relatively.  */
  47
  48 int
  49 callfoo ()
  50 {
  51   return foo ();
  52 }
  53
  54 /* { dg-final { scan-assembler-times "foo@PLT" 1 } } */
  55
  56
  57 /* GOT entries can still be addressed relatively.  */
  58
  59 void *
  60 fooptr ()
  61 {
  62   return &foo;
  63 }
  64
  65 /* { dg-final { scan-assembler-times "foo@GOTENT" 1 } } */
  66
  67
  68 /* A static function can be addressed relatively.  */
  69
  70 int
  71 callfoostatic ()
  72 {
  73   return foostatic ();
  74 }
  75
  76 void *
  77 foostaticptr ()
  78 {
  79   return &foostatic;
  80 }
  81
  82
  83 /* { dg-final { scan-assembler-not "foostatic@" } } */