guile/guile-core/libguile eval.c

[Marius Vollmer]

CVSROOT:        /cvs
Module name:    guile
Changes by:     Marius Vollmer <address@hidden> 01/07/25 15:01:27

Modified files:
        guile-core/libguile: eval.c 

Log message:
        (scm_ceval, scm_deval): Use "RETURN" macro when returning value of a
        variable, not the plain "return" statement.

CVSWeb URLs:
http://savannah.gnu.org/cgi-bin/viewcvs/guile/guile-core/libguile/eval.c.diff?cvsroot=OldCVS&tr1=1.236&tr2=1.237&r1=text&r2=text

Patches:
Index: guile/guile-core/libguile/eval.c
diff -u guile/guile-core/libguile/eval.c:1.236 
guile/guile-core/libguile/eval.c:1.237
--- guile/guile-core/libguile/eval.c:1.236      Wed Jul 25 14:03:28 2001
+++ guile/guile-core/libguile/eval.c    Wed Jul 25 15:01:27 2001
@@ -2560,7 +2560,7 @@
       RETURN (x);
 
     case scm_tc7_variable:
-      return SCM_VARIABLE_REF(x);
+      RETURN (SCM_VARIABLE_REF(x));
 
 #ifdef MEMOIZE_LOCALS
     case SCM_BIT8(SCM_ILOC00):