Fix unoptimized builds

* src/lisp.h (XTYPE): Move before XSYMBOL, to fix unoptimized
builds.
This commit is contained in:
Eli Zaretskii 2015-11-22 20:19:13 +02:00
parent 2a4362ba62
commit 9f0d19f24c

View file

@ -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)