diff options
Diffstat (limited to 'src/lisp.h')
| -rw-r--r-- | src/lisp.h | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/src/lisp.h b/src/lisp.h index 44c2b087caf..240e8c08a87 100644 --- a/src/lisp.h +++ b/src/lisp.h | |||
| @@ -554,16 +554,16 @@ clip_to_bounds (ptrdiff_t lower, EMACS_INT num, ptrdiff_t upper) | |||
| 554 | 554 | ||
| 555 | /* Construct a Lisp_Object from a value or address. */ | 555 | /* Construct a Lisp_Object from a value or address. */ |
| 556 | 556 | ||
| 557 | #define XSETINT(a, b) (a) = make_number (b) | 557 | #define XSETINT(a, b) ((a) = make_number (b)) |
| 558 | #define XSETCONS(a, b) (a) = make_lisp_ptr (b, Lisp_Cons) | 558 | #define XSETCONS(a, b) ((a) = make_lisp_ptr (b, Lisp_Cons)) |
| 559 | #define XSETVECTOR(a, b) (a) = make_lisp_ptr (b, Lisp_Vectorlike) | 559 | #define XSETVECTOR(a, b) ((a) = make_lisp_ptr (b, Lisp_Vectorlike)) |
| 560 | #define XSETSTRING(a, b) (a) = make_lisp_ptr (b, Lisp_String) | 560 | #define XSETSTRING(a, b) ((a) = make_lisp_ptr (b, Lisp_String)) |
| 561 | #define XSETSYMBOL(a, b) (a) = make_lisp_ptr (b, Lisp_Symbol) | 561 | #define XSETSYMBOL(a, b) ((a) = make_lisp_ptr (b, Lisp_Symbol)) |
| 562 | #define XSETFLOAT(a, b) (a) = make_lisp_ptr (b, Lisp_Float) | 562 | #define XSETFLOAT(a, b) ((a) = make_lisp_ptr (b, Lisp_Float)) |
| 563 | 563 | ||
| 564 | /* Misc types. */ | 564 | /* Misc types. */ |
| 565 | 565 | ||
| 566 | #define XSETMISC(a, b) (a) = make_lisp_ptr (b, Lisp_Misc) | 566 | #define XSETMISC(a, b) ((a) = make_lisp_ptr (b, Lisp_Misc)) |
| 567 | #define XSETMARKER(a, b) (XSETMISC (a, b), XMISCTYPE (a) = Lisp_Misc_Marker) | 567 | #define XSETMARKER(a, b) (XSETMISC (a, b), XMISCTYPE (a) = Lisp_Misc_Marker) |
| 568 | 568 | ||
| 569 | /* Pseudovector types. */ | 569 | /* Pseudovector types. */ |