aboutsummaryrefslogtreecommitdiff
path: root/lux-bootstrapper
diff options
context:
space:
mode:
authorEduardo Julian2021-02-25 01:50:24 -0400
committerEduardo Julian2021-02-25 01:50:24 -0400
commit47b320b854a6f28621c5d5d118cac31db27e7c50 (patch)
tree5cace9a14e0800987c220dff5e03a02913645c05 /lux-bootstrapper
parentae7fc0207c8d3281882261642f6a8e0579985aa0 (diff)
Updates for Ruby compiler.
Diffstat (limited to 'lux-bootstrapper')
-rw-r--r--lux-bootstrapper/src/lux/analyser/parser.clj7
1 files changed, 5 insertions, 2 deletions
diff --git a/lux-bootstrapper/src/lux/analyser/parser.clj b/lux-bootstrapper/src/lux/analyser/parser.clj
index 6a46bab3c..15224573c 100644
--- a/lux-bootstrapper/src/lux/analyser/parser.clj
+++ b/lux-bootstrapper/src/lux/analyser/parser.clj
@@ -40,12 +40,15 @@
(return (&/|list head))))
state*))))
+(def ^:private class-name-regex
+ #"^([a-zA-Z0-9_\.$]+)")
+
(def ^:private parse-name
- (|do [[_ _ =name] (&reader/read-regex #"^([a-zA-Z0-9_\.]+)")]
+ (|do [[_ _ =name] (&reader/read-regex class-name-regex)]
(return =name)))
(def ^:private parse-name?
- (|do [[_ _ =name] (&reader/read-regex? #"^([a-zA-Z0-9_\.]+)")]
+ (|do [[_ _ =name] (&reader/read-regex? class-name-regex)]
(return =name)))
(def ^:private parse-ident