diff options
Diffstat (limited to 'stdlib/source/test/lux.lux')
| -rw-r--r-- | stdlib/source/test/lux.lux | 50 |
1 files changed, 25 insertions, 25 deletions
diff --git a/stdlib/source/test/lux.lux b/stdlib/source/test/lux.lux index 71f03201e..14bb1ec55 100644 --- a/stdlib/source/test/lux.lux +++ b/stdlib/source/test/lux.lux @@ -1,4 +1,4 @@ -(.`` (.`` (.using +(.`` (.`` (.require [library ["/" lux (.except) [program (.only program:)] @@ -9,28 +9,28 @@ [monad (.only do)]] [control ["[0]" io] - ["[0]" maybe (.open: "[1]#[0]" functor)] + ["[0]" maybe (.use "[1]#[0]" functor)] [concurrency ["[0]" atom (.only Atom)]] [parser ["<[0]>" code]]] [data ["[0]" product] - ["[0]" bit (.open: "[1]#[0]" equivalence)] - ["[0]" text (.open: "[1]#[0]" equivalence) + ["[0]" bit (.use "[1]#[0]" equivalence)] + ["[0]" text (.use "[1]#[0]" equivalence) ["%" \\format (.only format)]] [collection - ["[0]" list (.open: "[1]#[0]" functor)] - ["[0]" set (.only Set) (.open: "[1]#[0]" equivalence)] + ["[0]" list (.use "[1]#[0]" functor)] + ["[0]" set (.only Set) (.use "[1]#[0]" equivalence)] [dictionary ["[0]" plist]]]] ["[0]" macro (.only) [syntax (.only syntax)] ["^" pattern] - ["[0]" code (.open: "[1]#[0]" equivalence)] + ["[0]" code (.use "[1]#[0]" equivalence)] ["[0]" template]] ["[0]" math - ["[0]" random (.open: "[1]#[0]" functor)] + ["[0]" random (.use "[1]#[0]" functor)] [number [i8 (.only)] [i16 (.only)] @@ -39,8 +39,8 @@ ["r" rev] ["f" frac] ["[0]" i64]]] - ["[0]" meta (.open: "[1]#[0]" monad) - ["[0]" location (.open: "[1]#[0]" equivalence)]]]] + ["[0]" meta (.use "[1]#[0]" monad) + ["[0]" location (.use "[1]#[0]" equivalence)]]]] ... TODO: Must have 100% coverage on tests. ["[0]" / ["[1][0]" abstract] @@ -198,7 +198,7 @@ (def static_return 123) -(/.open: "global#[0]" (..global_returner ..static_return)) +(/.use "global#[0]" (..global_returner ..static_return)) (def for_interface Test @@ -212,7 +212,7 @@ (all _.and (_.coverage [/.implementation] (n.= expected (at local_returner return []))) - (_.coverage [/.open:] + (_.coverage [/.use] (n.= static_return (global#return []))) (_.coverage [/.open] (let [(/.open "local#[0]") local_returner] @@ -403,7 +403,7 @@ (~~ (for @.old (~~ (these)) (_.coverage [/.Source] (..found_crosshair?)))) - (_.coverage [/.using] + (_.coverage [/.require] (`` (with_expansions [<referral> ("lux in-module" "library/lux" library/lux.refer) <alias> (static.random code.text (random.lower_case 1)) <definition> (static.random code.local (random.lower_case 1)) @@ -443,50 +443,50 @@ false)))))] (scenario [])))] - [(.using [<module/0>']) + [(.require [<module/0>']) ("lux def module" []) []] - [(.using [<alias> <module/0>' (.except)]) + [(.require [<alias> <module/0>' (.except)]) ("lux def module" [[<module/0> <alias>]]) [(<referral> <module/0> (.except))]] - [(.using [<alias> <module/0>' (.only <definition>)]) + [(.require [<alias> <module/0>' (.only <definition>)]) ("lux def module" [[<module/0> <alias>]]) [(<referral> <module/0> (.only <definition>))]] - [(.using [<alias> <module/0>' (.except <definition>)]) + [(.require [<alias> <module/0>' (.except <definition>)]) ("lux def module" [[<module/0> <alias>]]) [(<referral> <module/0> (.except <definition>))]] - [(.using [<alias> <module/0>']) + [(.require [<alias> <module/0>']) ("lux def module" []) []] - [(.using [<module/0>' + [(.require [<module/0>' [<alias> <module/1>']]) ("lux def module" [[<m0/1> <alias>]]) [(<referral> <m0/1>)]] - [(.using ["[0]" <module/0>' + [(.require ["[0]" <module/0>' ["[0]" <module/1>']]) ("lux def module" [[<module/0> <module/0>] [<m0/1> <module/1>]]) [(<referral> <module/0>) (<referral> <m0/1>)]] - [(.using ["[0]" <module/0>' + [(.require ["[0]" <module/0>' ["[1]" <module/1>']]) ("lux def module" [[<m0/1> <module/0>]]) [(<referral> <m0/1>)]] - [(.using ["[0]" <module/0>' + [(.require ["[0]" <module/0>' ["[1]" <module/1>' ["[2]" <module/2>']]]) ("lux def module" [[<m0/1/2> <module/0>]]) [(<referral> <m0/1/2>)]] - [(.using [<module/0>' + [(.require [<module/0>' ["[0]" <module/1>' ["[0]" <//>']]]) ("lux def module" [[<m0/1> <module/1>] @@ -494,7 +494,7 @@ [(<referral> <m0/1>) (<referral> <m0/2>)]] - [(.using ["[0]" <module/0>' + [(.require ["[0]" <module/0>' [<module/1>' ["[0]" <\\>']]]) ("lux def module" [[<module/0> <module/0>] @@ -502,7 +502,7 @@ [(<referral> <module/0>) (<referral> <m2/1>)]] - [(.using ["[0]" <module/0>' (.open: "[1]#[0]" <definition>)]) + [(.require ["[0]" <module/0>' (.use "[1]#[0]" <definition>)]) ("lux def module" [[<module/0> <module/0>]]) [(<referral> <module/0> (<open/0> <definition>))]] )))))) |