aboutsummaryrefslogtreecommitdiff
path: root/lib/functions.lisp
diff options
context:
space:
mode:
Diffstat (limited to 'lib/functions.lisp')
-rw-r--r--lib/functions.lisp4
1 files changed, 2 insertions, 2 deletions
diff --git a/lib/functions.lisp b/lib/functions.lisp
index 4e18a0a..65dd7f5 100644
--- a/lib/functions.lisp
+++ b/lib/functions.lisp
@@ -55,8 +55,8 @@ where key x in A has associations {y in LST : INDICATOR(y) = x}."
"Given string INP, attempt to parse an integer. Return NIL otherwise."
(parse-integer inp :junk-allowed t))
-(fn remove-at-indices (indices lst) (-> (list list) list)
+(fn remove-at-indices (indices lst) (-> (list sequence) list)
(loop :for i :from 0 :to (1- (length lst))
- :for item :in lst
+ :for item :in (coerce lst 'list)
:if (not (member i indices))
:collect item))