aboutsummaryrefslogtreecommitdiff
path: root/stdlib/test
diff options
context:
space:
mode:
Diffstat (limited to 'stdlib/test')
-rw-r--r--stdlib/test/test/lux/cli.lux20
-rw-r--r--stdlib/test/test/lux/time/instant.lux2
-rw-r--r--stdlib/test/test/lux/world/file.lux2
-rw-r--r--stdlib/test/test/lux/world/net/tcp.lux2
-rw-r--r--stdlib/test/test/lux/world/net/udp.lux2
5 files changed, 14 insertions, 14 deletions
diff --git a/stdlib/test/test/lux/cli.lux b/stdlib/test/test/lux/cli.lux
index d6161a2b8..35400da79 100644
--- a/stdlib/test/test/lux/cli.lux
+++ b/stdlib/test/test/lux/cli.lux
@@ -12,7 +12,7 @@
text/format
(coll [list]))
["r" math/random]
- ["." cli])
+ ["/" cli])
lux/test)
(context: "CLI"
@@ -28,19 +28,19 @@
post-ignore (r;list +5 gen-ignore)]
($_ seq
(test "Can read any argument."
- (|> (.;run (list yes) .;any)
+ (|> (/;run (list yes) /;any)
(case> (#E;Error _)
false
(#E;Success arg)
(text/= arg yes))))
(test "Can test tokens."
- (and (|> (.;run (list yes) (.;this yes))
+ (and (|> (/;run (list yes) (/;this yes))
(case> (#E;Error _) false (#E;Success _) true))
- (|> (.;run (list no) (.;this yes))
+ (|> (/;run (list no) (/;this yes))
(case> (#E;Error _) true (#E;Success _) false))))
(test "Can use custom token parsers."
- (|> (.;run (list yes) (.;parse Nat/decode))
+ (|> (/;run (list yes) (/;parse Nat/decode))
(case> (#E;Error _)
false
@@ -48,13 +48,13 @@
(text/= (Nat/encode parsed)
yes))))
(test "Can query if there are any more inputs."
- (and (|> (.;run (list) .;end)
+ (and (|> (/;run (list) /;end)
(case> (#E;Success []) true _ false))
- (|> (.;run (list yes) (p;not .;end))
+ (|> (/;run (list yes) (p;not /;end))
(case> (#E;Success []) false _ true))))
(test "Can parse CLI input anywhere."
- (|> (.;run (list;concat (list pre-ignore (list yes) post-ignore))
- (|> (.;somewhere (.;this yes))
- (p;before (p;some .;any))))
+ (|> (/;run (list;concat (list pre-ignore (list yes) post-ignore))
+ (|> (/;somewhere (/;this yes))
+ (p;before (p;some /;any))))
(case> (#E;Error _) false (#E;Success _) true)))
))))
diff --git a/stdlib/test/test/lux/time/instant.lux b/stdlib/test/test/lux/time/instant.lux
index e26f7397d..95a2ce441 100644
--- a/stdlib/test/test/lux/time/instant.lux
+++ b/stdlib/test/test/lux/time/instant.lux
@@ -12,7 +12,7 @@
["@d" duration]
["@date" date]))
lux/test
- (.. ["_;" duration]))
+ (// ["_;" duration]))
(def: boundary Int 99_999_999_999_999)
diff --git a/stdlib/test/test/lux/world/file.lux b/stdlib/test/test/lux/world/file.lux
index 388e91235..4af26b095 100644
--- a/stdlib/test/test/lux/world/file.lux
+++ b/stdlib/test/test/lux/world/file.lux
@@ -14,7 +14,7 @@
[blob])
["r" math/random])
lux/test
- (.. ["_;" blob]))
+ (// ["_;" blob]))
(def: truncate-millis
(|>. (i./ 1_000) (i.* 1_000)))
diff --git a/stdlib/test/test/lux/world/net/tcp.lux b/stdlib/test/test/lux/world/net/tcp.lux
index 7a3c6bfc5..d07f5e200 100644
--- a/stdlib/test/test/lux/world/net/tcp.lux
+++ b/stdlib/test/test/lux/world/net/tcp.lux
@@ -14,7 +14,7 @@
(net ["@" tcp]))
["r" math/random])
lux/test
- (../.. ["_;" blob]))
+ (/// ["_;" blob]))
(def: localhost net;Address "127.0.0.1")
(def: port
diff --git a/stdlib/test/test/lux/world/net/udp.lux b/stdlib/test/test/lux/world/net/udp.lux
index ee0a89b14..988db0471 100644
--- a/stdlib/test/test/lux/world/net/udp.lux
+++ b/stdlib/test/test/lux/world/net/udp.lux
@@ -14,7 +14,7 @@
(net ["@" udp]))
["r" math/random])
lux/test
- (../.. ["_;" blob]))
+ (/// ["_;" blob]))
(def: localhost net;Address "127.0.0.1")
(def: port