aboutsummaryrefslogtreecommitdiff
path: root/stdlib/source/test/lux.lux
diff options
context:
space:
mode:
authorEduardo Julian2021-09-07 22:50:21 -0400
committerEduardo Julian2021-09-07 22:50:21 -0400
commit35c0807799717cd720ab28b35851c1a01a67445d (patch)
treec6237b79fb262d24c8a46ee3ecb714df3e9874d8 /stdlib/source/test/lux.lux
parentb55cefcb258f11eeee32c1478faefd1bd09ec871 (diff)
De-taggification | part 4
Diffstat (limited to 'stdlib/source/test/lux.lux')
-rw-r--r--stdlib/source/test/lux.lux88
1 files changed, 44 insertions, 44 deletions
diff --git a/stdlib/source/test/lux.lux b/stdlib/source/test/lux.lux
index 9e353a1c3..c67d6efc5 100644
--- a/stdlib/source/test/lux.lux
+++ b/stdlib/source/test/lux.lux
@@ -1,5 +1,5 @@
-(.with_expansions [<target>' (.for {"{old}" (.as_is ["#/." jvm])
- "JVM" (.as_is ["#/." jvm])}
+(.with_expansions [<target>' (.for {"{old}" (.as_is ["[1]/[0]" jvm])
+ "JVM" (.as_is ["[1]/[0]" jvm])}
(.as_is))
<target> <target>']
(.module:
@@ -11,28 +11,28 @@
[abstract
[monad {"+" [do]}]]
[control
- ["." io]
- ["." maybe ("#\." functor)]
+ ["[0]" io]
+ ["[0]" maybe ("[1]\[0]" functor)]
[concurrency
- ["." atom {"+" [Atom]}]]
+ ["[0]" atom {"+" [Atom]}]]
[parser
- ["<.>" code]]]
+ ["<[0]>" code]]]
[data
- ["." product]
- ["." bit ("#\." equivalence)]
- ["." text ("#\." equivalence)
+ ["[0]" product]
+ ["[0]" bit ("[1]\[0]" equivalence)]
+ ["[0]" text ("[1]\[0]" equivalence)
["%" format {"+" [format]}]]
[collection
- ["." list ("#\." functor)]
- ["." set {"+" [Set]} ("#\." equivalence)]
+ ["[0]" list ("[1]\[0]" functor)]
+ ["[0]" set {"+" [Set]} ("[1]\[0]" equivalence)]
[dictionary
- ["." plist]]]]
- ["." macro
+ ["[0]" plist]]]]
+ ["[0]" macro
[syntax {"+" [syntax:]}]
- ["." code ("#\." equivalence)]
- ["." template]]
- ["." math
- ["." random ("#\." functor)]
+ ["[0]" code ("[1]\[0]" equivalence)]
+ ["[0]" template]]
+ ["[0]" math
+ ["[0]" random ("[1]\[0]" functor)]
[number
[i8 {"+" []}]
[i16 {"+" []}]
@@ -40,32 +40,32 @@
["i" int]
["r" rev]
["f" frac]
- ["." i64]]]
- ["." meta
- ["." location ("#\." equivalence)]]]]
+ ["[0]" i64]]]
+ ["[0]" meta
+ ["[0]" location ("[1]\[0]" equivalence)]]]]
... TODO: Must have 100% coverage on tests.
- ["." / "_"
- ["#." abstract]
- ["#." control]
- ["#." data]
- ["#." debug]
- ["#." documentation]
- ["#." locale]
- ["#." macro
- ["#/." code]]
- ["#." math]
- ["#." meta]
- ["#." program]
- ["#." static]
- ["#." target]
- ["#." test]
- ["#." time]
- ... ["#." tool] ... TODO: Update & expand tests for this
- ["#." type]
- ["#." world]
- ["#." ffi]
- ["#." extension]
- ["#." target "_"
+ ["[0]" / "_"
+ ["[1][0]" abstract]
+ ["[1][0]" control]
+ ["[1][0]" data]
+ ["[1][0]" debug]
+ ["[1][0]" documentation]
+ ["[1][0]" locale]
+ ["[1][0]" macro
+ ["[1]/[0]" code]]
+ ["[1][0]" math]
+ ["[1][0]" meta]
+ ["[1][0]" program]
+ ["[1][0]" static]
+ ["[1][0]" target]
+ ["[1][0]" test]
+ ["[1][0]" time]
+ ... ["[1][0]" tool] ... TODO: Update & expand tests for this
+ ["[1][0]" type]
+ ["[1][0]" world]
+ ["[1][0]" ffi]
+ ["[1][0]" extension]
+ ["[1][0]" target "_"
<target>]]))
... TODO: Get rid of this ASAP
@@ -238,7 +238,7 @@
(def: static_return 123)
-(/.open: "global\." (..global_returner ..static_return))
+(/.open: "global\[0]" (..global_returner ..static_return))
(def: for_interface
Test
@@ -257,7 +257,7 @@
(_.cover [/.open:]
(n.= static_return (global\return [])))
(_.cover [/.^open]
- (let [(/.^open "local\.") local_returner]
+ (let [(/.^open "local\[0]") local_returner]
(n.= expected (local\return []))))
(_.cover [/.\]
(n.= expected (/.\ local_returner return [])))