aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/test/lux/target/python.lux
diff options
context:
space:
mode:
Diffstat (limited to '')
-rw-r--r--stdlib/source/test/lux/target/python.lux40
1 files changed, 20 insertions, 20 deletions
diff --git a/stdlib/source/test/lux/target/python.lux b/stdlib/source/test/lux/target/python.lux
index 8e3fb3472..ac1d84974 100644
--- a/stdlib/source/test/lux/target/python.lux
+++ b/stdlib/source/test/lux/target/python.lux
@@ -86,7 +86,7 @@
[left random.bit
right random.bit]
(`` (all _.and
- (~~ (with_template [</> <lux>]
+ (,, (with_template [</> <lux>]
[(_.coverage [</>]
(let [expected (<lux> left right)]
(expression (|>> (as Bit) (bit#= expected))
@@ -107,7 +107,7 @@
random.safe_frac)
subject random.safe_frac]
(`` (all _.and
- (~~ (with_template [</> <lux> <pre>]
+ (,, (with_template [</> <lux> <pre>]
[(_.coverage [</>]
(let [expected (<lux> (<pre> parameter) (<pre> subject))]
(expression (|>> (as Frac) (f.= expected))
@@ -120,7 +120,7 @@
[/.% f.mod |>]
[/.** f.pow f.abs]
))
- (~~ (with_template [</> <lux>]
+ (,, (with_template [</> <lux>]
[(_.coverage [</>]
(let [expected (<lux> parameter subject)]
(expression (|>> (as Bit) (bit#= expected))
@@ -160,7 +160,7 @@
i16 (at ! each ..int_16 random.int)
shift (at ! each (n.% 16) random.nat)]
(`` (all _.and
- (~~ (with_template [</> <lux>]
+ (,, (with_template [</> <lux>]
[(_.coverage [</>]
(let [expected (<lux> left right)]
(expression (|>> (as Frac) f.int (i.= expected))
@@ -170,7 +170,7 @@
[/.bit_xor i64.xor]
[/.bit_and i64.and]
))
- (~~ (with_template [</> <lux>]
+ (,, (with_template [</> <lux>]
[(_.coverage [</>]
(let [left (.int shift)
right (i.* (.int shift) i16)
@@ -451,7 +451,7 @@
field (at ! each /.string (random.upper_case 1))]
(all _.and
(_.coverage [/.item]
- (`` (and (~~ (with_template [<seq>]
+ (`` (and (,, (with_template [<seq>]
[(expression (|>> (as Frac) (f.= expected/0))
(/.item (/.int +0)
(<seq> (list (/.float expected/0)))))]
@@ -500,7 +500,7 @@
(as Frac)
(f.= expected/0)))
(_.coverage [/.multi]
- (`` (and (~~ (with_template [<var> <value>]
+ (`` (and (,, (with_template [<var> <value>]
[(|> (..statement
(function (_ $output)
(all /.then
@@ -561,7 +561,7 @@
(function (_ $output)
(all /.then
(/.def $def (list $var/0)
- (/.return (/.in? /.globals/0 (/.string (/.code $var/0)))))
+ (/.return (/.in? /.globals/0 (/.string (/.code $var/0)))))
(/.set (list $output) (/.and (/.not (/.in? /.globals/0 (/.string (/.code $var/0))))
(/.not (/.apply (list (/.float dummy/0)) $def))))
(/.set (list $var/0) (/.float dummy/0))
@@ -573,7 +573,7 @@
(function (_ $output)
(all /.then
(/.def $def (list $var/0)
- (/.return (/.in? /.locals/0 (/.string (/.code $var/0)))))
+ (/.return (/.in? /.locals/0 (/.string (/.code $var/0)))))
(/.set (list $output) (/.and (/.not (/.in? /.locals/0 (/.string (/.code $var/0))))
(/.apply (list (/.float dummy/0)) $def)))
(/.set (list $var/0) (/.float dummy/0))
@@ -758,7 +758,7 @@
(function (_ $output)
(all /.then
(/.def $def (list $input/0)
- (/.return $input/0))
+ (/.return $input/0))
(/.set (list $output) (/.apply (list (/.float expected/0)) $def)))))
(as Frac)
(f.= expected/0)))
@@ -767,9 +767,9 @@
(function (_ $output)
(all /.then
(/.def $def (list)
- (/.if (/.bool test)
- (/.return (/.float then))
- (/.return (/.float else))))
+ (/.if (/.bool test)
+ (/.return (/.float then))
+ (/.return (/.float else))))
(/.set (list $output) (/.apply (list) $def)))))
(as Frac)
(f.= expected/?)))
@@ -778,10 +778,10 @@
(function (_ $output)
(all /.then
(/.def $def (list)
- (all /.then
- (/.when (/.bool test)
- (/.return (/.float then)))
- (/.return (/.float else))))
+ (all /.then
+ (/.when (/.bool test)
+ (/.return (/.float then)))
+ (/.return (/.float else))))
(/.set (list $output) (/.apply (list) $def)))))
(as Frac)
(f.= expected/?)))
@@ -790,9 +790,9 @@
(function (_ $output)
(all /.then
(/.def $def (list)
- (all /.then
- (/.statement (/.+ (/.float expected/0) (/.float expected/0)))
- (/.return (/.float expected/0))))
+ (all /.then
+ (/.statement (/.+ (/.float expected/0) (/.float expected/0)))
+ (/.return (/.float expected/0))))
(/.set (list $output) (/.apply (list) $def)))))
(as Frac)
(f.= expected/0)))