From 889139602b77e4387a6e8bfbedacc2a08703e976 Mon Sep 17 00:00:00 2001 From: Eduardo Julian Date: Fri, 27 Nov 2020 00:07:51 -0400 Subject: Re-named lux/data/format/context to lux/control/parser/environment. --- stdlib/source/test/aedifex/runtime.lux | 28 ++++++++++++++++++++++++++++ 1 file changed, 28 insertions(+) create mode 100644 stdlib/source/test/aedifex/runtime.lux (limited to 'stdlib/source/test/aedifex/runtime.lux') 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 [] + [(_.cover [] + (let [command ( path)] + (and (text.starts-with? ( "") command) + (text.ends-with? path command))))] + + [/.java] + [/.node] + )) + ))))) -- cgit v1.2.3