aboutsummaryrefslogtreecommitdiff
path: root/src/util.lisp
diff options
context:
space:
mode:
authorColin Okay <colin@cicadas.surf>2022-09-16 08:43:56 -0500
committerColin Okay <colin@cicadas.surf>2022-09-16 08:43:56 -0500
commit22e08f6aff9c23d5bf3e80983159d07a656beb57 (patch)
tree403af7c53c12f63a00b9a0fa656a0b0bf7f3bd0a /src/util.lisp
parent9994437e2527ef70af849774d04b91815931b45c (diff)
Modify: the way the cache of newest oneliners is built/maintainedHEADmain
Diffstat (limited to 'src/util.lisp')
-rw-r--r--src/util.lisp2
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))))