diff options
Diffstat (limited to 'src/lisp.h')
| -rw-r--r-- | src/lisp.h | 8 |
1 files changed, 2 insertions, 6 deletions
diff --git a/src/lisp.h b/src/lisp.h index 154f1ec5e5f..c023d5b4892 100644 --- a/src/lisp.h +++ b/src/lisp.h | |||
| @@ -510,13 +510,9 @@ static EMACS_INT const VALMASK | |||
| 510 | (XIL ((EMACS_INT) ((EMACS_UINT) (type) << VALBITS) \ | 510 | (XIL ((EMACS_INT) ((EMACS_UINT) (type) << VALBITS) \ |
| 511 | + ((intptr_t) (ptr) & VALMASK))) | 511 | + ((intptr_t) (ptr) & VALMASK))) |
| 512 | 512 | ||
| 513 | #if DATA_SEG_BITS | ||
| 514 | /* DATA_SEG_BITS forces extra bits to be or'd in with any pointers | 513 | /* DATA_SEG_BITS forces extra bits to be or'd in with any pointers |
| 515 | which were stored in a Lisp_Object. */ | 514 | which were stored in a Lisp_Object. */ |
| 516 | #define XPNTR(a) ((uintptr_t) ((XLI (a) & VALMASK)) | DATA_SEG_BITS)) | 515 | #define XPNTR(a) ((uintptr_t) ((XLI (a) & VALMASK)) | DATA_SEG_BITS)) |
| 517 | #else | ||
| 518 | #define XPNTR(a) ((uintptr_t) (XLI (a) & VALMASK)) | ||
| 519 | #endif | ||
| 520 | 516 | ||
| 521 | #endif /* not USE_LSB_TAG */ | 517 | #endif /* not USE_LSB_TAG */ |
| 522 | 518 | ||
| @@ -2962,7 +2958,7 @@ extern void message1 (const char *); | |||
| 2962 | extern void message1_nolog (const char *); | 2958 | extern void message1_nolog (const char *); |
| 2963 | extern void message3 (Lisp_Object); | 2959 | extern void message3 (Lisp_Object); |
| 2964 | extern void message3_nolog (Lisp_Object); | 2960 | extern void message3_nolog (Lisp_Object); |
| 2965 | extern void message_dolog (const char *, ptrdiff_t, int, int); | 2961 | extern void message_dolog (const char *, ptrdiff_t, bool, bool); |
| 2966 | extern void message_with_string (const char *, Lisp_Object, int); | 2962 | extern void message_with_string (const char *, Lisp_Object, int); |
| 2967 | extern void message_log_maybe_newline (void); | 2963 | extern void message_log_maybe_newline (void); |
| 2968 | extern void update_echo_area (void); | 2964 | extern void update_echo_area (void); |
| @@ -3344,7 +3340,7 @@ extern void record_unwind_save_match_data (void); | |||
| 3344 | struct re_registers; | 3340 | struct re_registers; |
| 3345 | extern struct re_pattern_buffer *compile_pattern (Lisp_Object, | 3341 | extern struct re_pattern_buffer *compile_pattern (Lisp_Object, |
| 3346 | struct re_registers *, | 3342 | struct re_registers *, |
| 3347 | Lisp_Object, int, int); | 3343 | Lisp_Object, int, bool); |
| 3348 | extern ptrdiff_t fast_string_match (Lisp_Object, Lisp_Object); | 3344 | extern ptrdiff_t fast_string_match (Lisp_Object, Lisp_Object); |
| 3349 | extern ptrdiff_t fast_c_string_match_ignore_case (Lisp_Object, const char *, | 3345 | extern ptrdiff_t fast_c_string_match_ignore_case (Lisp_Object, const char *, |
| 3350 | ptrdiff_t); | 3346 | ptrdiff_t); |