diff options
author | Eduardo Julian | 2021-08-08 17:56:15 -0400 |
---|---|---|
committer | Eduardo Julian | 2021-08-08 17:56:15 -0400 |
commit | f621a133e6e0a516c0586270fea8eaffb4829d82 (patch) | |
tree | 399396ee2f6a10df10cea9b78c51c76679b70e59 /stdlib/source/test/lux.lux | |
parent | 17e7566be51df5e428a6b10e6469201a8a9468da (diff) |
No more #export magic syntax.
Diffstat (limited to '')
-rw-r--r-- | stdlib/source/test/lux.lux | 21 |
1 files changed, 16 insertions, 5 deletions
diff --git a/stdlib/source/test/lux.lux b/stdlib/source/test/lux.lux index 9d5f719ed..925894d7b 100644 --- a/stdlib/source/test/lux.lux +++ b/stdlib/source/test/lux.lux @@ -59,10 +59,10 @@ ## TODO: Get rid of this ASAP (template: (!bundle body) - (: Test - (do random.monad - [_ (in [])] - body))) + [(: Test + (do random.monad + [_ (in [])] + body))]) (def: sub_tests Test @@ -580,7 +580,7 @@ (actual [expected_left expected_right]))))))) (/.template: (!n/+ <left> <right>) - (n.+ <left> <right>)) + [(n.+ <left> <right>)]) (def: for_template Test @@ -1091,6 +1091,16 @@ (for_meta|Module_State)) )) +(def: for_export + Test + ($_ _.and + (_.cover [/.public /.private] + (and /.public (not /.private))) + (_.cover [/.global /.local] + (and (bit\= /.public /.global) + (bit\= /.private /.local))) + )) + (def: test Test (<| (_.covering /._) @@ -1117,6 +1127,7 @@ ..for_def: ..for_import ..for_meta + ..for_export ..sub_tests ))) |