diff options
Diffstat (limited to 'src/cljcc/exception.clj')
| -rw-r--r-- | src/cljcc/exception.clj | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/src/cljcc/exception.clj b/src/cljcc/exception.clj index bf98ed4..b8b8256 100644 --- a/src/cljcc/exception.clj +++ b/src/cljcc/exception.clj @@ -11,5 +11,8 @@ (defn analyzer-error [msg data] (throw (ex-info msg (merge {:error/type :analyzer} data)))) +(defn tacky-error [msg data] + (throw (ex-info msg (merge {:error/type :tacky} data)))) + (defn compiler-error [msg data] (throw (ex-info msg (merge {:error/type :compiler} data)))) |