From 0233bfc11b16178b4453fa941bf824270399c6a7 Mon Sep 17 00:00:00 2001 From: Stefan Jahn Date: Mon, 5 Nov 2001 21:12:33 +0000 Subject: 2001-11-05 Stefan Jahn * struct.c (s_scm_struct_vtable_p): Corrected docstring. --- libguile/struct.c | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'libguile/struct.c') 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; -- cgit v1.2.3