From b9d9a9b9fef090d0fc79781df5e42d58fd2e5bfa Mon Sep 17 00:00:00 2001 From: Gerd Moellmann Date: Wed, 31 Oct 2001 10:58:35 +0000 Subject: [PATCH] (require_unwind): Return Lisp_Object. --- src/ChangeLog | 4 ++++ src/fns.c | 3 ++- 2 files changed, 6 insertions(+), 1 deletion(-) diff --git a/src/ChangeLog b/src/ChangeLog index 04042fab40b..98c2e0d87c5 100644 --- a/src/ChangeLog +++ b/src/ChangeLog @@ -1,3 +1,7 @@ +2001-10-31 Gerd Moellmann + + * fns.c (require_unwind): Return Lisp_Object. + 2001-10-31 Pavel Jan,Bm(Bk * keyboard.c (lucid-menu-bar-dirty-flag): Doc fix. diff --git a/src/fns.c b/src/fns.c index 62f9d85682c..15415d9a1ad 100644 --- a/src/fns.c +++ b/src/fns.c @@ -3082,10 +3082,11 @@ particular subfeatures supported in this version of FEATURE. */) Lisp_Object require_nesting_list; +Lisp_Object require_unwind (old_value) Lisp_Object old_value; { - require_nesting_list = old_value; + return require_nesting_list = old_value; } DEFUN ("require", Frequire, Srequire, 1, 3, 0, -- 2.39.2