Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

Added tuple constructor function.

  • Loading branch information...
commit 025ba73dc448517b18a356e508e47c956efb7fc4 1 parent bec881c
Tomohiro Matsuyama authored
Showing with 5 additions and 0 deletions.
  1. +5 −0 src/lists.lisp
View
5 src/lists.lisp
@@ -97,6 +97,11 @@ Examples:
(typep '((:a . 1) (:b . 2)) '(association-list string)) => T"
`(proper-list (cons ,key-type ,value-type)))
+(defun tuple (&rest args)
+ "Exactly same as LIST."
+ (declare (optimize . #.*standard-optimize-qualities*))
+ args)
+
(defun tuplep (object)
"Returns true if OBJECT is a tuple, meaning a proper list.
Please sign in to comment.
Something went wrong with that request. Please try again.