aboutsummaryrefslogtreecommitdiffstats
path: root/src/lisp.h
diff options
context:
space:
mode:
authorTom Tromey2018-07-08 09:31:13 -0600
committerTom Tromey2018-07-12 22:12:28 -0600
commit45eb3b3513619d97d046a8efbe0d16fafc75a734 (patch)
tree1a5d9a2eebfbdf040c45d7b0874b6b56b52110b3 /src/lisp.h
parent27980e36040d0693fe997de6b6b73c09c3ce1cb5 (diff)
downloademacs-45eb3b3513619d97d046a8efbe0d16fafc75a734.tar.gz
emacs-45eb3b3513619d97d046a8efbe0d16fafc75a734.zip
Use fixnump rather than integerp in some spots
* src/buffer.c (syms_of_buffer): Use Qfixnump, not Qintegerp. * src/data.c (syms_of_data): Define fixnump symbol. * src/lisp.h (lisp_h_CHECK_FIXNUM): Use Qfixnump. (struct Lisp_Buffer_Objfwd): Update comment.
Diffstat (limited to 'src/lisp.h')
-rw-r--r--src/lisp.h4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/lisp.h b/src/lisp.h
index 846e955d3af..e046429c1b1 100644
--- a/src/lisp.h
+++ b/src/lisp.h
@@ -357,7 +357,7 @@ typedef EMACS_INT Lisp_Word;
357# endif 357# endif
358#endif 358#endif
359 359
360#define lisp_h_CHECK_FIXNUM(x) CHECK_TYPE (FIXNUMP (x), Qintegerp, x) 360#define lisp_h_CHECK_FIXNUM(x) CHECK_TYPE (FIXNUMP (x), Qfixnump, x)
361#define lisp_h_CHECK_SYMBOL(x) CHECK_TYPE (SYMBOLP (x), Qsymbolp, x) 361#define lisp_h_CHECK_SYMBOL(x) CHECK_TYPE (SYMBOLP (x), Qsymbolp, x)
362#define lisp_h_CHECK_TYPE(ok, predicate, x) \ 362#define lisp_h_CHECK_TYPE(ok, predicate, x) \
363 ((ok) ? (void) 0 : wrong_type_argument (predicate, x)) 363 ((ok) ? (void) 0 : wrong_type_argument (predicate, x))
@@ -2590,7 +2590,7 @@ struct Lisp_Buffer_Objfwd
2590 { 2590 {
2591 enum Lisp_Fwd_Type type; /* = Lisp_Fwd_Buffer_Obj */ 2591 enum Lisp_Fwd_Type type; /* = Lisp_Fwd_Buffer_Obj */
2592 int offset; 2592 int offset;
2593 /* One of Qnil, Qintegerp, Qsymbolp, Qstringp, Qfloatp or Qnumberp. */ 2593 /* One of Qnil, Qfixnump, Qsymbolp, Qstringp, Qfloatp or Qnumberp. */
2594 Lisp_Object predicate; 2594 Lisp_Object predicate;
2595 }; 2595 };
2596 2596