OSDN Git Service

* configure.in (all_headers, all_lib2funcs): Remove.
[pf3gnuchains/gcc-fork.git] / gcc / hard-reg-set.h
index 6bc668b..a4ac4d0 100644 (file)
@@ -1,22 +1,25 @@
 /* Sets (bit vectors) of hard registers, and operations on them.
-   Copyright (C) 1987, 1992, 1994 Free Software Foundation, Inc.
+   Copyright (C) 1987, 1992, 1994, 2000 Free Software Foundation, Inc.
 
-This file is part of GNU CC
+This file is part of GCC
 
-GNU CC is free software; you can redistribute it and/or modify
-it under the terms of the GNU General Public License as published by
-the Free Software Foundation; either version 2, or (at your option)
-any later version.
+GCC is free software; you can redistribute it and/or modify it under
+the terms of the GNU General Public License as published by the Free
+Software Foundation; either version 2, or (at your option) any later
+version.
 
-GNU CC is distributed in the hope that it will be useful,
-but WITHOUT ANY WARRANTY; without even the implied warranty of
-MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
-GNU General Public License for more details.
+GCC is distributed in the hope that it will be useful, but WITHOUT ANY
+WARRANTY; without even the implied warranty of MERCHANTABILITY or
+FITNESS FOR A PARTICULAR PURPOSE.  See the GNU General Public License
+for more details.
 
 You should have received a copy of the GNU General Public License
-along with GNU CC; see the file COPYING.  If not, write to
-the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.  */
+along with GCC; see the file COPYING.  If not, write to the Free
+Software Foundation, 59 Temple Place - Suite 330, Boston, MA
+02111-1307, USA.  */
 
+#ifndef GCC_HARD_REG_SET_H
+#define GCC_HARD_REG_SET_H 
 
 /* Define the type of a set of hard registers.  */
 
@@ -122,69 +125,265 @@ typedef HARD_REG_ELT_TYPE HARD_REG_SET[HARD_REG_SET_LONGS];
   ((SET)[(BIT) / UHOST_BITS_PER_WIDE_INT]      \
    & (HARD_CONST (1) << ((BIT) % UHOST_BITS_PER_WIDE_INT)))
 
+#if FIRST_PSEUDO_REGISTER <= 2*HOST_BITS_PER_WIDE_INT
 #define CLEAR_HARD_REG_SET(TO)  \
