emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] /srv/bzr/emacs/trunk r109964: Parenthesize macro bodies.


From: Paul Eggert
Subject: [Emacs-diffs] /srv/bzr/emacs/trunk r109964: Parenthesize macro bodies.
Date: Sun, 09 Sep 2012 18:17:23 -0700
User-agent: Bazaar (2.5.0)

------------------------------------------------------------
revno: 109964
committer: Paul Eggert <address@hidden>
branch nick: trunk
timestamp: Sun 2012-09-09 18:17:23 -0700
message:
  Parenthesize macro bodies.
  
  * lisp.h (XSETINT, XSETCONS, XSETVECTOR, XSETSTRING, XSETSYMBOL)
  (XSETFLOAT, XSETMISC): Parenthesize.
modified:
  src/ChangeLog
  src/lisp.h
=== modified file 'src/ChangeLog'
--- a/src/ChangeLog     2012-09-09 21:24:04 +0000
+++ b/src/ChangeLog     2012-09-10 01:17:23 +0000
@@ -1,3 +1,8 @@
+2012-09-10  Paul Eggert  <address@hidden>
+
+       * lisp.h (XSETINT, XSETCONS, XSETVECTOR, XSETSTRING, XSETSYMBOL)
+       (XSETFLOAT, XSETMISC): Parenthesize macro bodies.
+
 2012-09-09  Stefan Monnier  <address@hidden>
 
        * lisp.h (make_lisp_ptr): New macro to replace XSET.

=== modified file 'src/lisp.h'
--- a/src/lisp.h        2012-09-09 21:24:04 +0000
+++ b/src/lisp.h        2012-09-10 01:17:23 +0000
@@ -554,16 +554,16 @@
 
 /* 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.  */


reply via email to

[Prev in Thread] Current Thread [Next in Thread]