Lisp_Object/int mixup.

[bpt/emacs.git] / src / data.c

diff --git a/src/data.c b/src/data.c
index 9268d04..bff2baa 100644 (file)
--- a/src/data.c
+++ b/src/data.c
@@ -2889,7 +2889,7 @@ lowercase l) for small endian machines.  */)
   unsigned i = 0x04030201;
   int order = *(char *)&i == 4 ? 66 : 108;
 
-  return XFASTINT (order);
+  return make_number (order);
 }