diff options
| author | Stefan Monnier | 2022-04-19 08:25:19 -0400 |
|---|---|---|
| committer | Stefan Monnier | 2022-04-19 08:25:19 -0400 |
| commit | 71005decb4fb447635d7b2367104dd18bdfa64ac (patch) | |
| tree | fc7e4a31bfaab4fa9a4fc269b0a2d027704b8773 /src/bytecode.c | |
| parent | 4478f915374a497ec20b51f873ed1b65f22c27dc (diff) | |
| download | emacs-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/bytecode.c')
| -rw-r--r-- | src/bytecode.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/bytecode.c b/src/bytecode.c index 62464986160..74b7d16affd 100644 --- a/src/bytecode.c +++ b/src/bytecode.c | |||
| @@ -325,7 +325,7 @@ If the third argument is incorrect, Emacs may crash. */) | |||
| 325 | the original unibyte form. */ | 325 | the original unibyte form. */ |
| 326 | bytestr = Fstring_as_unibyte (bytestr); | 326 | bytestr = Fstring_as_unibyte (bytestr); |
| 327 | } | 327 | } |
| 328 | Lisp_Object fun = CALLN (Fmake_byte_code, 0, bytestr, vector, maxdepth); | 328 | Lisp_Object fun = CALLN (Fmake_byte_code, Qnil, bytestr, vector, maxdepth); |
| 329 | return exec_byte_code (fun, 0, 0, NULL); | 329 | return exec_byte_code (fun, 0, 0, NULL); |
| 330 | } | 330 | } |
| 331 | 331 | ||