diff options
Diffstat (limited to 'src/bytecode.c')
| -rw-r--r-- | src/bytecode.c | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/src/bytecode.c b/src/bytecode.c index 868c0148d30..71ecdbf2cc0 100644 --- a/src/bytecode.c +++ b/src/bytecode.c @@ -809,8 +809,7 @@ exec_byte_code (Lisp_Object bytestr, Lisp_Object vector, Lisp_Object maxdepth, { Lisp_Object handler = POP; /* Support for a function here is new in 24.4. */ - record_unwind_protect ((NILP (Ffunctionp (handler)) - ? unwind_body : bcall0), + record_unwind_protect (FUNCTIONP (handler) ? bcall0 : unwind_body, handler); NEXT; } |