diff options
author | Dirk Herrmann <dirk@dirk-herrmanns-seiten.de> | 2002-01-10 21:11:22 +0000 |
---|---|---|
committer | Dirk Herrmann <dirk@dirk-herrmanns-seiten.de> | 2002-01-10 21:11:22 +0000 |
commit | 2493378052debba95dee60ac67a63df1707d40c5 (patch) | |
tree | 49e6eb3378f8a7181be1bbb0601e4e81503c73ee /libguile/srcprop.c | |
parent | f9450cdb14ae46e38b353c04ea549ede068e26f0 (diff) | |
download | guile-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.c | 2 |
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)); |