Add driver changes and float regex

1 files changed, 3 insertions, 3 deletions

diff --git a/src/cljcc/parser.clj b/src/cljcc/parser.clj
index 6ab3373..7837ce3 100644
--- a/src/cljcc/parser.clj
+++ b/src/cljcc/parser.clj
@@ -43,8 +43,8 @@
   [kind [token & rst]]
   (if (= kind (:kind token))
     [token rst]
-    (throw (ex-info "Parser Error." {:expected kind
-                                     :actual (:kind token)}))))
+    (exc/parser-error "Actual and expected token differ." {:expected kind
+                                                           :actual (:kind token)})))
 
 (defn constant-exp-node [v]
   {:type :exp
@@ -519,7 +519,7 @@
 (defn- parse-program [tokens]
   (let [[declarations tokens] (parse-repeatedly tokens parse-declaration :eof)
         _ (expect :eof tokens)
-        ;_ (m/coerce #'s/Program declarations)
+                                        ;_ (m/coerce #'s/Program declarations)
         ]
     declarations))