diff options
| author | Paul Eggert <eggert@Penguin.CS.UCLA.EDU> | 2016-12-06 21:38:32 -0800 |
|---|---|---|
| committer | Paul Eggert <eggert@cs.ucla.edu> | 2016-12-06 21:40:38 -0800 |
| commit | f0870da2bb5eee848a5561fb58b2ec3a63861052 (patch) | |
| tree | 04e35afb3918dd711508b706520dedf342e929e7 /src/dbusbind.c | |
| parent | 2a3420d94206a97f094580e06c25af91d5949516 (diff) | |
| download | emacs-f0870da2bb5eee848a5561fb58b2ec3a63861052.tar.gz | |
Simplify FUNCTIONP implementation
* src/bytecode.c (exec_byte_code):
* src/image.c (parse_image_spec):
Prefer FUNCTIONP (x) to !NILP (Ffunctionp (x)).
* src/eval.c (FUNCTIONP): Move here ...
* src/lisp.h: ... from here. No longer inline, as that
bloats the text and does not help speed (at least on my platform).
(functionp): Remove this name, since callers use FUNCTIONP.
Diffstat (limited to 'src/dbusbind.c')
| -rw-r--r-- | src/dbusbind.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/dbusbind.c b/src/dbusbind.c index a0146a3bf53..23392d8dcc3 100644 --- a/src/dbusbind.c +++ b/src/dbusbind.c @@ -1309,7 +1309,7 @@ usage: (dbus-message-internal &rest REST) */) XD_DBUS_VALIDATE_PATH (path); XD_DBUS_VALIDATE_INTERFACE (interface); XD_DBUS_VALIDATE_MEMBER (member); - if (!NILP (handler) && (!FUNCTIONP (handler))) + if (!NILP (handler) && !FUNCTIONP (handler)) wrong_type_argument (Qinvalid_function, handler); } |