diff options
author | Colin Okay <colin@cicadas.surf> | 2022-09-16 08:43:56 -0500 |
---|---|---|
committer | Colin Okay <colin@cicadas.surf> | 2022-09-16 08:43:56 -0500 |
commit | 22e08f6aff9c23d5bf3e80983159d07a656beb57 (patch) | |
tree | 403af7c53c12f63a00b9a0fa656a0b0bf7f3bd0a /src/util.lisp | |
parent | 9994437e2527ef70af849774d04b91815931b45c (diff) |
Diffstat (limited to 'src/util.lisp')
-rw-r--r-- | src/util.lisp | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/src/util.lisp b/src/util.lisp index 426acb0..2f3da03 100644 --- a/src/util.lisp +++ b/src/util.lisp @@ -81,3 +81,5 @@ when T, Puts the newest items first." (a:subseq* seq 0 limit) seq)))) +(defun drop-last (xs &optional (howmany 1)) + (reverse (nthcdr 1 (reverse xs)))) |