diff options
Diffstat (limited to 'lib.functions.lisp')
| -rw-r--r-- | lib.functions.lisp | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/lib.functions.lisp b/lib.functions.lisp index c7b3ed1..30c1e64 100644 --- a/lib.functions.lisp +++ b/lib.functions.lisp @@ -29,3 +29,6 @@ each member is STEP distance apart." (fn parse-integer* (inp) (-> (string) (or integer list)) (parse-integer inp :junk-allowed t)) + +(fn take (n lst) (-> (fixnum list) list) + (subseq lst 0 n)) |