gcc/testsuite/gcc.dg/vect/pr48765.c

   1 /* { dg-do compile { target { powerpc*-*-* } } } */
   2 /* { dg-skip-if "do not override -mcpu" { *-*-* } { "-mcpu=*" } { "-mcpu=power6" } } */
   3 /* { dg-additional-options "-O3 -mcpu=power6" } */
   4
   5 enum reg_class
   6 {
   7   NO_REGS, AP_REG, XRF_REGS, GENERAL_REGS, AGRF_REGS, XGRF_REGS, ALL_REGS,
   8     LIM_REG_CLASSES
   9 };
  10 enum machine_mode
  11 {
  12   VOIDmode, QImode, HImode, PSImode, SImode, PDImode, DImode, TImode, OImode,
  13     QFmode, HFmode, TQFmode, SFmode, DFmode, XFmode, TFmode, SCmode, DCmode,
  14     XCmode, TCmode, CQImode, CHImode, CSImode, CDImode, CTImode, COImode,
  15     BLKmode, CCmode, CCEVENmode, MAX_MACHINE_MODE
  16 };
  17 typedef struct rtx_def
  18 {
  19   int mode:8;
  20 }
  21  *rtx;
  22 extern rtx *regno_reg_rtx;
  23 typedef unsigned int HARD_REG_ELT_TYPE;
  24 typedef HARD_REG_ELT_TYPE HARD_REG_SET[((64 + 32 - 1) / 32)];
  25 extern int reg_alloc_order[64];
  26 extern int max_regno;
  27 extern int *reg_n_calls_crossed;
  28 extern short *reg_renumber;
  29 static int *reg_where_dead;
  30 static int *reg_where_born;
  31 static int *reg_order;
  32 static char *regs_change_size;
  33 static HARD_REG_SET *after_insn_hard_regs;
  34 static int stupid_find_reg (int, enum reg_class, enum machine_mode, int, int,
  35                             int);
  36 enum reg_class reg_preferred_class (int);
  37 void
  38 stupid_life_analysis (f, nregs, file)
  39      int nregs, file;
  40      rtx f;
  41 {
  42   register int i;
  43   for (i = (((64)) + 3) + 1; i < max_regno; i++)
  44     {
  45       register int r = reg_order[i];
  46       if ((int) LIM_REG_CLASSES > 1)
  47         reg_renumber[r] =
  48           stupid_find_reg (reg_n_calls_crossed[r], reg_preferred_class (r),
  49                            ((regno_reg_rtx[r])->mode), reg_where_born[r],
  50                            reg_where_dead[r], regs_change_size[r]);
  51     }
  52 }
  53
  54 static int
  55 stupid_find_reg (call_preserved, class, mode, born_insn, dead_insn,
  56                  changes_size)
  57      int call_preserved, born_insn, dead_insn, changes_size;
  58      enum reg_class class;
  59      enum machine_mode mode;
  60 {
  61   register int i, ins;
  62   HARD_REG_SET used, this_reg;
  63   for (ins = born_insn; ins < dead_insn; ins++)
  64     do
  65       {
  66         register HARD_REG_ELT_TYPE *scan_tp_ = (used), *scan_fp_ =
  67           (after_insn_hard_regs[ins]);
  68         for (i = 0; i < ((64 + 32 - 1) / 32); i++)
  69           *scan_tp_++ |= *scan_fp_++;
  70       }
  71     while (0);
  72   for (i = 0; i < 64; i++)
  73     {
  74       int regno = reg_alloc_order[i];
  75       if (((used)[(regno) / ((unsigned) 32)] &
  76            (((HARD_REG_ELT_TYPE) (1)) << ((regno) % ((unsigned) 32)))))
  77         {
  78           register int j;
  79           if (j == regno)
  80             return regno;
  81         }
  82     }
  83 }
  84