diff options
| author | Shagun Agrawal <agrawalshagun07@gmail.com> | 2024-08-16 23:26:10 +0530 |
|---|---|---|
| committer | Shagun Agrawal <agrawalshagun07@gmail.com> | 2024-08-16 23:26:10 +0530 |
| commit | 05611820413a6f691da269e631f4359185416155 (patch) | |
| tree | a9dda185ad32cf192866a83befe6843856ae63ad /src/cljcc/lexer.clj | |
| parent | ca4892ea62cfaca99f9174f58500457ea4a87354 (diff) | |
Switch to hand made parser, refactor asts to adjust change
Switch to hand made recursive descent parser.
Remove instaparse from dependencies.
Diffstat (limited to 'src/cljcc/lexer.clj')
| -rw-r--r-- | src/cljcc/lexer.clj | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/src/cljcc/lexer.clj b/src/cljcc/lexer.clj index a6319f9..10742f0 100644 --- a/src/cljcc/lexer.clj +++ b/src/cljcc/lexer.clj @@ -4,8 +4,6 @@ [cljcc.token :as t] [clojure.pprint :as pp])) -(re-find #"[0-9]+\b" "123213bbb 456") - (defn- lexer-ctx [] {:tokens [] :line 1 @@ -14,7 +12,7 @@ (defn lex ([source] (lex source 0 (lexer-ctx))) - ([[ch pk & rst :as source] pos {:keys [line col] :as ctx}] + ([[ch :as source] pos {:keys [line col] :as ctx}] (cond (empty? source) (update ctx :tokens #(conj % (t/create :eof line col))) (newline? ch) (recur (next source) |