diff --git a/src/hs_robotwar/core.clj b/src/hs_robotwar/core.clj index 3b5c205..8f39f16 100644 --- a/src/hs_robotwar/core.clj +++ b/src/hs_robotwar/core.clj @@ -56,9 +56,7 @@ [s] (re-matches #"^[A-Z][A-Z\d]*" s)) -(defn ignoring-args-thunk [x] (fn [& _] x)) - -(def return-err (ignoring-args-thunk "Invalid word or symbol")) +(def return-err (constantly "Invalid word or symbol")) (def parser-priority [[registers :register]