aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/test/aedifex/runtime.lux
diff options
context:
space:
mode:
authorEduardo Julian2020-11-27 00:07:51 -0400
committerEduardo Julian2020-11-27 00:07:51 -0400
commit889139602b77e4387a6e8bfbedacc2a08703e976 (patch)
tree3a113e298037122e81b5529475bd1e59286f733f /stdlib/source/test/aedifex/runtime.lux
parentdbb658bd7976c073a2bf314f194b36b30c45784b (diff)
Re-named lux/data/format/context to lux/control/parser/environment.
Diffstat (limited to 'stdlib/source/test/aedifex/runtime.lux')
-rw-r--r--stdlib/source/test/aedifex/runtime.lux28
1 files changed, 28 insertions, 0 deletions
diff --git a/stdlib/source/test/aedifex/runtime.lux b/stdlib/source/test/aedifex/runtime.lux
new file mode 100644
index 000000000..e1c0a77c1
--- /dev/null
+++ b/stdlib/source/test/aedifex/runtime.lux
@@ -0,0 +1,28 @@
+(.module:
+ [lux #*
+ ["_" test (#+ Test)]
+ [abstract
+ [monad (#+ do)]]
+ [data
+ ["." text]]
+ [math
+ ["." random]]]
+ {#program
+ ["." /]})
+
+(def: #export test
+ Test
+ (<| (_.covering /._)
+ (do random.monad
+ [path (random.ascii/alpha 5)]
+ (`` ($_ _.and
+ (~~ (template [<command>]
+ [(_.cover [<command>]
+ (let [command (<command> path)]
+ (and (text.starts-with? (<command> "") command)
+ (text.ends-with? path command))))]
+
+ [/.java]
+ [/.node]
+ ))
+ )))))