diff options
| author | Paul Eggert | 2016-12-06 21:38:32 -0800 |
|---|---|---|
| committer | Paul Eggert | 2016-12-06 21:40:38 -0800 |
| commit | f0870da2bb5eee848a5561fb58b2ec3a63861052 (patch) | |
| tree | 04e35afb3918dd711508b706520dedf342e929e7 /src/dbusbind.c | |
| parent | 2a3420d94206a97f094580e06c25af91d5949516 (diff) | |
| download | emacs-f0870da2bb5eee848a5561fb58b2ec3a63861052.tar.gz emacs-f0870da2bb5eee848a5561fb58b2ec3a63861052.zip | |
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) */) | |||
| 1309 | XD_DBUS_VALIDATE_PATH (path); | 1309 | XD_DBUS_VALIDATE_PATH (path); |
| 1310 | XD_DBUS_VALIDATE_INTERFACE (interface); | 1310 | XD_DBUS_VALIDATE_INTERFACE (interface); |
| 1311 | XD_DBUS_VALIDATE_MEMBER (member); | 1311 | XD_DBUS_VALIDATE_MEMBER (member); |
| 1312 | if (!NILP (handler) && (!FUNCTIONP (handler))) | 1312 | if (!NILP (handler) && !FUNCTIONP (handler)) |
| 1313 | wrong_type_argument (Qinvalid_function, handler); | 1313 | wrong_type_argument (Qinvalid_function, handler); |
| 1314 | } | 1314 | } |
| 1315 | 1315 | ||