- Adapted compiler to the latest stdlib changes.

1 files changed, 10 insertions, 10 deletions

diff --git a/new-luxc/test/test/luxc/synthesizer/procedure.lux b/new-luxc/test/test/luxc/synthesizer/procedure.lux
index 898987308..91369a59b 100644
--- a/new-luxc/test/test/luxc/synthesizer/procedure.lux
+++ b/new-luxc/test/test/luxc/synthesizer/procedure.lux
@@ -15,18 +15,18 @@
         [synthesizer])
   (.. common))
 
-(test: "Procedures"
+(context: "Procedures"
   [num-args (|> r;nat (:: @ map (n.% +10)))
    nameA (r;text +5)
    argsA (r;list num-args gen-primitive)]
   ($_ seq
-      (assert "Can synthesize procedure calls."
-              (|> (synthesizer;synthesize (#la;Procedure nameA argsA))
-                  (case> (#ls;Procedure nameS argsS)
-                         (and (T/= nameA nameS)
-                              (list;every? (product;uncurry corresponds?)
-                                           (list;zip2 argsA argsS)))
-                         
-                         _
-                         false)))
+      (test "Can synthesize procedure calls."
+            (|> (synthesizer;synthesize (#la;Procedure nameA argsA))
+                (case> (#ls;Procedure nameS argsS)
+                       (and (T/= nameA nameS)
+                            (list;every? (product;uncurry corresponds?)
+                                         (list;zip2 argsA argsS)))
+                       
+                       _
+                       false)))
       ))