diff --git a/THANKS b/THANKS index 4f32c7f24..e5e9cbbb0 100644 --- a/THANKS +++ b/THANKS @@ -15,6 +15,7 @@ For fixes or providing information which led to a fix: Lars J. Aas Ian Bicking George Caswell + Chris Cramer I. N. Golubev Brad Knotwell Matthias Köppe diff --git a/libguile/ChangeLog b/libguile/ChangeLog index 5b73ff0f0..47ee02b89 100644 --- a/libguile/ChangeLog +++ b/libguile/ChangeLog @@ -1,3 +1,8 @@ +2001-01-16 Dirk Herrmann + + * symbols.c (scm_symbol_bound_p): Fixed comment. + Thanks to Chris Cramer. + 2001-01-15 Dirk Herrmann * smob.[ch] (scm_make_smob_type): Return type is scm_bits_t now. diff --git a/libguile/symbols.c b/libguile/symbols.c index 779369748..a212b3126 100644 --- a/libguile/symbols.c +++ b/libguile/symbols.c @@ -633,7 +633,7 @@ SCM_DEFINE (scm_symbol_bound_p, "symbol-bound?", 2, 0, 0, (SCM o, SCM s), "Return @var{#t} if @var{obarray} contains a symbol with name\n" "@var{string} bound to a defined value. This differs from\n" - "@var{symbol-bound?} in that the mere mention of a symbol usually causes\n" + "@var{symbol-interned?} in that the mere mention of a symbol usually causes\n" "it to be interned; @code{symbol-bound?} determines whether a symbol has\n" "been given any meaningful value.") #define FUNC_NAME s_scm_symbol_bound_p