This is an automated email from the git hooks/post-receive script. It was generated because a ref change was pushed to the repository containing the project "CMU Common Lisp".

The branch, master has been updated via c3ec1280d301ba9af8b1492b51c5e015bfb1b3ef (commit) from 7243adb2da5a50c966fb9676f72caa1f20ed4116 (commit)

Those revisions listed above that are new to this repository have not appeared on any other notification email; so we list those revisions in full, below.

- Log ----------------------------------------------------------------- commit c3ec1280d301ba9af8b1492b51c5e015bfb1b3ef Author: Raymond Toy toy.raymond@gmail.com Date: Fri Oct 21 19:02:06 2011 -0700

Clean up docstrings of MAP<foo> to match the argument names.

diff --git a/code/list.lisp b/code/list.lisp index aa44acd..590564a 100644 --- a/code/list.lisp +++ b/code/list.lisp @@ -1056,27 +1056,32 @@

(defun mapc (function list &rest more-lists) - "Applies fn to successive elements of lists, returns its second argument." + "Applies Function to successive elements of each List, and returns + its second argument." (map1 function (cons list more-lists) nil t))

(defun mapcar (function list &rest more-lists) - "Applies fn to successive elements of list, returns list of results." + "Applies Function to successive elements of each List, and returns a + list of results." (map1 function (cons list more-lists) :list t))

(defun mapcan (function list &rest more-lists) - "Applies fn to successive elements of list, returns NCONC of results." + "Applies Function to successive elements of each List, and returns + NCONC of results." (map1 function (cons list more-lists) :nconc t))

(defun mapl (function list &rest more-lists) - "Applies fn to successive CDRs of list, returns ()." + "Applies Function to successive CDRs of each List, and returns ()." (map1 function (cons list more-lists) nil nil))

(defun maplist (function list &rest more-lists) - "Applies fn to successive CDRs of list, returns list of results." + "Applies Function to successive CDRs of each List, and returns list + of results." (map1 function (cons list more-lists) :list nil))

(defun mapcon (function list &rest more-lists) - "Applies fn to successive CDRs of lists, returns NCONC of results." + "Applies Function to successive CDRs of each List, and returns NCONC + of results." (map1 function (cons list more-lists) :nconc nil))

-----------------------------------------------------------------------

Summary of changes: code/list.lisp | 17 +++++++++++------ 1 files changed, 11 insertions(+), 6 deletions(-)

hooks/post-receive