diff options
Diffstat (limited to 'new-luxc/source/luxc/analyser.lux')
| -rw-r--r-- | new-luxc/source/luxc/analyser.lux | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/new-luxc/source/luxc/analyser.lux b/new-luxc/source/luxc/analyser.lux index d8f5abe9b..90140afb4 100644 --- a/new-luxc/source/luxc/analyser.lux +++ b/new-luxc/source/luxc/analyser.lux @@ -63,6 +63,9 @@ (^ (#;Tuple elems)) (&&struct;analyse-tuple analyse elems) + (^ (#;Record pairs)) + (&&struct;analyse-record analyse pairs) + (#;Symbol reference) (&&reference;analyse-reference reference) @@ -92,6 +95,10 @@ value))) (&&struct;analyse-variant analyse tag value) + (^ (#;Form (list [_ (#;Tag tag)] + value))) + (&&struct;analyse-tagged-variant analyse tag value) + (^ (#;Form (list& func args))) (do Monad<Lux> [[funcT =func] (&&common;with-unknown-type |