1 files changed, 34 insertions, 0 deletions
diff --git a/new-luxc/test/test/luxc/common.lux b/new-luxc/test/test/luxc/common.lux
new file mode 100644
index 000000000..6892274e4
--- /dev/null
+++ b/new-luxc/test/test/luxc/common.lux
@@ -0,0 +1,34 @@
+(;module:
+  lux
+  (lux (control pipe)
+       ["r" math/random "r/" Monad<Random>]
+       (data ["R" result])
+       [macro]
+       (macro [code]))
+  (luxc ["&" base]
+        [analyser]
+        ["&;" host]))
+
+(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 _)
+  (-> Top 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 (&host;init-host []))})