summaryrefslogtreecommitdiff
path: root/libguile/srcprop.c
diff options
context:
space:
mode:
authorDirk Herrmann <dirk@dirk-herrmanns-seiten.de>2002-01-10 21:11:22 +0000
committerDirk Herrmann <dirk@dirk-herrmanns-seiten.de>2002-01-10 21:11:22 +0000
commit2493378052debba95dee60ac67a63df1707d40c5 (patch)
tree49e6eb3378f8a7181be1bbb0601e4e81503c73ee /libguile/srcprop.c
parentf9450cdb14ae46e38b353c04ea549ede068e26f0 (diff)
downloadguile-2493378052debba95dee60ac67a63df1707d40c5.tar.gz
* eval.[ch] (scm_deval_args): Made static.
* srcprop.c (scm_source_property): Remove redundant SCM_IMP test. * strings.c (scm_c_string2str): Clarified comment. Replaced THINKME by FIXME for uniformness. Removed question about whether arguments need to be protected from garbage collection: Arguments must be protected as any other variable.
Diffstat (limited to 'libguile/srcprop.c')
-rw-r--r--libguile/srcprop.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/libguile/srcprop.c b/libguile/srcprop.c
index 651066135..48df4e6a6 100644
--- a/libguile/srcprop.c
+++ b/libguile/srcprop.c
@@ -222,7 +222,7 @@ SCM_DEFINE (scm_source_property, "source-property", 2, 0, 0,
SCM_WRONG_TYPE_ARG (1, obj);
#endif
p = scm_hashq_ref (scm_source_whash, obj, SCM_EOL);
- if (SCM_IMP (p) || !SRCPROPSP (p))
+ if (!SRCPROPSP (p))
goto plist;
if (SCM_EQ_P (scm_sym_breakpoint, key)) p = SRCPROPBRK (p);
else if (SCM_EQ_P (scm_sym_line, key)) p = SCM_MAKINUM (SRCPROPLINE (p));