From 7e8b33d90609e7738a4cba6b69df7a0c532285b6 Mon Sep 17 00:00:00 2001 From: Torbjorn Granlund Date: Thu, 14 Jan 1993 19:34:47 +0000 Subject: (CONST_OK_FOR_LETTER_P): Change meaning of 'K'. (CONST_OK_FOR_LETTER_P): Change meaning of 'K'. Add new alternative 'N'. Use VAL_*_BITS_P macros when possible. (LEGITIMATE_CONSTANT_P) Fix comment. (FITS_14_BITS): Remove. (SMALL_INT): Remove. From-SVN: r3241 --- gcc/config/pa/pa.h | 25 ++++++++++++------------- 1 file changed, 12 insertions(+), 13 deletions(-) (limited to 'gcc') diff --git a/gcc/config/pa/pa.h b/gcc/config/pa/pa.h index 2a45a74..0e44427 100644 --- a/gcc/config/pa/pa.h +++ b/gcc/config/pa/pa.h @@ -590,18 +590,22 @@ HP-PA immediate field sizes: `I' is used for the 11 bit constants. `J' is used for the 14 bit constants. - `K' is used for unsigned 5 bit constants (extract/deposit operands). + `K' is used for values that can be moved with a zdepi insn. `L' is used for the 5 bit constants. - `M' is used for 0. */ + `M' is used for 0. + `N' is used for values with the least significant 11 bits equal to zero. + `O' is used for numbers n such that n+1 is a power of 2. + */ #define CONST_OK_FOR_LETTER_P(VALUE, C) \ - ((C) == 'I' ? (unsigned) ((VALUE) + 0x400) < 0x800 \ - : (C) == 'J' ? (unsigned) ((VALUE) + 0x2000) < 0x4000 \ - : (C) == 'K' ? (unsigned) (VALUE) < 0x20 \ - : (C) == 'L' ? (unsigned) ((VALUE) + 0x10) < 0x20 \ + ((C) == 'I' ? VAL_11_BITS_P (VALUE) \ + : (C) == 'J' ? VAL_14_BITS_P (VALUE) \ + : (C) == 'K' ? zdepi_cint_p (VALUE) \ + : (C) == 'L' ? VAL_5_BITS_P (VALUE) \ : (C) == 'M' ? (VALUE) == 0 \ + : (C) == 'N' ? ((VALUE) & 0x7ff) == 0 \ : (C) == 'O' ? (((VALUE) & ((VALUE) + 1)) == 0) \ - : (C) == 'P' ? consec_zeros_p (VALUE) \ + : (C) == 'P' ? and_mask_p (VALUE) \ : 0) /* Similar, but for floating constants, and defining letters G and H. @@ -1059,9 +1063,8 @@ extern union tree_node *current_function_decl; #define CONSTANT_ADDRESS_P(X) CONSTANT_P (X) /* Nonzero if the constant value X is a legitimate general operand. - It is given that X satisfies CONSTANT_P or is a CONST_DOUBLE. */ + It is given that X satisfies CONSTANT_P. */ -/*#define LEGITIMATE_CONSTANT_P(X) (1)*/ #define LEGITIMATE_CONSTANT_P(X) \ (GET_CODE (X) != CONST_DOUBLE) @@ -1163,9 +1166,6 @@ extern union tree_node *current_function_decl; #define VAL_14_BITS_P(X) ((unsigned)(X) + 0x2000 < 0x4000) #define INT_14_BITS(X) VAL_14_BITS_P (INTVAL (X)) -#define FITS_14_BITS(X) \ - (GET_CODE (X) == CONST_INT && INT_14_BITS (X)) - #define GO_IF_LEGITIMATE_ADDRESS(MODE, X, ADDR) \ { \ if ((REG_P (X) && REG_OK_FOR_BASE_P (X)) \ @@ -1805,7 +1805,6 @@ bss_section () \ }} -#define SMALL_INT(OP) INT_14_BITS (OP) /* Define functions in pa.c and used in insn-output.c. */ extern char *output_and (); -- cgit v1.1