projects
/
adventofcode2019.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Fix day11pt1 and add correct day11pt2
[adventofcode2019.git]
/
src
/
adventofcode2019
/
lib.clj
diff --git
a/src/adventofcode2019/lib.clj
b/src/adventofcode2019/lib.clj
index d992475caf866b9d7f992668c6bba59ec390ab53..890ddf5b8cef7ca064c5608f61736a675aaee8e0 100644
(file)
--- a/
src/adventofcode2019/lib.clj
+++ b/
src/adventofcode2019/lib.clj
@@
-1,5
+1,6
@@
(ns adventofcode2019.lib
[:require [clojure.string :as str]
(ns adventofcode2019.lib
[:require [clojure.string :as str]
+ [clojure.edn :as edn]
[clojure.java.io :as io]
[clojure.java.shell :refer [sh]]])
[clojure.java.io :as io]
[clojure.java.shell :refer [sh]]])
@@
-9,8
+10,11
@@
([file-name split-regex]
(str/split (str/trim (slurp file-name)) split-regex)))
([file-name split-regex]
(str/split (str/trim (slurp file-name)) split-regex)))
-(def parse-int
- #(Integer/parseInt %))
+(defn parse-int [n]
+ (let [n-val (edn/read-string n)]
+ (if (number? n-val)
+ n-val
+ (throw (Exception. "Not a number!")))))
(defmacro input-file []
(let [bottom-ns (last (str/split (str *ns*) #"\."))]
(defmacro input-file []
(let [bottom-ns (last (str/split (str *ns*) #"\."))]