From f9d4d316ef9666f6b122b0eec8180351216e95f8 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Fri, 15 Mar 2019 00:23:49 -0400
Subject: Changed the convention for the structure opening separator from "/"
 to ";", to avoid confusion since "/" is used for relative module paths.

---
 stdlib/source/test/lux/control/pipe.lux | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

(limited to 'stdlib/source/test/lux/control/pipe.lux')

diff --git a/stdlib/source/test/lux/control/pipe.lux b/stdlib/source/test/lux/control/pipe.lux
index 371021ddd..fda914291 100644
--- a/stdlib/source/test/lux/control/pipe.lux
+++ b/stdlib/source/test/lux/control/pipe.lux
@@ -5,7 +5,7 @@
     [monad (#+ do)]]
    [data
     ["." identity]
-    ["." text ("#/." equivalence)
+    ["." text ("#;." equivalence)
      format]]
    [math
     ["r" random]]]
@@ -32,7 +32,7 @@
                          (let> x [(n/+ x x)]))))
         
         (_.test "'Conditional' branching."
-                (text/= (cond (n/= 0 sample) "zero"
+                (text;= (cond (n/= 0 sample) "zero"
                               (n/even? sample) "even"
                               "odd")
                         (|> sample
@@ -41,7 +41,7 @@
                                    [(new> "odd" [])]))))
 
         (_.test "'If' branching."
-                (text/= (if (n/even? sample)
+                (text;= (if (n/even? sample)
                           "even"
                           "odd")
                         (|> sample
@@ -84,10 +84,10 @@
                                                       [%n]))]
                   (and (n/= (inc sample) left)
                        (n/= (dec sample) middle)
-                       (text/= (%n sample) right))))
+                       (text;= (%n sample) right))))
         
         (_.test "Pattern-matching."
-                (text/= (case (n/% 10 sample)
+                (text;= (case (n/% 10 sample)
                           0 "zero"
                           1 "one"
                           2 "two"
-- 
cgit v1.2.3