aboutsummaryrefslogtreecommitdiff
path: root/new-luxc/test
diff options
context:
space:
mode:
authorEduardo Julian2017-10-26 21:41:41 -0400
committerEduardo Julian2017-10-26 21:41:41 -0400
commit3439602c2b356eaef3359b6496a0237f1af55e33 (patch)
tree90c3c1d0f97fc30b1a991de50977d8a075564724 /new-luxc/test
parente2621632653ad1252744eecff6da143faaf90787 (diff)
- Added a new piece of compiler state, just for storing the current-module.
Diffstat (limited to 'new-luxc/test')
-rw-r--r--new-luxc/test/test/luxc/common.lux35
1 files changed, 4 insertions, 31 deletions
diff --git a/new-luxc/test/test/luxc/common.lux b/new-luxc/test/test/luxc/common.lux
index 2e725be5d..5b6fed8ec 100644
--- a/new-luxc/test/test/luxc/common.lux
+++ b/new-luxc/test/test/luxc/common.lux
@@ -1,36 +1,9 @@
(;module:
lux
- (lux (control pipe)
- ["r" math/random "r/" Monad<Random>]
- (data ["R" error])
- [meta]
- (meta [code])
- [io])
- (luxc ["&" base]
- [analyser]
- ["&;" host]))
-
-(def: init-info
- Info
- {#;target "JVM"
- #;version &;version
- #;mode #;Build})
-
-(def: init-type-context
- Type-Context
- {#;ex-counter +0
- #;var-counter +0
- #;var-bindings (list)})
+ (lux [io])
+ (luxc ["&;" host]
+ [";G" generator]))
(def: #export (init-compiler _)
(-> Top Compiler)
- {#;info init-info
- #;source [dummy-cursor +0 ""]
- #;cursor dummy-cursor
- #;modules (list)
- #;scopes (list)
- #;type-context init-type-context
- #;expected #;None
- #;seed +0
- #;scope-type-vars (list)
- #;host (:! Void (io;run &host;init-host))})
+ (generatorG;init-compiler (io;run &host;init-host)))