diff options
| author | Andrea Corallo | 2019-12-27 17:02:23 +0100 |
|---|---|---|
| committer | Andrea Corallo | 2020-01-01 11:38:17 +0100 |
| commit | 1c08dc82121d50e80bd2dcb0d1f39654cc6762dd (patch) | |
| tree | 496bbf41061981375a32c9691b20ac4737f8f92e /src/data.c | |
| parent | f4cb9cc9034c09a8798df3d98f6fa9313a777a96 (diff) | |
| download | emacs-1c08dc82121d50e80bd2dcb0d1f39654cc6762dd.tar.gz emacs-1c08dc82121d50e80bd2dcb0d1f39654cc6762dd.zip | |
some rework to please --enable-check-lisp-object-type
Diffstat (limited to 'src/data.c')
| -rw-r--r-- | src/data.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/data.c b/src/data.c index 191fb313687..8901ffbb2c3 100644 --- a/src/data.c +++ b/src/data.c | |||
| @@ -919,7 +919,7 @@ Value, if non-nil, is a list (interactive SPEC). */) | |||
| 919 | 919 | ||
| 920 | if (SUBRP (fun)) | 920 | if (SUBRP (fun)) |
| 921 | { | 921 | { |
| 922 | if (SUBR_NATIVE_COMPILEDP (fun) && XSUBR (fun)->native_intspec) | 922 | if (SUBR_NATIVE_COMPILEDP (fun) && !NILP (XSUBR (fun)->native_intspec)) |
| 923 | return XSUBR (fun)->native_intspec; | 923 | return XSUBR (fun)->native_intspec; |
| 924 | 924 | ||
| 925 | const char *spec = XSUBR (fun)->intspec; | 925 | const char *spec = XSUBR (fun)->intspec; |