summaryrefslogtreecommitdiff
path: root/list-functions-2.lisp
diff options
context:
space:
mode:
authorMatthias Andreas Benkard <matthias@benkard.de>2008-07-31 17:51:40 +0200
committerMatthias Andreas Benkard <matthias@benkard.de>2008-07-31 17:51:40 +0200
commit3ee58e9081354aed7bc45de457c0171aa78c613c (patch)
tree25bf7814372d7138bec5bd3ed47ad58cabc34591 /list-functions-2.lisp
parent64988d63eb7ff9f324395a03fc6a927b2639bb5e (diff)
Add PROG1, PROG2, NREVERSE, and ACONS.
Diffstat (limited to 'list-functions-2.lisp')
-rw-r--r--list-functions-2.lisp6
1 files changed, 6 insertions, 0 deletions
diff --git a/list-functions-2.lisp b/list-functions-2.lisp
index 09c8449..9bdb53e 100644
--- a/list-functions-2.lisp
+++ b/list-functions-2.lisp
@@ -115,3 +115,9 @@
(defun mapcon (function list &rest more-lists)
(%append (apply 'maplist (list* function list more-lists))))
+
+(defun nreverse (list)
+ (reverse list))
+
+(defun acons (indicator value alist)
+ (cons (cons indicator value) alist))