summaryrefslogtreecommitdiff
path: root/hyperquirks.lisp
diff options
context:
space:
mode:
authorColin Okay <okay@toyful.space>2022-08-08 16:30:24 -0500
committerColin Okay <okay@toyful.space>2022-08-08 16:30:24 -0500
commite55b0b4b9ac4f57cd3f1b73be0ee078b8100ab9e (patch)
treed2755701611b4b6f7a6a1bd330fea5ad1f9c2b3d /hyperquirks.lisp
parent79aa98de8bed02a14d5bdb76edc87865c4663053 (diff)
tiny [refactor]
Diffstat (limited to 'hyperquirks.lisp')
-rw-r--r--hyperquirks.lisp2
1 files changed, 1 insertions, 1 deletions
diff --git a/hyperquirks.lisp b/hyperquirks.lisp
index b765e69..8f3a944 100644
--- a/hyperquirks.lisp
+++ b/hyperquirks.lisp
@@ -214,7 +214,7 @@ neatly divisible by N."
for end = (+ start n)
when (<= end len)
collect (subseq xs start end)
- when (and (< start len) (> end len))
+ when (< start len end)
collect (nconc (subseq xs start)
(loop repeat (- end len) collect default))))