summaryrefslogtreecommitdiff
path: root/libguile
diff options
context:
space:
mode:
authorGreg J. Badros <gjb@cs.washington.edu>2000-03-02 23:14:28 +0000
committerGreg J. Badros <gjb@cs.washington.edu>2000-03-02 23:14:28 +0000
commit8507b88c001234be3013765d9f64c822fb62304c (patch)
tree276e955cbaaae46b90ca32c5153c3785891b340a /libguile
parent26a760c65e7eff4e8927b6d69190c7ba13ae7c8c (diff)
downloadguile-8507b88c001234be3013765d9f64c822fb62304c.tar.gz
* list.c: Added hand-written docs for `del{q,v,ete}1!'.
Diffstat (limited to 'libguile')
-rw-r--r--libguile/list.c13
1 files changed, 8 insertions, 5 deletions
diff --git a/libguile/list.c b/libguile/list.c
index eabd18cfc..fde37996d 100644
--- a/libguile/list.c
+++ b/libguile/list.c
@@ -699,7 +699,8 @@ SCM_DEFINE (scm_delete, "delete", 2, 0, 0,
SCM_DEFINE (scm_delq1_x, "delq1!", 2, 0, 0,
(SCM item, SCM lst),
- "")
+ "Like `delq!', but only deletes the first occurrence of ITEM from LST.\n"
+ "Tests for equality using `eq?'. See also `delv1!' and `delete1!'.")
#define FUNC_NAME s_scm_delq1_x
{
SCM walk;
@@ -724,8 +725,9 @@ SCM_DEFINE (scm_delq1_x, "delq1!", 2, 0, 0,
SCM_DEFINE (scm_delv1_x, "delv1!", 2, 0, 0,
- (SCM item, SCM lst),
- "")
+ (SCM item, SCM lst),
+ "Like `delv!', but only deletes the first occurrence of ITEM from LST.\n"
+ "Tests for equality using `eqv?'. See also `delq1!' and `delete1!'.")
#define FUNC_NAME s_scm_delv1_x
{
SCM walk;
@@ -750,8 +752,9 @@ SCM_DEFINE (scm_delv1_x, "delv1!", 2, 0, 0,
SCM_DEFINE (scm_delete1_x, "delete1!", 2, 0, 0,
- (SCM item, SCM lst),
- "")
+ (SCM item, SCM lst),
+ "Like `delete!', but only deletes the first occurrence of ITEM from LST.\n"
+ "Tests for equality using `equal?'. See also `delq1!' and `delv1!'.")
#define FUNC_NAME s_scm_delete1_x
{
SCM walk;