-do { register HARD_REG_ELT_TYPE *scan_tp_ = (TO);              \
-     register int i;                                           \
+do { HARD_REG_ELT_TYPE *scan_tp_ = (TO);                       \
+     scan_tp_[0] = 0;                                          \
+     scan_tp_[1] = 0; } while (0)
+
+#define SET_HARD_REG_SET(TO)  \
+do { HARD_REG_ELT_TYPE *scan_tp_ = (TO);                       \
+     scan_tp_[0] = -1;                                         \
+     scan_tp_[1] = -1; } while (0)
+
+#define COPY_HARD_REG_SET(TO, FROM)  \
+do { HARD_REG_ELT_TYPE *scan_tp_ = (TO), *scan_fp_ = (FROM);   \
+     scan_tp_[0] = scan_fp_[0];                                        \
+     scan_tp_[1] = scan_fp_[1]; } while (0)
+
+#define COMPL_HARD_REG_SET(TO, FROM)  \
+do { HARD_REG_ELT_TYPE *scan_tp_ = (TO), *scan_fp_ = (FROM);   \
+     scan_tp_[0] = ~ scan_fp_[0];                              \
+     scan_tp_[1] = ~ scan_fp_[1]; } while (0)
+
+#define AND_HARD_REG_SET(TO, FROM)  \
+do { HARD_REG_ELT_TYPE *scan_tp_ = (TO), *scan_fp_ = (FROM);   \
+     scan_tp_[0] &= scan_fp_[0];                               \
+     scan_tp_[1] &= scan_fp_[1]; } while (0)
+
+#define AND_COMPL_HARD_REG_SET(TO, FROM)  \
+do { HARD_REG_ELT_TYPE *scan_tp_ = (TO), *scan_fp_ = (FROM);   \
+     scan_tp_[0] &= ~ scan_fp_[0];                             \
+     scan_tp_[1] &= ~ scan_fp_[1]; } while (0)
+
+#define IOR_HARD_REG_SET(TO, FROM)  \
+do { HARD_REG_ELT_TYPE *scan_tp_ = (TO), *scan_fp_ = (FROM);   \
+     scan_tp_[0] |= scan_fp_[0];                               \
+     scan_tp_[1] |= scan_fp_[1]; } while (0)
+
+#define IOR_COMPL_HARD_REG_SET(TO, FROM)  \
+do { HARD_REG_ELT_TYPE *scan_tp_ = (TO), *scan_fp_ = (FROM);   \
+     scan_tp_[0] |= ~ scan_fp_[0];                             \
+     scan_tp_[1] |= ~ scan_fp_[1]; } while (0)
+
+#define GO_IF_HARD_REG_SUBSET(X,Y,TO)  \
+do { HARD_REG_ELT_TYPE *scan_xp_ = (X), *scan_yp_ = (Y);       \
+     if ((0 == (scan_xp_[0] & ~ scan_yp_[0]))                  \
+        && (0 == (scan_xp_[1] & ~ scan_yp_[1])))               \
+       goto TO; } while (0)
+
+#define GO_IF_HARD_REG_EQUAL(X,Y,TO)  \
+do { HARD_REG_ELT_TYPE *scan_xp_ = (X), *scan_yp_ = (Y);       \
+     if ((scan_xp_[0] == scan_yp_[0])                          \
+        && (scan_xp_[1] == scan_yp_[1]))                       \
+       goto TO; } while (0)
+
+#else
+#if FIRST_PSEUDO_REGISTER <= 3*HOST_BITS_PER_WIDE_INT
+#define CLEAR_HARD_REG_SET(TO)  \
+do { HARD_REG_ELT_TYPE *scan_tp_ = (TO);                       \
+     scan_tp_[0] = 0;                                          \
+     scan_tp_[1] = 0;                                          \
+     scan_tp_[2] = 0; } while (0)
+
+#define SET_HARD_REG_SET(TO)  \
+do { HARD_REG_ELT_TYPE *scan_tp_ = (TO);                       \
+     scan_tp_[0] = -1;                                         \
+     scan_tp_[1] = -1;                                         \
+     scan_tp_[2] = -1; } while (0)
+
+#define COPY_HARD_REG_SET(TO, FROM)  \
+do { HARD_REG_ELT_TYPE *scan_tp_ = (TO), *scan_fp_ = (FROM);   \
+     scan_tp_[0] = scan_fp_[0];                                        \
+     scan_tp_[1] = scan_fp_[1];                                        \
+     scan_tp_[2] = scan_fp_[2]; } while (0)
+
+#define COMPL_HARD_REG_SET(TO, FROM)  \
+do { HARD_REG_ELT_TYPE *scan_tp_ = (TO), *scan_fp_ = (FROM);   \
+     scan_tp_[0] = ~ scan_fp_[0];                              \
+     scan_tp_[1] = ~ scan_fp_[1];                              \
+     scan_tp_[2] = ~ scan_fp_[2]; } while (0)
+
+#define AND_HARD_REG_SET(TO, FROM)  \
+do { HARD_REG_ELT_TYPE *scan_tp_ = (TO), *scan_fp_ = (FROM);   \
+     scan_tp_[0] &= scan_fp_[0];                               \
+     scan_tp_[1] &= scan_fp_[1];                               \
+     scan_tp_[2] &= scan_fp_[2]; } while (0)
+
+#define AND_COMPL_HARD_REG_SET(TO, FROM)  \
+do { HARD_REG_ELT_TYPE *scan_tp_ = (TO), *scan_fp_ = (FROM);   \
+     scan_tp_[0] &= ~ scan_fp_[0];                             \
+     scan_tp_[1] &= ~ scan_fp_[1];                             \
+     scan_tp_[2] &= ~ scan_fp_[2]; } while (0)
+
+#define IOR_HARD_REG_SET(TO, FROM)  \
+do { HARD_REG_ELT_TYPE *scan_tp_ = (TO), *scan_fp_ = (FROM);   \
+     scan_tp_[0] |= scan_fp_[0];                               \
+     scan_tp_[1] |= scan_fp_[1];                               \
+     scan_tp_[2] |= scan_fp_[2]; } while (0)
+
+#define IOR_COMPL_HARD_REG_SET(TO, FROM)  \
+do { HARD_REG_ELT_TYPE *scan_tp_ = (TO), *scan_fp_ = (FROM);   \
+     scan_tp_[0] |= ~ scan_fp_[0];                             \
+     scan_tp_[1] |= ~ scan_fp_[1];                             \
+     scan_tp_[2] |= ~ scan_fp_[2]; } while (0)
+
+#define GO_IF_HARD_REG_SUBSET(X,Y,TO)  \
+do { HARD_REG_ELT_TYPE *scan_xp_ = (X), *scan_yp_ = (Y);       \
+     if ((0 == (scan_xp_[0] & ~ scan_yp_[0]))                  \
+        && (0 == (scan_xp_[1] & ~ scan_yp_[1]))                \
+        && (0 == (scan_xp_[2] & ~ scan_yp_[2])))               \
+       goto TO; } while (0)
+
+#define GO_IF_HARD_REG_EQUAL(X,Y,TO)  \
+do { HARD_REG_ELT_TYPE *scan_xp_ = (X), *scan_yp_ = (Y);       \
+     if ((scan_xp_[0] == scan_yp_[0])                          \
+        && (scan_xp_[1] == scan_yp_[1])                        \
+        && (scan_xp_[2] == scan_yp_[2]))                       \
+       goto TO; } while (0)
+
+#else
+#if FIRST_PSEUDO_REGISTER <= 4*HOST_BITS_PER_WIDE_INT
+#define CLEAR_HARD_REG_SET(TO)  \
+do { HARD_REG_ELT_TYPE *scan_tp_ = (TO);                       \
+     scan_tp_[0] = 0;                                          \
+     scan_tp_[1] = 0;                                          \
+     scan_tp_[2] = 0;                                          \
+     scan_tp_[3] = 0; } while (0)
+
+#define SET_HARD_REG_SET(TO)  \
+do { HARD_REG_ELT_TYPE *scan_tp_ = (TO);                       \
+     scan_tp_[0] = -1;                                         \
+     scan_tp_[1] = -1;                                         \
+     scan_tp_[2] = -1;                                         \
+     scan_tp_[3] = -1; } while (0)
+
+#define COPY_HARD_REG_SET(TO, FROM)  \
+do { HARD_REG_ELT_TYPE *scan_tp_ = (TO), *scan_fp_ = (FROM);   \
+     scan_tp_[0] = scan_fp_[0];                                        \
+     scan_tp_[1] = scan_fp_[1];                                        \
+     scan_tp_[2] = scan_fp_[2];                                        \
+     scan_tp_[3] = scan_fp_[3]; } while (0)
+
+#define COMPL_HARD_REG_SET(TO, FROM)  \
+do { HARD_REG_ELT_TYPE *scan_tp_ = (TO), *scan_fp_ = (FROM);   \
+     scan_tp_[0] = ~ scan_fp_[0];                              \
+     scan_tp_[1] = ~ scan_fp_[1];                              \
+     scan_tp_[2] = ~ scan_fp_[2];                              \
+     scan_tp_[3] = ~ scan_fp_[3]; } while (0)
+
+#define AND_HARD_REG_SET(TO, FROM)  \
+do { HARD_REG_ELT_TYPE *scan_tp_ = (TO), *scan_fp_ = (FROM);   \
+     scan_tp_[0] &= scan_fp_[0];                               \
+     scan_tp_[1] &= scan_fp_[1];                               \
+     scan_tp_[2] &= scan_fp_[2];                               \
+     scan_tp_[3] &= scan_fp_[3]; } while (0)
+
+#define AND_COMPL_HARD_REG_SET(TO, FROM)  \
+do { HARD_REG_ELT_TYPE *scan_tp_ = (TO), *scan_fp_ = (FROM);   \
+     scan_tp_[0] &= ~ scan_fp_[0];                             \
+     scan_tp_[1] &= ~ scan_fp_[1];                             \
+     scan_tp_[2] &= ~ scan_fp_[2];                             \
+     scan_tp_[3] &= ~ scan_fp_[3]; } while (0)
+
+#define IOR_HARD_REG_SET(TO, FROM)  \
+do { HARD_REG_ELT_TYPE *scan_tp_ = (TO), *scan_fp_ = (FROM);   \
+     scan_tp_[0] |= scan_fp_[0];                               \
+     scan_tp_[1] |= scan_fp_[1];                               \
+     scan_tp_[2] |= scan_fp_[2];                               \
+     scan_tp_[3] |= scan_fp_[3]; } while (0)
+
+#define IOR_COMPL_HARD_REG_SET(TO, FROM)  \
+do { HARD_REG_ELT_TYPE *scan_tp_ = (TO), *scan_fp_ = (FROM);   \
+     scan_tp_[0] |= ~ scan_fp_[0];                             \
+     scan_tp_[1] |= ~ scan_fp_[1];                             \
+     scan_tp_[2] |= ~ scan_fp_[2];                             \
+     scan_tp_[3] |= ~ scan_fp_[3]; } while (0)
+
+#define GO_IF_HARD_REG_SUBSET(X,Y,TO)  \
+do { HARD_REG_ELT_TYPE *scan_xp_ = (X), *scan_yp_ = (Y);       \
+     if ((0 == (scan_xp_[0] & ~ scan_yp_[0]))                  \
+        && (0 == (scan_xp_[1] & ~ scan_yp_[1]))                \
+        && (0 == (scan_xp_[2] & ~ scan_yp_[2]))                \
+        && (0 == (scan_xp_[3] & ~ scan_yp_[3])))               \
+       goto TO; } while (0)
+
+#define GO_IF_HARD_REG_EQUAL(X,Y,TO)  \
+do { HARD_REG_ELT_TYPE *scan_xp_ = (X), *scan_yp_ = (Y);       \
+     if ((scan_xp_[0] == scan_yp_[0])                          \
+        && (scan_xp_[1] == scan_yp_[1])                        \
+        && (scan_xp_[2] == scan_yp_[2])                        \
+        && (scan_xp_[3] == scan_yp_[3]))                       \
+       goto TO; } while (0)
+
+#else /* FIRST_PSEUDO_REGISTER > 3*HOST_BITS_PER_WIDE_INT */
+
+#define CLEAR_HARD_REG_SET(TO)  \
+do { HARD_REG_ELT_TYPE *scan_tp_ = (TO);                       \
+     int i;                                                    \
      for (i = 0; i < HARD_REG_SET_LONGS; i++)                  \
        *scan_tp_++ = 0; } while (0)
 
 #define SET_HARD_REG_SET(TO)  \
-do { register HARD_REG_ELT_TYPE *scan_tp_ = (TO);              \
-     register int i;                                           \
+do { HARD_REG_ELT_TYPE *scan_tp_ = (TO);                       \
+     int i;                                                    \
      for (i = 0; i < HARD_REG_SET_LONGS; i++)                  \
        *scan_tp_++ = -1; } while (0)
 
 #define COPY_HARD_REG_SET(TO, FROM)  \
-do { register HARD_REG_ELT_TYPE *scan_tp_ = (TO), *scan_fp_ = (FROM); \
-     register int i;                                           \
+do { HARD_REG_ELT_TYPE *scan_tp_ = (TO), *scan_fp_ = (FROM);   \
+     int i;                                                    \
      for (i = 0; i < HARD_REG_SET_LONGS; i++)                  \
        *scan_tp_++ = *scan_fp_++; } while (0)
 
 #define COMPL_HARD_REG_SET(TO, FROM)  \
-do { register HARD_REG_ELT_TYPE *scan_tp_ = (TO), *scan_fp_ = (FROM); \
-     register int i;                                           \
+do { HARD_REG_ELT_TYPE *scan_tp_ = (TO), *scan_fp_ = (FROM);   \
+     int i;                                                    \
      for (i = 0; i < HARD_REG_SET_LONGS; i++)                  \
        *scan_tp_++ = ~ *scan_fp_++; } while (0)
 
 #define AND_HARD_REG_SET(TO, FROM)  \
-do { register HARD_REG_ELT_TYPE *scan_tp_ = (TO), *scan_fp_ = (FROM); \
-     register int i;                                           \
+do { HARD_REG_ELT_TYPE *scan_tp_ = (TO), *scan_fp_ = (FROM);   \
+     int i;                                                    \
      for (i = 0; i < HARD_REG_SET_LONGS; i++)                  \
        *scan_tp_++ &= *scan_fp_++; } while (0)
 
 #define AND_COMPL_HARD_REG_SET(TO, FROM)  \
-do { register HARD_REG_ELT_TYPE *scan_tp_ = (TO), *scan_fp_ = (FROM); \
-     register int i;                                           \
+do { HARD_REG_ELT_TYPE *scan_tp_ = (TO), *scan_fp_ = (FROM);   \
+     int i;                                                    \
      for (i = 0; i < HARD_REG_SET_LONGS; i++)                  \
        *scan_tp_++ &= ~ *scan_fp_++; } while (0)
 
 #define IOR_HARD_REG_SET(TO, FROM)  \
-do { register HARD_REG_ELT_TYPE *scan_tp_ = (TO), *scan_fp_ = (FROM); \
-     register int i;                                           \
+do { HARD_REG_ELT_TYPE *scan_tp_ = (TO), *scan_fp_ = (FROM);   \
+     int i;                                                    \
      for (i = 0; i < HARD_REG_SET_LONGS; i++)                  \
        *scan_tp_++ |= *scan_fp_++; } while (0)
 
 #define IOR_COMPL_HARD_REG_SET(TO, FROM)  \
-do { register HARD_REG_ELT_TYPE *scan_tp_ = (TO), *scan_fp_ = (FROM); \
-     register int i;                                           \
+do { HARD_REG_ELT_TYPE *scan_tp_ = (TO), *scan_fp_ = (FROM);   \
+     int i;                                                    \
      for (i = 0; i < HARD_REG_SET_LONGS; i++)                  \
        *scan_tp_++ |= ~ *scan_fp_++; } while (0)
 
 #define GO_IF_HARD_REG_SUBSET(X,Y,TO)  \
-do { register HARD_REG_ELT_TYPE *scan_xp_ = (X), *scan_yp_ = (Y); \
-     register int i;                                           \
+do { HARD_REG_ELT_TYPE *scan_xp_ = (X), *scan_yp_ = (Y);       \
+     int i;                                                    \
      for (i = 0; i < HARD_REG_SET_LONGS; i++)                  \
        if (0 != (*scan_xp_++ & ~ *scan_yp_++)) break;          \
      if (i == HARD_REG_SET_LONGS) goto TO; } while (0)
 
 #define GO_IF_HARD_REG_EQUAL(X,Y,TO)  \
-do { register HARD_REG_ELT_TYPE *scan_xp_ = (X), *scan_yp_ = (Y); \
-     register int i;                                           \
+do { HARD_REG_ELT_TYPE *scan_xp_ = (X), *scan_yp_ = (Y);       \
+     int i;                                                    \
      for (i = 0; i < HARD_REG_SET_LONGS; i++)                  \
        if (*scan_xp_++ != *scan_yp_++) break;                  \
      if (i == HARD_REG_SET_LONGS) goto TO; } while (0)
 
 #endif
+#endif
+#endif
+#endif
 
 /* Define some standard sets of registers.  */
 
@@ -210,6 +409,9 @@ extern char call_used_regs[FIRST_PSEUDO_REGISTER];
 
 extern HARD_REG_SET call_used_reg_set;
   
+/* Registers that we don't want to caller save.  */
+extern HARD_REG_SET losing_caller_save_reg_set;
+
 /* Indexed by hard register number, contains 1 for registers that are
    fixed use -- i.e. in fixed_regs -- or a function value return register
    or STRUCT_VALUE_REGNUM or STATIC_CHAIN_REGNUM.  These are the
@@ -229,10 +431,23 @@ extern HARD_REG_SET call_fixed_reg_set;
 
 extern char global_regs[FIRST_PSEUDO_REGISTER];
 
+/* Contains 1 for registers that are set or clobbered by calls.  */
+/* ??? Ideally, this would be just call_used_regs plus global_regs, but
+   for someone's bright idea to have call_used_regs strictly include
+   fixed_regs.  Which leaves us guessing as to the set of fixed_regs
+   that are actually preserved.  We know for sure that those associated
+   with the local stack frame are safe, but scant others.  */
+
+extern HARD_REG_SET regs_invalidated_by_call;
+
+#ifdef REG_ALLOC_ORDER
 /* Table of register numbers in the order in which to try to use them.  */
 
-#ifdef REG_ALLOC_ORDER   /* Avoid undef symbol in certain broken linkers.  */
 extern int reg_alloc_order[FIRST_PSEUDO_REGISTER];
+
+/* The inverse of reg_alloc_order.  */
+
+extern int inv_reg_alloc_order[FIRST_PSEUDO_REGISTER];
 #endif
 
 /* For each reg class, a HARD_REG_SET saying which registers are in it.  */
@@ -241,7 +456,7 @@ extern HARD_REG_SET reg_class_contents[];
 
 /* For each reg class, number of regs it contains.  */
 
-extern int reg_class_size[N_REG_CLASSES];
+extern unsigned int reg_class_size[N_REG_CLASSES];
 
 /* For each reg class, table listing all the containing classes.  */
 
@@ -267,4 +482,6 @@ extern int n_non_fixed_regs;
 
 /* Vector indexed by hardware reg giving its name.  */
 
-extern char *reg_names[FIRST_PSEUDO_REGISTER];
+extern const char * reg_names[FIRST_PSEUDO_REGISTER];
+
+#endif /* ! GCC_HARD_REG_SET_H */