projects
/
adventofcode2020.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
| inline |
side by side
Add day 07
[adventofcode2020.git]
/
src
/
utilities.lisp
diff --git
a/src/utilities.lisp
b/src/utilities.lisp
index 91e74d11b1aeb5a8a6316c11562e7934f9eb0aa1..6e0ca47d84f02726cd4becea7d1db06bc557b60d 100644
(file)
--- a/
src/utilities.lisp
+++ b/
src/utilities.lisp
@@
-8,6
+8,9
@@
(defun int-list-from (str)
(mapcar #'parse-integer (list-from str)))
+(defun list-list-from (str)
+ (split-sequence "" (list-from str) :test #'string=))
+
(defun cartesian-product (A B &rest C)
(let ((helper (lambda (X Y)
(if Y (loop for x in X