From e9dcba06bb5818d7b7b3f9c63e09d30070109fca Mon Sep 17 00:00:00 2001 From: Aryadev Chavali Date: Fri, 21 Feb 2025 13:59:13 +0000 Subject: Add unit tests for lib.functions.take --- lib/functions.lisp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'lib/functions.lisp') diff --git a/lib/functions.lisp b/lib/functions.lisp index 40e940a..dd9976d 100644 --- a/lib/functions.lisp +++ b/lib/functions.lisp @@ -27,7 +27,7 @@ each member is STEP distance apart." (loop :for i :from start :to (1- end) :by step :collect i))) -(fn take (n lst) (-> (fixnum list) list) +(fn take (n lst) (-> (fixnum sequence) sequence) "Return the first N elements of LST." (subseq lst 0 n)) -- cgit v1.2.3-13-gbd6f