diff options
Diffstat (limited to '')
-rw-r--r-- | new-luxc/test/test/luxc/analyser/common.lux | 31 |
1 files changed, 3 insertions, 28 deletions
diff --git a/new-luxc/test/test/luxc/analyser/common.lux b/new-luxc/test/test/luxc/analyser/common.lux index 5e8f73fd1..9a17fbb45 100644 --- a/new-luxc/test/test/luxc/analyser/common.lux +++ b/new-luxc/test/test/luxc/analyser/common.lux @@ -6,33 +6,8 @@ [macro] (macro [code])) (luxc ["&" base] - [analyser])) - -(def: compiler-version Text "0.6.0") - -(def: init-compiler-info - Compiler-Info - {#;compiler-version compiler-version - #;compiler-mode #;Build}) - -(def: init-type-context - Type-Context - {#;ex-counter +0 - #;var-counter +0 - #;var-bindings (list)}) - -(def: #export init-compiler - Compiler - {#;info init-compiler-info - #;source [dummy-cursor ""] - #;cursor dummy-cursor - #;modules (list) - #;scopes (list) - #;type-context init-type-context - #;expected #;None - #;seed +0 - #;scope-type-vars (list) - #;host (:! Void [])}) + [analyser]) + (test/luxc common)) (def: gen-unit (r;Random Code) @@ -65,7 +40,7 @@ [(def: #export (<name> analysis) (All [a] (-> (Lux a) Bool)) (|> analysis - (macro;run init-compiler) + (macro;run (init-compiler [])) (case> (#R;Success _) <on-success> |