From bcd3d9ee8f6797f758a2abea98d5cb6a74cc7df0 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Fri, 15 Jun 2018 00:11:33 -0400
Subject: - WIP: Adjustments to new-luxc based on recent changes to stdlib.

---
 stdlib/source/lux/lang/synthesis.lux             | 12 +++++++++++-
 stdlib/test/test/lux/lang/synthesis/function.lux |  3 ++-
 2 files changed, 13 insertions(+), 2 deletions(-)

(limited to 'stdlib')

diff --git a/stdlib/source/lux/lang/synthesis.lux b/stdlib/source/lux/lang/synthesis.lux
index 779581cc4..cc43ea0b3 100644
--- a/stdlib/source/lux/lang/synthesis.lux
+++ b/stdlib/source/lux/lang/synthesis.lux
@@ -1,5 +1,5 @@
 (.module:
-  [lux #- Scope]
+  [lux #- i64 Scope]
   (lux (control [monad #+ do])
        (data [error #+ Error]
              (coll (dictionary ["dict" unordered #+ Dict]))))
@@ -174,6 +174,16 @@
          [locals ..locals])
        (..with-locals (inc locals))))
 
+(do-template [<name> <tag>]
+  [(template: #export (<name> content)
+     (#..Primitive (<tag> content)))]
+
+  [bool #..Bool]
+  [i64  #..I64]
+  [f64  #..F64]
+  [text #..Text]
+  )
+
 (do-template [<name> <tag>]
   [(template: #export (<name> content)
      (<| #..Reference
diff --git a/stdlib/test/test/lux/lang/synthesis/function.lux b/stdlib/test/test/lux/lang/synthesis/function.lux
index 65a4825e3..38a8dd8a2 100644
--- a/stdlib/test/test/lux/lang/synthesis/function.lux
+++ b/stdlib/test/test/lux/lang/synthesis/function.lux
@@ -99,7 +99,8 @@
                (|> chosen (n/+ (dec arity)) #///reference.Local)])))))
 
 (context: "Function definition."
-  (<| (times +100)
+  (<| (seed +13007429814532219492)
+      ## (times +100)
       (do @
         [[arity//constant function//constant prediction//constant] constant-function
          [arity//environment function//environment prediction//environment] function-with-environment
-- 
cgit v1.2.3