mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-13 07:10:20 +02:00
Code Activity

* eval.c (s_scm_copy_tree): idem.

Browse source 
* list.c (s_scm_filter): remove "pointer" from doc string.
This commit is contained in:
Han-Wen Nienhuys 2004-03-28 13:57:19 +00:00
parent 702551e6cc
commit bfefbf18db
3 changed files with 6 additions and 2 deletions
Download patch file Download diff file Expand all files Collapse all files

4
libguile/ChangeLog
View file

@ -1,5 +1,9 @@
2004-03-28 Han-Wen Nienhuys <hanwen@xs4all.nl> 2004-03-28 Han-Wen Nienhuys <hanwen@xs4all.nl>
* eval.c (s_scm_copy_tree): idem.
* list.c (s_scm_filter): remove "pointer" from doc string.
* gc.h (SCM_GC_CELL_TYPE): SCM_GC_CELL_TYPE uses SCM_GC_CELL_OBJECT. * gc.h (SCM_GC_CELL_TYPE): SCM_GC_CELL_TYPE uses SCM_GC_CELL_OBJECT.
* goops.h (SCM_NUMBER_OF_SLOTS): don't SCM_UNPACK the result. * goops.h (SCM_NUMBER_OF_SLOTS): don't SCM_UNPACK the result.

2
libguile/eval.c
View file

@ -5462,7 +5462,7 @@ copy_tree (
SCM_DEFINE (scm_copy_tree, "copy-tree", 1, 0, 0, SCM_DEFINE (scm_copy_tree, "copy-tree", 1, 0, 0,
(SCM obj), (SCM obj),
"Recursively copy the data tree that is bound to @var{obj}, and return a\n" "Recursively copy the data tree that is bound to @var{obj}, and return a\n"
"pointer to the new data structure. @code{copy-tree} recurses down the\n" "the new data structure. @code{copy-tree} recurses down the\n"
"contents of both pairs and vectors (since both cons cells and vector\n" "contents of both pairs and vectors (since both cons cells and vector\n"
"cells may point to arbitrary objects), and stops recursing when it hits\n" "cells may point to arbitrary objects), and stops recursing when it hits\n"
"any other object.") "any other object.")

2
libguile/list.c
View file

@ -614,7 +614,7 @@ SCM_DEFINE (scm_delq_x, "delq!", 2, 0, 0,
"@deffnx {Scheme Procedure} delv! item lst\n" "@deffnx {Scheme Procedure} delv! item lst\n"
"@deffnx {Scheme Procedure} delete! item lst\n" "@deffnx {Scheme Procedure} delete! item lst\n"
"These procedures are destructive versions of @code{delq}, @code{delv}\n" "These procedures are destructive versions of @code{delq}, @code{delv}\n"
"and @code{delete}: they modify the pointers in the existing @var{lst}\n" "and @code{delete}: they modify the existing @var{lst}\n"
"rather than creating a new list. Caveat evaluator: Like other\n" "rather than creating a new list. Caveat evaluator: Like other\n"
"destructive list functions, these functions cannot modify the binding of\n" "destructive list functions, these functions cannot modify the binding of\n"
"@var{lst}, and so cannot be used to delete the first element of\n" "@var{lst}, and so cannot be used to delete the first element of\n"