diff options
| author | Eduardo Julian | 2017-05-03 23:51:16 -0400 |
|---|---|---|
| committer | Eduardo Julian | 2017-05-03 23:51:16 -0400 |
| commit | c700bb87641d37b2db9f31cd8db157fce170f866 (patch) | |
| tree | 5be5950a095451f0c08707deb3628ea6edfd5df5 /luxc/src/lux/analyser/proc/js.clj | |
| parent | 9849d179f644927be036ee66f32e219623a59021 (diff) | |
- Removed the "S" suffix from AST tags.
Diffstat (limited to 'luxc/src/lux/analyser/proc/js.clj')
| -rw-r--r-- | luxc/src/lux/analyser/proc/js.clj | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/luxc/src/lux/analyser/proc/js.clj b/luxc/src/lux/analyser/proc/js.clj index ff6a21c11..986720108 100644 --- a/luxc/src/lux/analyser/proc/js.clj +++ b/luxc/src/lux/analyser/proc/js.clj @@ -32,7 +32,7 @@ (&&/$proc (&/T ["js" "object-call"]) (&/$Cons =object (&/$Cons =field =args)) (&/|list))))))) (defn ^:private analyse-js-ref [analyse exo-type ?values] - (|do [:let [(&/$Cons [_ (&/$TextS ?ref-name)] (&/$Nil)) ?values] + (|do [:let [(&/$Cons [_ (&/$Text ?ref-name)] (&/$Nil)) ?values] _ (&type/check exo-type (&/$HostT "object" &/$Nil)) _cursor &/cursor] (return (&/|list (&&/|meta exo-type _cursor |