aboutsummaryrefslogtreecommitdiffstats
path: root/src/alloc.c
diff options
context:
space:
mode:
authorStefan Monnier2022-04-19 08:25:19 -0400
committerStefan Monnier2022-04-19 08:25:19 -0400
commit71005decb4fb447635d7b2367104dd18bdfa64ac (patch)
treefc7e4a31bfaab4fa9a4fc269b0a2d027704b8773 /src/alloc.c
parent4478f915374a497ec20b51f873ed1b65f22c27dc (diff)
downloademacs-71005decb4fb447635d7b2367104dd18bdfa64ac.tar.gz
emacs-71005decb4fb447635d7b2367104dd18bdfa64ac.zip
Fix GCC warnings when CHECK_LISP_OBJECT_TYPE
* src/lisp.h (lisp_h_Qni): New macro. (DEFUN): Use it. * src/alloc.c (syms_of_alloc): Use it. * src/bytecode.c (Fbyte_code): Fix Lisp_Object/int mixup.
Diffstat (limited to 'src/alloc.c')
-rw-r--r--src/alloc.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/alloc.c b/src/alloc.c
index 4fc40445874..b9712859c38 100644
--- a/src/alloc.c
+++ b/src/alloc.c
@@ -7837,14 +7837,14 @@ N should be nonnegative. */);
7837 static union Aligned_Lisp_Subr Swatch_gc_cons_threshold = 7837 static union Aligned_Lisp_Subr Swatch_gc_cons_threshold =
7838 {{{ PSEUDOVECTOR_FLAG | (PVEC_SUBR << PSEUDOVECTOR_AREA_BITS) }, 7838 {{{ PSEUDOVECTOR_FLAG | (PVEC_SUBR << PSEUDOVECTOR_AREA_BITS) },
7839 { .a4 = watch_gc_cons_threshold }, 7839 { .a4 = watch_gc_cons_threshold },
7840 4, 4, "watch_gc_cons_threshold", {0}, 0}}; 7840 4, 4, "watch_gc_cons_threshold", {0}, lisp_h_Qnil}};
7841 XSETSUBR (watcher, &Swatch_gc_cons_threshold.s); 7841 XSETSUBR (watcher, &Swatch_gc_cons_threshold.s);
7842 Fadd_variable_watcher (Qgc_cons_threshold, watcher); 7842 Fadd_variable_watcher (Qgc_cons_threshold, watcher);
7843 7843
7844 static union Aligned_Lisp_Subr Swatch_gc_cons_percentage = 7844 static union Aligned_Lisp_Subr Swatch_gc_cons_percentage =
7845 {{{ PSEUDOVECTOR_FLAG | (PVEC_SUBR << PSEUDOVECTOR_AREA_BITS) }, 7845 {{{ PSEUDOVECTOR_FLAG | (PVEC_SUBR << PSEUDOVECTOR_AREA_BITS) },
7846 { .a4 = watch_gc_cons_percentage }, 7846 { .a4 = watch_gc_cons_percentage },
7847 4, 4, "watch_gc_cons_percentage", {0}, 0}}; 7847 4, 4, "watch_gc_cons_percentage", {0}, lisp_h_Qnil}};
7848 XSETSUBR (watcher, &Swatch_gc_cons_percentage.s); 7848 XSETSUBR (watcher, &Swatch_gc_cons_percentage.s);
7849 Fadd_variable_watcher (Qgc_cons_percentage, watcher); 7849 Fadd_variable_watcher (Qgc_cons_percentage, watcher);
7850} 7850}