* srcprop.c (scm_source_property): Bugfix: Use SCM_NECONSP instead

of SCM_NCONSP.  (Thanks to Greg Badros.)

diff --git a/libguile/srcprop.c b/libguile/srcprop.c
index 40d854b..0b45f95 100644 (file)
--- a/libguile/srcprop.c
+++ b/libguile/srcprop.c
@@ -229,7 +229,7 @@ scm_source_property (obj, key)
   if (SCM_MEMOIZEDP (obj))
     obj = SCM_MEMOIZED_EXP (obj);
 #ifndef SCM_RECKLESS
-  else if (SCM_NCONSP (obj))
+  else if (SCM_NECONSP (obj))
     scm_wrong_type_arg (s_source_property, 1, obj);
 #endif
   p = scm_hashq_ref (scm_source_whash, obj, SCM_EOL);