guile/guile-core/libguile eval.h

[Marius Vollmer]

CVSROOT:        /cvs
Module name:    guile
Changes by:     Marius Vollmer <address@hidden> 01/05/20 16:38:36

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

Log message:
        (SCM_EVALIM2): Use SCM_EQ_P instead of `=='.

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

Patches:
Index: guile/guile-core/libguile/eval.h
diff -u guile/guile-core/libguile/eval.h:1.53 
guile/guile-core/libguile/eval.h:1.54
--- guile/guile-core/libguile/eval.h:1.53       Tue May 15 07:57:21 2001
+++ guile/guile-core/libguile/eval.h    Sun May 20 16:38:36 2001
@@ -95,7 +95,7 @@
  *
  * For an explanation of symbols containing "EVAL", see beginning of eval.c.
  */
-#define SCM_EVALIM2(x) (((x) == SCM_EOL) \
+#define SCM_EVALIM2(x) ((SCM_EQ_P ((x), SCM_EOL)) \
                        ? scm_misc_error (NULL, scm_s_expression, SCM_EOL), 0 \
                        : (x))
 #ifdef MEMOIZE_LOCALS