gcc/testsuite/gcc.dg/20020312-2.c

   1 /* PR 5878.
   2
   3    We ICEd in verify_local_live_at_start because we incorrectly forced
   4    the PIC register live between BAR and BAZ.  We did this because the
   5    definition of PIC_OFFSET_TABLE_REGNUM was incorrectly not INVALID_REGNUM
   6    when !flag_pic for most targets.  */
   7
   8 /* { dg-do run } */
   9 /* { dg-options "-O -fno-pic" } */
  10
  11 extern void abort (void);
  12
  13 #if defined(__alpha__)
  14 /* PIC register is $29, but is used even without -fpic.  */
  15 #elif defined(__arc__)
  16 # define PIC_REG  "26"
  17 #elif defined(__arm__)
  18 # define PIC_REG  "9"
  19 #elif defined(AVR)
  20 /* No pic register.  */
  21 #elif defined(__cris__)
  22 # define PIC_REG  "0"
  23 #elif defined(__fr30__)
  24 /* No pic register.  */
  25 #elif defined(__H8300__) || defined(__H8300H__) || defined(__H8300S__)
  26 /* No pic register.  */
  27 #elif defined(_IBMR2)
  28 /* No pic register.  */
  29 #elif defined(__i386__)
  30 # define PIC_REG  "ebx"
  31 #elif defined(__ia64__)
  32 /* PIC register is r1, but is used even without -fpic.  */
  33 #elif defined(__lm32__)
  34 /* No pic register.  */
  35 #elif defined(__M32R__)
  36 /* No pic register.  */
  37 #elif defined(__m68k__)
  38 # define PIC_REG  "a5"
  39 #elif defined(__mc68hc1x__)
  40 /* No pic register.  */
  41 #elif defined(__mcore__)
  42 /* No pic register.  */
  43 #elif defined(__mips__)
  44 /* PIC register is $28, but is used even without -fpic.  */
  45 #elif defined(__MMIX__)
  46 /* No pic register.  */
  47 #elif defined(__mn10300__)
  48 /* No pic register.  */
  49 #elif defined(__moxie__)
  50 /* No pic register.  */
  51 #elif defined(__hppa__)
  52 /* PIC register is %r27 or %r19, but is used even without -fpic.  */
  53 #elif defined(__pdp11__)
  54 /* No pic register.  */
  55 #elif defined(__powerpc__) || defined(__PPC__) || defined(__POWERPC__) || defined (__ppc)
  56 # ifdef __MACH__
  57 #  define PIC_REG  "31"
  58 # else
  59 #  define PIC_REG  "30"
  60 # endif
  61 #elif defined(__RX__)
  62 /* No pic register.  */
  63 #elif defined(__s390__)
  64 # define PIC_REG  "12"
  65 #elif defined(__sparc__)
  66 # define PIC_REG  "l7"
  67 #elif defined(__TMS320C6X__)
  68 # define PIC_REG "B14"
  69 #elif defined(__v850)
  70 /* No pic register.  */
  71 #elif defined(__vax__)
  72 /* No pic register.  */
  73 #elif defined(__xstormy16__)
  74 /* No pic register.  */
  75 #elif defined(__XTENSA__)
  76 /* No pic register.  */
  77 #elif defined(__sh__)
  78 # define PIC_REG  "r12"
  79 #elif defined(__x86_64__)
  80 /* No pic register.  */
  81 #elif defined(__m32c__)
  82 /* No pic register.  */
  83 #elif defined(__SPU__)
  84 #  define PIC_REG  "126"
  85 #elif defined (__frv__)
  86 # ifdef __FRV_FDPIC__
  87 #  define PIC_REG "gr15"
  88 # else
  89 #  define PIC_REG "gr17"
  90 #endif
  91 #else
  92 # error "Modify the test for your target."
  93 #endif
  94
  95 #if defined PIC_REG && !defined __PIC__ && !defined __pic__
  96 register void *reg __asm__(PIC_REG);
  97 #else
  98 /* We really need a global register variable set to the PIC register
  99    to expose the bug.  Oh well, let the test case not fail.  */
 100 static void *reg;
 101 #endif
 102
 103 void * __attribute__((noinline))
 104 dummy (void *x)
 105 {
 106   return x;
 107 }
 108
 109 void
 110 f (void)
 111 {
 112   goto *dummy (&&bar);
 113   for (;;)
 114     {
 115     foo:
 116       reg = (void *) 1;
 117       if (!reg)
 118         goto baz;
 119       reg = &&foo;
 120     }
 121
 122  bar:
 123  baz:
 124   reg = 0;
 125 }
 126
 127 int
 128 main()
 129 {
 130   void *old_reg = reg;
 131   reg = (void *) 1;
 132
 133   f ();
 134
 135   /* Additionally test that the prologue/epilogue properly does *not*
 136      save and restore global registers.  Not possible when the PIC
 137      register is in a register window, of course.  On Darwin, you can't
 138      call library routines from non-PIC code.  */
 139 #if !defined (__sparc__) && !defined(__MACH__)
 140   if (reg)
 141     abort ();
 142 #endif
 143
 144   reg = old_reg;
 145   return 0;
 146 }