From 4c27f8d23b64a11142e3b909e61d313b52f4900b Mon Sep 17 00:00:00 2001 From: Han-Wen Nienhuys Date: Wed, 2 Jul 2003 16:11:08 +0000 Subject: [PATCH] (SCM_ASRTGO): add "else" to macro expansions with if clauses. --- libguile/ChangeLog | 5 +++++ libguile/__scm.h | 6 +++--- 2 files changed, 8 insertions(+), 3 deletions(-) diff --git a/libguile/ChangeLog b/libguile/ChangeLog index bbf8250ca..6d90004e3 100644 --- a/libguile/ChangeLog +++ b/libguile/ChangeLog @@ -1,3 +1,8 @@ +2003-07-02 Han-Wen Nienhuys + + * __scm.h (SCM_ASRTGO): add "else" to macro expansions with if + clauses. + 2003-06-29 Marius Vollmer * deprecated.h (SCM_OPDIRP, scm_fport, scm_option, scm_srcprops, diff --git a/libguile/__scm.h b/libguile/__scm.h index 94113496b..770d88892 100644 --- a/libguile/__scm.h +++ b/libguile/__scm.h @@ -492,13 +492,13 @@ do { \ #else #define SCM_ASSERT(_cond, _arg, _pos, _subr) \ if (!(_cond)) \ - scm_wrong_type_arg (_subr, _pos, _arg) + scm_wrong_type_arg (_subr, _pos, _arg); else #define SCM_ASSERT_TYPE(_cond, _arg, _pos, _subr, _msg) \ if (!(_cond)) \ - scm_wrong_type_arg_msg(_subr, _pos, _arg, _msg) + scm_wrong_type_arg_msg(_subr, _pos, _arg, _msg); else #define SCM_ASRTGO(_cond, _label) \ if (!(_cond)) \ - goto _label + goto _label; else #endif /* -- 2.20.1