From 0233bfc11b16178b4453fa941bf824270399c6a7 Mon Sep 17 00:00:00 2001 From: Stefan Jahn Date: Mon, 5 Nov 2001 21:12:33 +0000 Subject: [PATCH] 2001-11-05 Stefan Jahn * struct.c (s_scm_struct_vtable_p): Corrected docstring. --- libguile/ChangeLog | 4 ++++ libguile/struct.c | 4 ++-- 2 files changed, 6 insertions(+), 2 deletions(-) diff --git a/libguile/ChangeLog b/libguile/ChangeLog index e0c7f9996..e8ccfeabb 100644 --- a/libguile/ChangeLog +++ b/libguile/ChangeLog @@ -1,3 +1,7 @@ +2001-11-05 Stefan Jahn + + * struct.c (s_scm_struct_vtable_p): Corrected docstring. + 2001-11-04 Stefan Jahn * Makefile.am (libguile_la_LIBADD): Added $(THREAD_LIBS_LOCAL) diff --git a/libguile/struct.c b/libguile/struct.c index 37cc7422d..27eecebe4 100644 --- a/libguile/struct.c +++ b/libguile/struct.c @@ -240,7 +240,7 @@ scm_struct_init (SCM handle, SCM layout, scm_t_bits * mem, int tail_elts, SCM in SCM_DEFINE (scm_struct_p, "struct?", 1, 0, 0, (SCM x), - "Return @code{#t} iff @var{obj} is a structure object, else\n" + "Return @code{#t} iff @var{x} is a structure object, else\n" "@code{#f}.") #define FUNC_NAME s_scm_struct_p { @@ -250,7 +250,7 @@ SCM_DEFINE (scm_struct_p, "struct?", 1, 0, 0, SCM_DEFINE (scm_struct_vtable_p, "struct-vtable?", 1, 0, 0, (SCM x), - "Return @code{#t} iff obj is a vtable structure.") + "Return @code{#t} iff @var{x} is a vtable structure.") #define FUNC_NAME s_scm_struct_vtable_p { SCM layout; -- 2.20.1