[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] emacs-25 9f0d19f: Fix unoptimized builds
From: |
Eli Zaretskii |
Subject: |
[Emacs-diffs] emacs-25 9f0d19f: Fix unoptimized builds |
Date: |
Sun, 22 Nov 2015 18:19:53 +0000 |
branch: emacs-25
commit 9f0d19f24cd455765123a378a5e2f3e505cbb5ac
Author: Eli Zaretskii <address@hidden>
Commit: Eli Zaretskii <address@hidden>
Fix unoptimized builds
* src/lisp.h (XTYPE): Move before XSYMBOL, to fix unoptimized
builds.
---
src/lisp.h | 16 ++++++++--------
1 files changed, 8 insertions(+), 8 deletions(-)
diff --git a/src/lisp.h b/src/lisp.h
index 9af13a8..4bf7f38 100644
--- a/src/lisp.h
+++ b/src/lisp.h
@@ -921,6 +921,14 @@ XFASTINT (Lisp_Object a)
return n;
}
+/* Extract A's type. */
+INLINE enum Lisp_Type
+XTYPE (Lisp_Object a)
+{
+ EMACS_UINT i = XLI (a);
+ return USE_LSB_TAG ? i & ~VALMASK : i >> VALBITS;
+}
+
/* Extract A's value as a symbol. */
INLINE struct Lisp_Symbol *
XSYMBOL (Lisp_Object a)
@@ -931,14 +939,6 @@ XSYMBOL (Lisp_Object a)
return p;
}
-/* Extract A's type. */
-INLINE enum Lisp_Type
-XTYPE (Lisp_Object a)
-{
- EMACS_UINT i = XLI (a);
- return USE_LSB_TAG ? i & ~VALMASK : i >> VALBITS;
-}
-
/* Extract A's pointer value, assuming A's type is TYPE. */
INLINE void *
XUNTAG (Lisp_Object a, int type)
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [Emacs-diffs] emacs-25 9f0d19f: Fix unoptimized builds,
Eli Zaretskii <=