ajet/advent-of-code
1
0
Fork 0
mirror of https://github.com/Ajetski/advent-of-code.git synced 2025-09-30 11:23:17 -09:00
Code Issues Packages Projects Releases Wiki Activity

add regex w/ position util

Browse Source
This commit is contained in:
Adam Jeniski 2023-12-03 09:58:54 -05:00
parent 20539f6005
commit e68a957a69
1 changed files with 7 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
2023/src/core.clj
View File

@ -14,5 +14,12 @@
:body :body
string/split-lines)))) string/split-lines))))
(defn re-seq-pos [pattern string]
(let [m (re-matcher pattern string)]
((fn step []
(when (. m find)
(cons {:start (. m start) :end (. m end) :group (. m group)}
(lazy-seq (step))))))))
(comment (comment
input-cache) input-cache)