From 6031fc715b4a16b008d6f288c38739d9bb066490 Mon Sep 17 00:00:00 2001 From: Eduardo Julian Date: Sun, 26 Nov 2017 22:52:18 -0400 Subject: - Changed to the new relative imports syntax. --- stdlib/test/test/lux/cli.lux | 20 ++++++++++---------- stdlib/test/test/lux/time/instant.lux | 2 +- stdlib/test/test/lux/world/file.lux | 2 +- stdlib/test/test/lux/world/net/tcp.lux | 2 +- stdlib/test/test/lux/world/net/udp.lux | 2 +- 5 files changed, 14 insertions(+), 14 deletions(-) (limited to 'stdlib/test') 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 -- cgit v1.2.3