Commit ff55dfe8 authored by Paul Eggert's avatar Paul Eggert

Parenthesize macro bodies.

* lisp.h (XSETINT, XSETCONS, XSETVECTOR, XSETSTRING, XSETSYMBOL)
(XSETFLOAT, XSETMISC): Parenthesize.
parent 9b851e25
2012-09-10 Paul Eggert <eggert@cs.ucla.edu>
* lisp.h (XSETINT, XSETCONS, XSETVECTOR, XSETSTRING, XSETSYMBOL)
(XSETFLOAT, XSETMISC): Parenthesize macro bodies.
2012-09-09 Stefan Monnier <monnier@iro.umontreal.ca>
* lisp.h (make_lisp_ptr): New macro to replace XSET.
......
......@@ -554,16 +554,16 @@ clip_to_bounds (ptrdiff_t lower, EMACS_INT num, ptrdiff_t upper)
/* Construct a Lisp_Object from a value or address. */
#define XSETINT(a, b) (a) = make_number (b)
#define XSETCONS(a, b) (a) = make_lisp_ptr (b, Lisp_Cons)
#define XSETVECTOR(a, b) (a) = make_lisp_ptr (b, Lisp_Vectorlike)
#define XSETSTRING(a, b) (a) = make_lisp_ptr (b, Lisp_String)
#define XSETSYMBOL(a, b) (a) = make_lisp_ptr (b, Lisp_Symbol)
#define XSETFLOAT(a, b) (a) = make_lisp_ptr (b, Lisp_Float)
#define XSETINT(a, b) ((a) = make_number (b))
#define XSETCONS(a, b) ((a) = make_lisp_ptr (b, Lisp_Cons))
#define XSETVECTOR(a, b) ((a) = make_lisp_ptr (b, Lisp_Vectorlike))
#define XSETSTRING(a, b) ((a) = make_lisp_ptr (b, Lisp_String))
#define XSETSYMBOL(a, b) ((a) = make_lisp_ptr (b, Lisp_Symbol))
#define XSETFLOAT(a, b) ((a) = make_lisp_ptr (b, Lisp_Float))
/* Misc types. */
#define XSETMISC(a, b) (a) = make_lisp_ptr (b, Lisp_Misc)
#define XSETMISC(a, b) ((a) = make_lisp_ptr (b, Lisp_Misc))
#define XSETMARKER(a, b) (XSETMISC (a, b), XMISCTYPE (a) = Lisp_Misc_Marker)
/* Pseudovector types. */
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment