diff options
| author | Karl Heuer | 1995-10-31 05:22:28 +0000 |
|---|---|---|
| committer | Karl Heuer | 1995-10-31 05:22:28 +0000 |
| commit | 5964b664538e9bf6937cc7187d810b8589b30e7f (patch) | |
| tree | aa07a019dcb84185e733bf4e08ac1c978fac530b /src | |
| parent | 2017bc3de90c0bf81bc2f25b3f9a33a2008d57dd (diff) | |
| download | emacs-5964b664538e9bf6937cc7187d810b8589b30e7f.tar.gz emacs-5964b664538e9bf6937cc7187d810b8589b30e7f.zip | |
(SHORTBITS, INTBITS, LONGBITS): Deleted; now in config.h
Used new names for those macros in all references.
Diffstat (limited to 'src')
| -rw-r--r-- | src/m/alpha.h | 11 | ||||
| -rw-r--r-- | src/m/convex.h | 11 | ||||
| -rw-r--r-- | src/m/hp800.h | 15 | ||||
| -rw-r--r-- | src/m/intel386.h | 19 | ||||
| -rw-r--r-- | src/m/iris4d.h | 15 | ||||
| -rw-r--r-- | src/m/iris5d.h | 15 | ||||
| -rw-r--r-- | src/m/mips-siemens.h | 17 | ||||
| -rw-r--r-- | src/m/mips.h | 17 |
8 files changed, 20 insertions, 100 deletions
diff --git a/src/m/alpha.h b/src/m/alpha.h index 459a00d8181..a820baf3d54 100644 --- a/src/m/alpha.h +++ b/src/m/alpha.h | |||
| @@ -28,14 +28,7 @@ NOTE-END | |||
| 28 | 28 | ||
| 29 | */ | 29 | */ |
| 30 | 30 | ||
| 31 | /* The following three symbols give information on | 31 | #define BITS_PER_LONG 64 |
| 32 | the size of various data types. */ | ||
| 33 | |||
| 34 | #define SHORTBITS 16 /* Number of bits in a short */ | ||
| 35 | |||
| 36 | #define INTBITS 32 /* Number of bits in an int */ | ||
| 37 | |||
| 38 | #define LONGBITS 64 /* Number of bits in a long */ | ||
| 39 | 32 | ||
| 40 | /* Define WORDS_BIG_ENDIAN iff lowest-numbered byte in a word | 33 | /* Define WORDS_BIG_ENDIAN iff lowest-numbered byte in a word |
| 41 | is the most significant byte. */ | 34 | is the most significant byte. */ |
| @@ -206,7 +199,7 @@ NOTE-END | |||
| 206 | 199 | ||
| 207 | /* Define XINT and XUINT so that they can take arguments of type int */ | 200 | /* Define XINT and XUINT so that they can take arguments of type int */ |
| 208 | 201 | ||
| 209 | #define XINT(a) (((long) (a) << (LONGBITS - VALBITS)) >> (LONGBITS - VALBITS)) | 202 | #define XINT(a) (((long) (a) << (BITS_PER_LONG - VALBITS)) >> (BITS_PER_LONG - VALBITS)) |
| 210 | #define XUINT(a) ((long) (a) & VALMASK) | 203 | #define XUINT(a) ((long) (a) & VALMASK) |
| 211 | 204 | ||
| 212 | /* Define XPNTR to avoid or'ing with DATA_SEG_BITS */ | 205 | /* Define XPNTR to avoid or'ing with DATA_SEG_BITS */ |
diff --git a/src/m/convex.h b/src/m/convex.h index 3f1bcaaeafa..4134b0c6cc8 100644 --- a/src/m/convex.h +++ b/src/m/convex.h | |||
| @@ -22,15 +22,6 @@ the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. */ | |||
| 22 | operating system this machine is likely to run. | 22 | operating system this machine is likely to run. |
| 23 | USUAL-OPSYS="bsd4-3" */ | 23 | USUAL-OPSYS="bsd4-3" */ |
| 24 | 24 | ||
| 25 | /* The following three symbols give information on | ||
| 26 | the size of various data types. */ | ||
| 27 | |||
| 28 | #define SHORTBITS 16 /* Number of bits in a short */ | ||
| 29 | |||
| 30 | #define INTBITS 32 /* Number of bits in an int */ | ||
| 31 | |||
| 32 | #define LONGBITS 32 /* Number of bits in a long */ | ||
| 33 | |||
| 34 | /* Define WORDS_BIG_ENDIAN iff lowest-numbered byte in a word | 25 | /* Define WORDS_BIG_ENDIAN iff lowest-numbered byte in a word |
| 35 | is the most significant byte. */ | 26 | is the most significant byte. */ |
| 36 | 27 | ||
| @@ -115,7 +106,7 @@ the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. */ | |||
| 115 | /* #define NO_REMAP */ | 106 | /* #define NO_REMAP */ |
| 116 | 107 | ||
| 117 | /* Addresses on the Convex have the high bit set. */ | 108 | /* Addresses on the Convex have the high bit set. */ |
| 118 | #define DATA_SEG_BITS (1 << (INTBITS-1)) | 109 | #define DATA_SEG_BITS (1 << (BITS_PER_INT-1)) |
| 119 | 110 | ||
| 120 | /* Right shift is logical shift. | 111 | /* Right shift is logical shift. |
| 121 | And the usual way of handling such machines, which involves | 112 | And the usual way of handling such machines, which involves |
diff --git a/src/m/hp800.h b/src/m/hp800.h index ea3f012d586..1c3439e1c03 100644 --- a/src/m/hp800.h +++ b/src/m/hp800.h | |||
| @@ -22,15 +22,6 @@ the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. */ | |||
| 22 | operating system this machine is likely to run. | 22 | operating system this machine is likely to run. |
| 23 | USUAL-OPSYS="hpux" */ | 23 | USUAL-OPSYS="hpux" */ |
| 24 | 24 | ||
| 25 | /* The following three symbols give information on | ||
| 26 | the size of various data types. */ | ||
| 27 | |||
| 28 | #define SHORTBITS 16 /* Number of bits in a short */ | ||
| 29 | |||
| 30 | #define INTBITS 32 /* Number of bits in an int */ | ||
| 31 | |||
| 32 | #define LONGBITS 32 /* Number of bits in a long */ | ||
| 33 | |||
| 34 | /* Define WORDS_BIG_ENDIAN iff lowest-numbered byte in a word | 25 | /* Define WORDS_BIG_ENDIAN iff lowest-numbered byte in a word |
| 35 | is the most significant byte. */ | 26 | is the most significant byte. */ |
| 36 | 27 | ||
| @@ -133,16 +124,16 @@ the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. */ | |||
| 133 | but these are faster because the constants are short. */ | 124 | but these are faster because the constants are short. */ |
| 134 | 125 | ||
| 135 | 126 | ||
| 136 | #define XUINT(a) (((unsigned)(a) << INTBITS-VALBITS) >> INTBITS-VALBITS) | 127 | #define XUINT(a) (((unsigned)(a) << BITS_PER_INT-VALBITS) >> BITS_PER_INT-VALBITS) |
| 137 | 128 | ||
| 138 | #define XSET(var, type, ptr) \ | 129 | #define XSET(var, type, ptr) \ |
| 139 | ((var) = ((int)(type) << VALBITS) + (((unsigned) (ptr) << INTBITS-VALBITS) >> INTBITS-VALBITS)) | 130 | ((var) = ((int)(type) << VALBITS) + (((unsigned) (ptr) << BITS_PER_INT-VALBITS) >> BITS_PER_INT-VALBITS)) |
| 140 | 131 | ||
| 141 | #define XMARKBIT(a) ((a) < 0) | 132 | #define XMARKBIT(a) ((a) < 0) |
| 142 | #define XSETMARKBIT(a,b) ((a) = ((b) ? (a)|MARKBIT : (a) & ~MARKBIT)) | 133 | #define XSETMARKBIT(a,b) ((a) = ((b) ? (a)|MARKBIT : (a) & ~MARKBIT)) |
| 143 | 134 | ||
| 144 | #if 0 /* Loses when sign bit of type field is set. */ | 135 | #if 0 /* Loses when sign bit of type field is set. */ |
| 145 | #define XUNMARK(a) ((a) = (((a) << INTBITS-GCTYPEBITS-VALBITS) >> INTBITS-GCTYPEBITS-VALBITS)) | 136 | #define XUNMARK(a) ((a) = (((a) << BITS_PER_INT-GCTYPEBITS-VALBITS) >> BITS_PER_INT-GCTYPEBITS-VALBITS)) |
| 146 | #endif | 137 | #endif |
| 147 | 138 | ||
| 148 | /* The symbol in the kernel where the load average is found | 139 | /* The symbol in the kernel where the load average is found |
diff --git a/src/m/intel386.h b/src/m/intel386.h index d7e489707cd..4b3ee844672 100644 --- a/src/m/intel386.h +++ b/src/m/intel386.h | |||
| @@ -48,25 +48,6 @@ Prime EXL (-machine=intel386 -opsystem=usg5-3) | |||
| 48 | Minor changes merged in 19.1. | 48 | Minor changes merged in 19.1. |
| 49 | NOTE-END */ | 49 | NOTE-END */ |
| 50 | 50 | ||
| 51 | /* The following three symbols give information on | ||
| 52 | the size of various data types. */ | ||
| 53 | |||
| 54 | |||
| 55 | /* Linux defines these in <values.h>, but they can't be used in #if's. | ||
| 56 | #include it now so we know we've overridden it once and for all. */ | ||
| 57 | #ifdef linux | ||
| 58 | #include <values.h> | ||
| 59 | #undef SHORTBITS | ||
| 60 | #undef INTBITS | ||
| 61 | #undef LONGBITS | ||
| 62 | #endif | ||
| 63 | |||
| 64 | #define SHORTBITS 16 /* Number of bits in a short */ | ||
| 65 | |||
| 66 | #define INTBITS 32 /* Number of bits in an int */ | ||
| 67 | |||
| 68 | #define LONGBITS 32 /* Number of bits in a long */ | ||
| 69 | |||
| 70 | /* Define WORDS_BIG_ENDIAN iff lowest-numbered byte in a word | 51 | /* Define WORDS_BIG_ENDIAN iff lowest-numbered byte in a word |
| 71 | is the most significant byte. */ | 52 | is the most significant byte. */ |
| 72 | 53 | ||
diff --git a/src/m/iris4d.h b/src/m/iris4d.h index 5996d0e5933..c10b859aac3 100644 --- a/src/m/iris4d.h +++ b/src/m/iris4d.h | |||
| @@ -18,15 +18,6 @@ along with GNU Emacs; see the file COPYING. If not, write to | |||
| 18 | the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. */ | 18 | the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. */ |
| 19 | 19 | ||
| 20 | 20 | ||
| 21 | /* The following three symbols give information on | ||
| 22 | the size of various data types. */ | ||
| 23 | |||
| 24 | #define SHORTBITS 16 /* Number of bits in a short */ | ||
| 25 | |||
| 26 | #define INTBITS 32 /* Number of bits in an int */ | ||
| 27 | |||
| 28 | #define LONGBITS 32 /* Number of bits in a long */ | ||
| 29 | |||
| 30 | /* Define WORDS_BIG_ENDIAN iff lowest-numbered byte in a word | 21 | /* Define WORDS_BIG_ENDIAN iff lowest-numbered byte in a word |
| 31 | is the most significant byte. */ | 22 | is the most significant byte. */ |
| 32 | 23 | ||
| @@ -177,14 +168,14 @@ the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. */ | |||
| 177 | /* The standard definitions of these macros would work ok, | 168 | /* The standard definitions of these macros would work ok, |
| 178 | but these are faster because the constants are short. */ | 169 | but these are faster because the constants are short. */ |
| 179 | 170 | ||
| 180 | #define XUINT(a) (((unsigned)(a) << INTBITS-VALBITS) >> INTBITS-VALBITS) | 171 | #define XUINT(a) (((unsigned)(a) << BITS_PER_INT-VALBITS) >> BITS_PER_INT-VALBITS) |
| 181 | 172 | ||
| 182 | #define XSET(var, type, ptr) \ | 173 | #define XSET(var, type, ptr) \ |
| 183 | ((var) = ((int)(type) << VALBITS) + (((unsigned) (ptr) << INTBITS-VALBITS) >> INTBITS-VALBITS)) | 174 | ((var) = ((int)(type) << VALBITS) + (((unsigned) (ptr) << BITS_PER_INT-VALBITS) >> BITS_PER_INT-VALBITS)) |
| 184 | 175 | ||
| 185 | #define XMARKBIT(a) ((a) < 0) | 176 | #define XMARKBIT(a) ((a) < 0) |
| 186 | #define XSETMARKBIT(a,b) ((a) = ((a) & ~MARKBIT) | ((b) ? MARKBIT : 0)) | 177 | #define XSETMARKBIT(a,b) ((a) = ((a) & ~MARKBIT) | ((b) ? MARKBIT : 0)) |
| 187 | #define XUNMARK(a) ((a) = (((unsigned)(a) << INTBITS-GCTYPEBITS-VALBITS) >> INTBITS-GCTYPEBITS-VALBITS)) | 178 | #define XUNMARK(a) ((a) = (((unsigned)(a) << BITS_PER_INT-GCTYPEBITS-VALBITS) >> BITS_PER_INT-GCTYPEBITS-VALBITS)) |
| 188 | 179 | ||
| 189 | #ifndef __GNUC__ | 180 | #ifndef __GNUC__ |
| 190 | /* Turn off some "helpful" error checks for type mismatches | 181 | /* Turn off some "helpful" error checks for type mismatches |
diff --git a/src/m/iris5d.h b/src/m/iris5d.h index 437a13e38fc..c52f04ca466 100644 --- a/src/m/iris5d.h +++ b/src/m/iris5d.h | |||
| @@ -22,15 +22,6 @@ the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. */ | |||
| 22 | operating system this machine is likely to run. | 22 | operating system this machine is likely to run. |
| 23 | USUAL-OPSYS="irix3-3" */ | 23 | USUAL-OPSYS="irix3-3" */ |
| 24 | 24 | ||
| 25 | /* The following three symbols give information on | ||
| 26 | the size of various data types. */ | ||
| 27 | |||
| 28 | #define SHORTBITS 16 /* Number of bits in a short */ | ||
| 29 | |||
| 30 | #define INTBITS 32 /* Number of bits in an int */ | ||
| 31 | |||
| 32 | #define LONGBITS 32 /* Number of bits in a long */ | ||
| 33 | |||
| 34 | /* Define WORDS_BIG_ENDIAN iff lowest-numbered byte in a word | 25 | /* Define WORDS_BIG_ENDIAN iff lowest-numbered byte in a word |
| 35 | is the most significant byte. */ | 26 | is the most significant byte. */ |
| 36 | 27 | ||
| @@ -177,14 +168,14 @@ the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. */ | |||
| 177 | /* The standard definitions of these macros would work ok, | 168 | /* The standard definitions of these macros would work ok, |
| 178 | but these are faster because the constants are short. */ | 169 | but these are faster because the constants are short. */ |
| 179 | 170 | ||
| 180 | #define XUINT(a) (((unsigned)(a) << INTBITS-VALBITS) >> INTBITS-VALBITS) | 171 | #define XUINT(a) (((unsigned)(a) << BITS_PER_INT-VALBITS) >> BITS_PER_INT-VALBITS) |
| 181 | 172 | ||
| 182 | #define XSET(var, type, ptr) \ | 173 | #define XSET(var, type, ptr) \ |
| 183 | ((var) = ((int)(type) << VALBITS) + (((unsigned) (ptr) << INTBITS-VALBITS) >> INTBITS-VALBITS)) | 174 | ((var) = ((int)(type) << VALBITS) + (((unsigned) (ptr) << BITS_PER_INT-VALBITS) >> BITS_PER_INT-VALBITS)) |
| 184 | 175 | ||
| 185 | #define XMARKBIT(a) ((a) < 0) | 176 | #define XMARKBIT(a) ((a) < 0) |
| 186 | #define XSETMARKBIT(a,b) ((a) = ((a) & ~MARKBIT) | ((b) ? MARKBIT : 0)) | 177 | #define XSETMARKBIT(a,b) ((a) = ((a) & ~MARKBIT) | ((b) ? MARKBIT : 0)) |
| 187 | #define XUNMARK(a) ((a) = (((unsigned)(a) << INTBITS-GCTYPEBITS-VALBITS) >> INTBITS-GCTYPEBITS-VALBITS)) | 178 | #define XUNMARK(a) ((a) = (((unsigned)(a) << BITS_PER_INT-GCTYPEBITS-VALBITS) >> BITS_PER_INT-GCTYPEBITS-VALBITS)) |
| 188 | 179 | ||
| 189 | #ifndef __GNUC__ | 180 | #ifndef __GNUC__ |
| 190 | /* Turn off some "helpful" error checks for type mismatches | 181 | /* Turn off some "helpful" error checks for type mismatches |
diff --git a/src/m/mips-siemens.h b/src/m/mips-siemens.h index 3ac87ae4ec9..5ba3db21431 100644 --- a/src/m/mips-siemens.h +++ b/src/m/mips-siemens.h | |||
| @@ -34,15 +34,6 @@ This is the m- file for SNI RM*00 machines. Use s- sinix5-4.h file! | |||
| 34 | With this the file mips-siemens.h is obsolete. | 34 | With this the file mips-siemens.h is obsolete. |
| 35 | NOTE-END */ | 35 | NOTE-END */ |
| 36 | 36 | ||
| 37 | /* The following three symbols give information on | ||
| 38 | the size of various data types. */ | ||
| 39 | |||
| 40 | #define SHORTBITS 16 /* Number of bits in a short */ | ||
| 41 | |||
| 42 | #define INTBITS 32 /* Number of bits in an int */ | ||
| 43 | |||
| 44 | #define LONGBITS 32 /* Number of bits in a long */ | ||
| 45 | |||
| 46 | /* Define BIG_ENDIAN iff lowest-numbered byte in a word | 37 | /* Define BIG_ENDIAN iff lowest-numbered byte in a word |
| 47 | is the most significant byte. */ | 38 | is the most significant byte. */ |
| 48 | 39 | ||
| @@ -177,12 +168,12 @@ NOTE-END */ | |||
| 177 | /* The standard definitions of these macros would work ok, | 168 | /* The standard definitions of these macros would work ok, |
| 178 | but these are faster because the constants are short. */ | 169 | but these are faster because the constants are short. */ |
| 179 | 170 | ||
| 180 | #define XUINT(a) (((unsigned)(a) << (INTBITS-VALBITS)) >> (INTBITS-VALBITS)) | 171 | #define XUINT(a) (((unsigned)(a) << (BITS_PER_INT-VALBITS)) >> (BITS_PER_INT-VALBITS)) |
| 181 | 172 | ||
| 182 | #define XSET(var, type, ptr) \ | 173 | #define XSET(var, type, ptr) \ |
| 183 | ((var) = \ | 174 | ((var) = \ |
| 184 | ((int)(type) << VALBITS) \ | 175 | ((int)(type) << VALBITS) \ |
| 185 | + (((unsigned) (ptr) << (INTBITS-VALBITS)) >> (INTBITS-VALBITS))) | 176 | + (((unsigned) (ptr) << (BITS_PER_INT-VALBITS)) >> (BITS_PER_INT-VALBITS))) |
| 186 | 177 | ||
| 187 | #define XSETINT(a, b) XSET(a, XTYPE(a), b) | 178 | #define XSETINT(a, b) XSET(a, XTYPE(a), b) |
| 188 | #define XSETUINT(a, b) XSET(a, XTYPE(a), b) | 179 | #define XSETUINT(a, b) XSET(a, XTYPE(a), b) |
| @@ -190,6 +181,6 @@ NOTE-END */ | |||
| 190 | 181 | ||
| 191 | #define XUNMARK(a) \ | 182 | #define XUNMARK(a) \ |
| 192 | ((a) = \ | 183 | ((a) = \ |
| 193 | (((unsigned)(a) << (INTBITS-GCTYPEBITS-VALBITS)) \ | 184 | (((unsigned)(a) << (BITS_PER_INT-GCTYPEBITS-VALBITS)) \ |
| 194 | >> (INTBITS-GCTYPEBITS-VALBITS))) | 185 | >> (BITS_PER_INT-GCTYPEBITS-VALBITS))) |
| 195 | 186 | ||
diff --git a/src/m/mips.h b/src/m/mips.h index 690a13b9eae..f24abde9901 100644 --- a/src/m/mips.h +++ b/src/m/mips.h | |||
| @@ -27,15 +27,6 @@ Use m-mips4.h for RISCOS version 4; use s-bsd4-3.h with the BSD world. | |||
| 27 | Note that the proper m- file for the Decstation is m-pmax.h. | 27 | Note that the proper m- file for the Decstation is m-pmax.h. |
| 28 | NOTE-END */ | 28 | NOTE-END */ |
| 29 | 29 | ||
| 30 | /* The following three symbols give information on | ||
| 31 | the size of various data types. */ | ||
| 32 | |||
| 33 | #define SHORTBITS 16 /* Number of bits in a short */ | ||
| 34 | |||
| 35 | #define INTBITS 32 /* Number of bits in an int */ | ||
| 36 | |||
| 37 | #define LONGBITS 32 /* Number of bits in a long */ | ||
| 38 | |||
| 39 | /* Define WORDS_BIG_ENDIAN iff lowest-numbered byte in a word | 30 | /* Define WORDS_BIG_ENDIAN iff lowest-numbered byte in a word |
| 40 | is the most significant byte. */ | 31 | is the most significant byte. */ |
| 41 | 32 | ||
| @@ -169,17 +160,17 @@ NOTE-END */ | |||
| 169 | /* The standard definitions of these macros would work ok, | 160 | /* The standard definitions of these macros would work ok, |
| 170 | but these are faster because the constants are short. */ | 161 | but these are faster because the constants are short. */ |
| 171 | 162 | ||
| 172 | #define XUINT(a) (((unsigned)(a) << (INTBITS-VALBITS)) >> (INTBITS-VALBITS)) | 163 | #define XUINT(a) (((unsigned)(a) << (BITS_PER_INT-VALBITS)) >> (BITS_PER_INT-VALBITS)) |
| 173 | 164 | ||
| 174 | #define XSET(var, type, ptr) \ | 165 | #define XSET(var, type, ptr) \ |
| 175 | ((var) = \ | 166 | ((var) = \ |
| 176 | ((int)(type) << VALBITS) \ | 167 | ((int)(type) << VALBITS) \ |
| 177 | + (((unsigned) (ptr) << (INTBITS-VALBITS)) >> (INTBITS-VALBITS))) | 168 | + (((unsigned) (ptr) << (BITS_PER_INT-VALBITS)) >> (BITS_PER_INT-VALBITS))) |
| 178 | 169 | ||
| 179 | #define XUNMARK(a) \ | 170 | #define XUNMARK(a) \ |
| 180 | ((a) = \ | 171 | ((a) = \ |
| 181 | (((unsigned)(a) << (INTBITS-GCTYPEBITS-VALBITS)) \ | 172 | (((unsigned)(a) << (BITS_PER_INT-GCTYPEBITS-VALBITS)) \ |
| 182 | >> (INTBITS-GCTYPEBITS-VALBITS))) | 173 | >> (BITS_PER_INT-GCTYPEBITS-VALBITS))) |
| 183 | 174 | ||
| 184 | #ifndef NEWSOS5 | 175 | #ifndef NEWSOS5 |
| 185 | #ifdef USG | 176 | #ifdef USG |