aboutsummaryrefslogtreecommitdiff
path: root/new-luxc/test/test/luxc/synthesizer/primitive.lux
diff options
context:
space:
mode:
Diffstat (limited to '')
-rw-r--r--new-luxc/test/test/luxc/synthesizer/primitive.lux6
1 files changed, 3 insertions, 3 deletions
diff --git a/new-luxc/test/test/luxc/synthesizer/primitive.lux b/new-luxc/test/test/luxc/synthesizer/primitive.lux
index e1e37e469..56d088abf 100644
--- a/new-luxc/test/test/luxc/synthesizer/primitive.lux
+++ b/new-luxc/test/test/luxc/synthesizer/primitive.lux
@@ -1,7 +1,7 @@
(;module:
lux
(lux [io]
- (control monad
+ (control [monad #+ do]
pipe)
(data text/format)
["r" math/random "R/" Monad<Random>]
@@ -16,7 +16,7 @@
%nat% r;nat
%int% r;int
%deg% r;deg
- %real% r;real
+ %frac% r;frac
%text% (r;text +5)]
(with-expansions
[<tests> (do-template [<desc> <analysis> <synthesis> <sample>]
@@ -33,7 +33,7 @@
["nat" #la;Nat #ls;Nat %nat%]
["int" #la;Int #ls;Int %int%]
["deg" #la;Deg #ls;Deg %deg%]
- ["real" #la;Real #ls;Real %real%]
+ ["frac" #la;Frac #ls;Frac %frac%]
["text" #la;Text #ls;Text %text%])]
($_ seq
<tests>)))