diff options
1077 files changed, 6826 insertions, 6763 deletions
@@ -155,9 +155,7 @@ There is also the special **^or** macro, which introduces *or patterns*: Say hi at Gitter: https://gitter.im/LuxProgrammingLanguage/community -Come join the forum: https://lux.hedgewit.ch/forum/ - -> There is also an older forum at: http://luxlang.freeforums.net/ +Come join the forum: http://luxlang.freeforums.net/ If you want to communicate with me directly, just email: luxlisp@gmail.com diff --git a/documentation/bookmark/back_end/haxe.md b/documentation/bookmark/back_end/haxe.md new file mode 100644 index 000000000..d9aa29d2d --- /dev/null +++ b/documentation/bookmark/back_end/haxe.md @@ -0,0 +1,5 @@ +# Reference + +0. [How to use the interpreter mode?](https://community.haxe.org/t/how-to-use-the-interpreter-mode/2642) +0. [Eval - The new Haxe macro interpreter](https://haxe.org/blog/eval/) + diff --git a/documentation/bookmark/business/billing.md b/documentation/bookmark/business/billing.md new file mode 100644 index 000000000..5668af3b4 --- /dev/null +++ b/documentation/bookmark/business/billing.md @@ -0,0 +1,4 @@ +# Reference + +0. [Engineers need open source to end their billing nightmares](https://www.getlago.com/blog/engineers-need-open-source-to-end-their-billing-nightmares) + diff --git a/documentation/bookmark/business/idea.md b/documentation/bookmark/business/idea.md new file mode 100644 index 000000000..2612e9b47 --- /dev/null +++ b/documentation/bookmark/business/idea.md @@ -0,0 +1,4 @@ +# Reference + +0. [The Boneyard Principle: Why the Next Big Thing will Emerge from a Failed Idea](https://every.to/p/the-boneyard-principle) + diff --git a/documentation/bookmark/business/management.md b/documentation/bookmark/business/management.md index aa7b63070..d9e468e39 100644 --- a/documentation/bookmark/business/management.md +++ b/documentation/bookmark/business/management.md @@ -1,5 +1,7 @@ # Reference +0. [The Curse of Systems Thinkers (Part 1)](https://blog.relyabilit.ie/the-curse-of-systems-thinkers/) +0. [Democracy Without Elections](https://democracywithoutelections.org/) 0. [First, Let’s Fire All the Managers](https://hbr.org/2011/12/first-lets-fire-all-the-managers) 0. [Value Add Disease](https://boz.com/articles/vad) diff --git a/documentation/bookmark/business/pricing.md b/documentation/bookmark/business/pricing.md new file mode 100644 index 000000000..28b3ea494 --- /dev/null +++ b/documentation/bookmark/business/pricing.md @@ -0,0 +1,4 @@ +# Reference + +0. [Why free stuff makes us irrational](https://thehustle.co/why-free-stuff-makes-us-irrational/) + diff --git a/documentation/bookmark/database/write_ahead_logging.md b/documentation/bookmark/database/write_ahead_logging.md index 7c2b82c3d..13e28e640 100644 --- a/documentation/bookmark/database/write_ahead_logging.md +++ b/documentation/bookmark/database/write_ahead_logging.md @@ -1,4 +1,5 @@ # Reference +0. [Write-Ahead Logging](https://sqlite.org/wal.html) 0. [Write-ahead logging](https://en.wikipedia.org/wiki/Write-ahead_logging) diff --git a/documentation/bookmark/game/combat/damage.md b/documentation/bookmark/game/combat/damage.md index 25a2b672b..47a2a4366 100644 --- a/documentation/bookmark/game/combat/damage.md +++ b/documentation/bookmark/game/combat/damage.md @@ -1,4 +1,5 @@ # Reference +0. [Replace Hit Points! (Ep. 253)](https://www.youtube.com/watch?v=MABlOHYommI) 0. [Hurting Your Players but Making it Fun || D&D w/ Dael Kingsmill](https://www.youtube.com/watch?v=thl54TR5Nb4) diff --git a/documentation/bookmark/game/engine.md b/documentation/bookmark/game/engine.md index 5b0555f3b..45d78ec5b 100644 --- a/documentation/bookmark/game/engine.md +++ b/documentation/bookmark/game/engine.md @@ -2,6 +2,7 @@ ## General +0. [Heaps.io](https://heaps.io/index.html) 0. [The Machinery](https://ourmachinery.com/) 0. [Open 3D Engine](https://www.o3de.org/) diff --git a/documentation/bookmark/game/mechanic/simplification.md b/documentation/bookmark/game/mechanic/simplification.md new file mode 100644 index 000000000..83f9d3329 --- /dev/null +++ b/documentation/bookmark/game/mechanic/simplification.md @@ -0,0 +1,4 @@ +# Reference + +0. [Replace Hit Points! (Ep. 253)](https://www.youtube.com/watch?v=MABlOHYommI) + diff --git a/documentation/bookmark/math.md b/documentation/bookmark/math.md index 78de206a0..364f9944b 100644 --- a/documentation/bookmark/math.md +++ b/documentation/bookmark/math.md @@ -307,6 +307,7 @@ # Algebraic geometry +0. [The Stacks project](https://stacks.math.columbia.edu/) 0. http://nautil.us/issue/69/patterns/the-math-that-takes-newton-into-the-quantum-world 0. [Algebraic Geometry](http://www.mathematik.uni-kl.de/~gathmann/class/alggeom-2014/main.pdf) 0. https://en.wikipedia.org/wiki/Superformula diff --git a/documentation/bookmark/memory_management/reference_counting.md b/documentation/bookmark/memory_management/reference_counting.md new file mode 100644 index 000000000..7a09fdcf0 --- /dev/null +++ b/documentation/bookmark/memory_management/reference_counting.md @@ -0,0 +1,4 @@ +# Reference + +0. [StaticRc](https://github.com/matthieu-m/static-rc) + diff --git a/documentation/bookmark/memory_management/smart_pointer.md b/documentation/bookmark/memory_management/smart_pointer.md new file mode 100644 index 000000000..5b5fd834e --- /dev/null +++ b/documentation/bookmark/memory_management/smart_pointer.md @@ -0,0 +1,4 @@ +# Reference + +0. [Implementing smart pointers for the C programming language](https://snai.pe/posts/c-smart-pointers) + diff --git a/documentation/bookmark/tool/version_control.md b/documentation/bookmark/tool/version_control.md index 9fb6cb528..aa8551e68 100644 --- a/documentation/bookmark/tool/version_control.md +++ b/documentation/bookmark/tool/version_control.md @@ -1,4 +1,5 @@ # Reference -1. [Version Control Without Git](https://itoshkov.github.io/git-tutorial) +0. [Darcs](http://darcs.net/) +0. [Version Control Without Git](https://itoshkov.github.io/git-tutorial) diff --git a/licentia/source/program/licentia.lux b/licentia/source/program/licentia.lux index 7576f739a..2a5da043f 100644 --- a/licentia/source/program/licentia.lux +++ b/licentia/source/program/licentia.lux @@ -14,16 +14,16 @@ (.using [library [lux "*" - [ffi {"+" import:}] - [program {"+" program:}] + [ffi (.only import:)] + [program (.only program:)] ["[0]" debug] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control - [remember {"+" to_do}] - ["[0]" io {"+" IO} ("[1]#[0]" monad)] + [remember (.only to_do)] + ["[0]" io (.only IO) ("[1]#[0]" monad)] ["[0]" maybe] - ["[0]" try {"+" Try}] + ["[0]" try (.only Try)] ["[0]" parser ["<[0]>" cli] ["<[0]>" json]] @@ -31,7 +31,7 @@ ["!" capability]]] [data ["[0]" text - ["%" format {"+" format}] + ["%" format (.only format)] [encoding ["[0]" utf8]]] [format diff --git a/licentia/source/program/licentia/document.lux b/licentia/source/program/licentia/document.lux index 4a3253f76..0754cca43 100644 --- a/licentia/source/program/licentia/document.lux +++ b/licentia/source/program/licentia/document.lux @@ -3,7 +3,7 @@ [lux {"-" or and} [data ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" functor)]]]]]) diff --git a/licentia/source/program/licentia/input.lux b/licentia/source/program/licentia/input.lux index b92d0e52e..21de87b90 100644 --- a/licentia/source/program/licentia/input.lux +++ b/licentia/source/program/licentia/input.lux @@ -2,31 +2,31 @@ [library [lux "*" [abstract - [monad {"+" do}]] + [monad (.only do)]] [control - ["[0]" exception {"+" exception:}] + ["[0]" exception (.only exception:)] ["<>" parser - ["<[0]>" json {"+" Parser}]]] + ["<[0]>" json (.only Parser)]]] [data [text - ["%" format {"+" format}]]] + ["%" format (.only format)]]] [math [number ["n" nat] ["i" int] ["f" frac]]]]] ["[0]" // "_" - ["[1]" license {"+" Identification - Termination - Liability - Distribution - Commercial - Extension - Entity Black_List - URL Attribution - Addendum - License} - ["[0]" time {"+" Period}] + ["[1]" license (.only Identification + Termination + Liability + Distribution + Commercial + Extension + Entity Black_List + URL Attribution + Addendum + License) + ["[0]" time (.only Period)] ["[0]" copyright]]]) (def: identification diff --git a/licentia/source/program/licentia/license.lux b/licentia/source/program/licentia/license.lux index 6cc1218df..6fce41a82 100644 --- a/licentia/source/program/licentia/license.lux +++ b/licentia/source/program/licentia/license.lux @@ -1,9 +1,9 @@ (.using - [library - [lux "*"]] - ["[0]" / "_" - [time {"+" Days Months Period}] - ["[1][0]" copyright]]) + [library + [lux "*"]] + ["[0]" / "_" + [time (.only Days Months Period)] + ["[1][0]" copyright]]) (type: .public Identification (Record diff --git a/licentia/source/program/licentia/license/addendum.lux b/licentia/source/program/licentia/license/addendum.lux index 3aa71b353..2fe9e1c9a 100644 --- a/licentia/source/program/licentia/license/addendum.lux +++ b/licentia/source/program/licentia/license/addendum.lux @@ -3,8 +3,8 @@ [lux "*" [data [text - ["%" format {"+" format}]]]]] - ["[0]" // {"+" Addendum} + ["%" format (.only format)]]]]] + ["[0]" // (.only Addendum) [// ["$" document]]]) diff --git a/licentia/source/program/licentia/license/assurance.lux b/licentia/source/program/licentia/license/assurance.lux index a36b38dcf..de2538a5d 100644 --- a/licentia/source/program/licentia/license/assurance.lux +++ b/licentia/source/program/licentia/license/assurance.lux @@ -3,7 +3,7 @@ [lux "*" [data ["[0]" text - ["%" format {"+" format}]]]]] + ["%" format (.only format)]]]]] [// ["_" term] [// diff --git a/licentia/source/program/licentia/license/black_list.lux b/licentia/source/program/licentia/license/black_list.lux index 24d367d6a..be1c01f2e 100644 --- a/licentia/source/program/licentia/license/black_list.lux +++ b/licentia/source/program/licentia/license/black_list.lux @@ -5,10 +5,10 @@ ["[0]" maybe ("[1]#[0]" functor)]] [data ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" functor)]]]]] - ["[0]" // {"+" Entity Black_List} + ["[0]" // (.only Entity Black_List) ["_" term] [// ["$" document]]]) diff --git a/licentia/source/program/licentia/license/commercial.lux b/licentia/source/program/licentia/license/commercial.lux index aa0cc0005..20279179c 100644 --- a/licentia/source/program/licentia/license/commercial.lux +++ b/licentia/source/program/licentia/license/commercial.lux @@ -1,13 +1,13 @@ (.using - [library - [lux "*" - [data - ["[0]" text - ["%" format {"+" format}]]]]] - ["[0]" // {"+" Commercial} - ["_" term] - [// - ["$" document]]]) + [library + [lux "*" + [data + ["[0]" text + ["%" format (.only format)]]]]] + ["[0]" // (.only Commercial) + ["_" term] + [// + ["$" document]]]) (def: .public cannot_sell (let [preamble (format "Without limiting other conditions in " _.license) diff --git a/licentia/source/program/licentia/license/copyright.lux b/licentia/source/program/licentia/license/copyright.lux index d065d5039..c20dc5f64 100644 --- a/licentia/source/program/licentia/license/copyright.lux +++ b/licentia/source/program/licentia/license/copyright.lux @@ -1,8 +1,8 @@ (.using - [library - [lux "*"]] - [// - [time {"+" Year Period}]]) + [library + [lux "*"]] + [// + [time (.only Year Period)]]) (type: .public Holder (Record diff --git a/licentia/source/program/licentia/license/definition.lux b/licentia/source/program/licentia/license/definition.lux index 3d002311c..009d83e2e 100644 --- a/licentia/source/program/licentia/license/definition.lux +++ b/licentia/source/program/licentia/license/definition.lux @@ -3,7 +3,7 @@ [lux {"-" Definition} [data ["[0]" text - ["%" format {"+" format}]]]]] + ["%" format (.only format)]]]]] [/// ["$" document]]) diff --git a/licentia/source/program/licentia/license/distribution.lux b/licentia/source/program/licentia/license/distribution.lux index 87b397ff7..4632536ba 100644 --- a/licentia/source/program/licentia/license/distribution.lux +++ b/licentia/source/program/licentia/license/distribution.lux @@ -3,10 +3,10 @@ [lux "*" [data ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" monoid)]]]]] - ["[0]" // {"+" Distribution} + ["[0]" // (.only Distribution) ["_" term] [// ["$" document]]]) diff --git a/licentia/source/program/licentia/license/extension.lux b/licentia/source/program/licentia/license/extension.lux index 82a5a0243..00075dd35 100644 --- a/licentia/source/program/licentia/license/extension.lux +++ b/licentia/source/program/licentia/license/extension.lux @@ -3,11 +3,11 @@ [lux "*" [data ["[0]" text - ["%" format {"+" format}]]]]] - ["[0]" // {"+" Extension} + ["%" format (.only format)]]]]] + ["[0]" // (.only Extension) + [time (.only Months Period)] ["_" term] ["[0]" grant] - [time {"+" Months Period}] [// ["$" document]]]) diff --git a/licentia/source/program/licentia/license/grant.lux b/licentia/source/program/licentia/license/grant.lux index 9be9208f1..38344fb24 100644 --- a/licentia/source/program/licentia/license/grant.lux +++ b/licentia/source/program/licentia/license/grant.lux @@ -3,9 +3,9 @@ [lux "*" [data ["[0]" text - ["%" format {"+" format}]]]]] + ["%" format (.only format)]]]]] [// - [time {"+" Days}] + [time (.only Days)] ["_" term] ["[0]" definition] [// diff --git a/licentia/source/program/licentia/license/liability.lux b/licentia/source/program/licentia/license/liability.lux index b6801b900..ee4458e5f 100644 --- a/licentia/source/program/licentia/license/liability.lux +++ b/licentia/source/program/licentia/license/liability.lux @@ -3,7 +3,7 @@ [lux "*" [data ["[0]" text - ["%" format {"+" format}]]]]] + ["%" format (.only format)]]]]] [// ["_" term] [// diff --git a/licentia/source/program/licentia/license/limitation.lux b/licentia/source/program/licentia/license/limitation.lux index cc8ff460c..33a5753d8 100644 --- a/licentia/source/program/licentia/license/limitation.lux +++ b/licentia/source/program/licentia/license/limitation.lux @@ -3,7 +3,7 @@ [lux "*" [data ["[0]" text - ["%" format {"+" format}]]]]] + ["%" format (.only format)]]]]] [// ["_" term] [// diff --git a/licentia/source/program/licentia/license/miscellaneous.lux b/licentia/source/program/licentia/license/miscellaneous.lux index 329d5ce9d..dc126ddfb 100644 --- a/licentia/source/program/licentia/license/miscellaneous.lux +++ b/licentia/source/program/licentia/license/miscellaneous.lux @@ -3,7 +3,7 @@ [lux "*" [data ["[0]" text - ["%" format {"+" format}]]]]] + ["%" format (.only format)]]]]] [// ["_" term] [// diff --git a/licentia/source/program/licentia/license/notice.lux b/licentia/source/program/licentia/license/notice.lux index e9c723909..e9dcb520b 100644 --- a/licentia/source/program/licentia/license/notice.lux +++ b/licentia/source/program/licentia/license/notice.lux @@ -3,7 +3,7 @@ [lux "*" [data ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" functor)]]] [math diff --git a/licentia/source/program/licentia/license/submission.lux b/licentia/source/program/licentia/license/submission.lux index 1eeddcc6e..367839be3 100644 --- a/licentia/source/program/licentia/license/submission.lux +++ b/licentia/source/program/licentia/license/submission.lux @@ -1,13 +1,13 @@ (.using - [library - [lux "*" - [data - ["[0]" text - ["%" format {"+" format}]]]]] + [library + [lux "*" + [data + ["[0]" text + ["%" format (.only format)]]]]] + [// + ["_" term] [// - ["_" term] - [// - ["$" document]]]) + ["$" document]]]) (def: .public contribution (let [on-submissions (let [exception (format "Unless " _.recipient " explicitly states otherwise") diff --git a/licentia/source/program/licentia/output.lux b/licentia/source/program/licentia/output.lux index 9f08bd250..5f0fb296f 100644 --- a/licentia/source/program/licentia/output.lux +++ b/licentia/source/program/licentia/output.lux @@ -6,21 +6,21 @@ [data ["[0]" bit] ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" functor monoid)]]]]] [// - ["[0]" license {"+" Identification - Termination - Liability - Distribution - Commercial - Extension - Entity Black_List - URL Attribution - License} + ["[0]" license (.only Identification + Termination + Liability + Distribution + Commercial + Extension + Entity Black_List + URL Attribution + License) ["[0]" copyright] - ["[0]" definition {"+" Definition}] + ["[0]" definition (.only Definition)] ["[0]" grant] ["[0]" limitation] ["[0]" assurance] diff --git a/licentia/source/test/licentia.lux b/licentia/source/test/licentia.lux index a6274a7b5..39b76b6b6 100644 --- a/licentia/source/test/licentia.lux +++ b/licentia/source/test/licentia.lux @@ -1,10 +1,10 @@ (.using [library [lux "*" - [program {"+" program:}] - ["_" test {"+" Test}] + [program (.only program:)] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" io] ["[0]" maybe ("[1]#[0]" functor)]] @@ -14,22 +14,22 @@ [collection ["[0]" list ("[1]#[0]" functor)]]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat ("[1]#[0]" interval)]]]]] [\\program ["[0]" output] - ["[0]" license {"+" Identification - Termination - Liability - Distribution - Commercial - Extension - Entity Black_List - URL Attribution - Addendum - License} - ["[0]" time {"+" Period}] + ["[0]" license (.only Identification + Termination + Liability + Distribution + Commercial + Extension + Entity Black_List + URL Attribution + Addendum + License) + ["[0]" time (.only Period)] ["[0]" copyright] ["[0]" notice] ["[0]" definition] diff --git a/lux-cl/source/program.lux b/lux-cl/source/program.lux index 6f6c4b1fc..dae7fa7ca 100644 --- a/lux-cl/source/program.lux +++ b/lux-cl/source/program.lux @@ -1,28 +1,28 @@ (.using [lux "*" - [program {"+" program:}] + [program (.only program:)] ["[0]" ffi] ["[0]" debug] [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["[0]" pipe] ["[0]" maybe] - ["[0]" try {"+" Try}] - ["[0]" exception {"+" exception:}] - ["[0]" io {"+" IO io}] + ["[0]" try (.only Try)] + ["[0]" exception (.only exception:)] + ["[0]" io (.only IO io)] [concurrency - ["[0]" promise {"+" Promise}]]] + ["[0]" promise (.only Promise)]]] [data ["[0]" text ("[1]#[0]" hash) - ["%" format {"+" format}] + ["%" format (.only format)] ["[0]" encoding]] [collection - ["[0]" array {"+" Array}]]] + ["[0]" array (.only Array)]]] [macro ["[0]" template]] [math - [number {"+" hex} + [number (.only hex) ["n" nat] ["[0]" i64]]] ["[0]" world "_" @@ -32,18 +32,18 @@ ["_" common_lisp]] [tool [compiler - [phase {"+" Operation Phase}] + [phase (.only Operation Phase)] [reference - [variable {"+" Register}]] + [variable (.only Register)]] [language [lux - [program {"+" Program}] - [generation {"+" Context Host}] + [program (.only Program)] + [generation (.only Context Host)] ["[0]" synthesis] [analysis - [macro {"+" Expander}]] + [macro (.only Expander)]] [phase - ["[0]" extension {"+" Extender Handler} + ["[0]" extension (.only Extender Handler) ["[1]/[0]" bundle] ["[0]" analysis "_" ["[1]" common_lisp]] @@ -54,7 +54,7 @@ ["[0]" common_lisp ["[0]" runtime]]]]]] [default - ["[0]" platform {"+" Platform}]] + ["[0]" platform (.only Platform)]] [meta ["[0]" packager "_" ["[1]" script]]]]]] diff --git a/lux-js/source/program.lux b/lux-js/source/program.lux index 01646ac23..ba6aaff49 100644 --- a/lux-js/source/program.lux +++ b/lux-js/source/program.lux @@ -1,27 +1,27 @@ (.using [library [lux "*" - [program {"+" program:}] - ["[0]" ffi {"+" import:}] + [program (.only program:)] + ["[0]" ffi (.only import:)] ["[0]" debug] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" maybe ("[1]#[0]" monad)] - ["[0]" try {"+" Try}] - ["[0]" exception {"+" exception:}] - ["[0]" io {"+" IO io}] + ["[0]" try (.only Try)] + ["[0]" exception (.only exception:)] + ["[0]" io (.only IO io)] ["[0]" function] [concurrency - ["[0]" async {"+" Async}]]] + ["[0]" async (.only Async)]]] [data ["[0]" product] [text - ["%" format {"+" format}] + ["%" format (.only format)] [encoding ["[0]" utf8]]] [collection - ["[0]" array {"+" Array}]]] + ["[0]" array (.only Array)]]] [macro ["^" pattern] ["[0]" template]] @@ -37,17 +37,17 @@ ["_" js]] [tool [compiler - ["[0]" phase {"+" Operation Phase}] + ["[0]" phase (.only Operation Phase)] [reference - [variable {"+" Register}]] + [variable (.only Register)]] [language [lux - [program {"+" Program}] - [generation {"+" Host}] + [program (.only Program)] + [generation (.only Host)] [analysis - [macro {"+" Expander}]] + [macro (.only Expander)]] [phase - ["[0]" extension {"+" Extender Handler} + ["[0]" extension (.only Extender Handler) ["[1]/[0]" bundle] ["[0]" analysis "_" ["[1]" js]] @@ -58,11 +58,11 @@ ["[0]" js ["[0]" runtime]]]]]] [default - ["[0]" platform {"+" Platform}]] + ["[0]" platform (.only Platform)]] [meta ["[0]" cli] ["[0]" context] - [archive {"+" Archive} + [archive (.only Archive) ["[0]" unit]] ["[0]" packager "_" ["[1]" script]]]]]]] diff --git a/lux-jvm/source/program.lux b/lux-jvm/source/program.lux index c10bb4ff8..592d9dea6 100644 --- a/lux-jvm/source/program.lux +++ b/lux-jvm/source/program.lux @@ -1,46 +1,46 @@ (.using [library [lux {"-" Definition} - [program {"+" program:}] + [program (.only program:)] ["@" target] - ["[0]" ffi {"+" import:}] + ["[0]" ffi (.only import:)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control - ["[0]" io {"+" IO}] - ["[0]" try {"+" Try}] + ["[0]" io (.only IO)] + ["[0]" try (.only Try)] [concurrency - ["[0]" async {"+" Async}]]] + ["[0]" async (.only Async)]]] [data ["[0]" product] [text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection - [array {"+" Array}]]] + [array (.only Array)]]] ["[0]" world "_" ["[0]" file] ["[1]/[0]" program]] [target ["[0]" jvm "_" - [bytecode {"+" Bytecode}] + [bytecode (.only Bytecode)] ["[1]/[0]" type ["[1]/[0]" box]]]] [tool - [compiler {"+"} + [compiler (.only) ["[0]" phase] [default - ["[0]" platform {"+" Platform}]] + ["[0]" platform (.only Platform)]] [meta - [archive {"+" Archive}] + [archive (.only Archive)] ["[0]" context] ["[0]" cli] ["[0]" packager "_" ["[1]" jvm]]] [language [lux - [generation {"+" Operation}] + [generation (.only Operation)] [analysis - [macro {"+" Expander}]] + [macro (.only Expander)]] [phase ["[0]" extension ["[0]" analysis "_" @@ -51,7 +51,7 @@ ["[1]" jvm]]] [generation ["/" jvm - ["[1][0]" runtime {"+" Anchor Definition}] + ["[1][0]" runtime (.only Anchor Definition)] ["[1][0]" host] ["[1][0]" program]]]]]]]]]] [program diff --git a/lux-lua/source/program.lux b/lux-lua/source/program.lux index 6f66ac45c..ac1d8e12e 100644 --- a/lux-lua/source/program.lux +++ b/lux-lua/source/program.lux @@ -1,33 +1,33 @@ (.using [library [lux "*" - [program {"+" program:}] + [program (.only program:)] ["[0]" ffi] ["[0]" static] [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["[0]" maybe] - ["[0]" try {"+" Try}] - ["[0]" exception {"+" exception:}] - ["[0]" io {"+" IO io}] + ["[0]" try (.only Try)] + ["[0]" exception (.only exception:)] + ["[0]" io (.only IO io)] ["[0]" function] [concurrency - ["[0]" async {"+" Async}]]] + ["[0]" async (.only Async)]]] [data ["[0]" text ("[1]#[0]" hash) - ["%" format {"+" format}] + ["%" format (.only format)] [encoding ["[0]" utf8]]] [collection - ["[0]" array {"+" Array}] + ["[0]" array (.only Array)] ["[0]" list ("[1]#[0]" monad)]]] [macro ["^" pattern] ["[0]" template] ["[0]" code]] [math - [number {"+" hex} + [number (.only hex) ["n" nat] ["[0]" i64]]] ["[0]" world "_" @@ -37,17 +37,17 @@ ["_" lua]] [tool ["[0]" compiler - ["[0]" phase {"+" Operation Phase}] + ["[0]" phase (.only Operation Phase)] [reference - [variable {"+" Register}]] + [variable (.only Register)]] [language [lux - [program {"+" Program}] - [generation {"+" Host}] + [program (.only Program)] + [generation (.only Host)] [analysis - [macro {"+" Expander}]] + [macro (.only Expander)]] [phase - ["[0]" extension {"+" Extender Handler} + ["[0]" extension (.only Extender Handler) ["[1]/[0]" bundle] ["[0]" analysis "_" ["[1]" lua]] @@ -58,11 +58,11 @@ ["[0]" lua ["[0]" runtime]]]]]] [default - ["[0]" platform {"+" Platform}]] + ["[0]" platform (.only Platform)]] [meta ["[0]" cli] ["[0]" context] - [archive {"+" Archive}] + [archive (.only Archive)] ["[0]" packager "_" ["[1]" script]]]]]]] [program diff --git a/lux-php/source/program.lux b/lux-php/source/program.lux index 460051029..5f41f4ba2 100644 --- a/lux-php/source/program.lux +++ b/lux-php/source/program.lux @@ -1,29 +1,29 @@ (.using [lux "*" - [program {"+" program:}] + [program (.only program:)] ["[0]" ffi] ["[0]" debug] [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["[0]" pipe] ["[0]" maybe] - ["[0]" try {"+" Try}] - ["[0]" exception {"+" exception:}] - ["[0]" io {"+" IO io}] + ["[0]" try (.only Try)] + ["[0]" exception (.only exception:)] + ["[0]" io (.only IO io)] [concurrency - ["[0]" promise {"+" Promise}]]] + ["[0]" promise (.only Promise)]]] [data ["[0]" text ("[1]#[0]" hash) - ["%" format {"+" format}] + ["%" format (.only format)] [encoding ["[0]" utf8]]] [collection - ["[0]" array {"+" Array}]]] + ["[0]" array (.only Array)]]] [macro ["[0]" template]] [math - [number {"+" hex} + [number (.only hex) ["n" nat] ["[0]" i64]]] ["[0]" world "_" @@ -33,18 +33,18 @@ ["_" php]] [tool [compiler - [phase {"+" Operation Phase}] + [phase (.only Operation Phase)] [reference - [variable {"+" Register}]] + [variable (.only Register)]] [language [lux - [program {"+" Program}] - [generation {"+" Context Host}] + [program (.only Program)] + [generation (.only Context Host)] ["[0]" synthesis] [analysis - [macro {"+" Expander}]] + [macro (.only Expander)]] [phase - ["[0]" extension {"+" Extender Handler} + ["[0]" extension (.only Extender Handler) ["[1]/[0]" bundle] ["[0]" analysis "_" ["[1]" php]] @@ -55,7 +55,7 @@ ["[0]" php ["[0]" runtime]]]]]] [default - ["[0]" platform {"+" Platform}]] + ["[0]" platform (.only Platform)]] [meta ["[0]" packager "_" ["[1]" script]]]]]] diff --git a/lux-python/source/program.lux b/lux-python/source/program.lux index feddcf1dd..221b98018 100644 --- a/lux-python/source/program.lux +++ b/lux-python/source/program.lux @@ -1,28 +1,28 @@ (.using [library [lux "*" - [program {"+" program:}] - ["[0]" ffi {"+" import:}] + [program (.only program:)] + ["[0]" ffi (.only import:)] ["[0]" debug] ["[0]" static] [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["[0]" pipe] ["[0]" maybe] - ["[0]" try {"+" Try} ("[1]#[0]" monad)] - ["[0]" exception {"+" exception:}] - ["[0]" io {"+" IO io}] + ["[0]" try (.only Try) ("[1]#[0]" monad)] + ["[0]" exception (.only exception:)] + ["[0]" io (.only IO io)] ["[0]" function] [concurrency - ["[0]" async {"+" Async}]]] + ["[0]" async (.only Async)]]] [data ["[0]" text ("[1]#[0]" hash) - ["%" format {"+" format}] + ["%" format (.only format)] [encoding ["[0]" utf8]]] [collection - ["[0]" array {"+" Array}] + ["[0]" array (.only Array)] ["[0]" list ("[1]#[0]" functor)]]] ["[0]" macro ["^" pattern] @@ -39,18 +39,18 @@ ["_" python]] [tool ["[0]" compiler - ["[0]" phase {"+" Operation Phase} ("[1]#[0]" monad)] + ["[0]" phase (.only Operation Phase) ("[1]#[0]" monad)] [reference - [variable {"+" Register}]] + [variable (.only Register)]] [language [lux - [program {"+" Program}] - [generation {"+" Host}] + [program (.only Program)] + [generation (.only Host)] ["[0]" synthesis] [analysis - [macro {"+" Expander}]] + [macro (.only Expander)]] [phase - ["[0]" extension {"+" Extender Handler} + ["[0]" extension (.only Extender Handler) ["[1]/[0]" bundle] ["[0]" analysis "_" ["[1]" python]] @@ -61,11 +61,11 @@ ["[0]" python ["[0]" runtime]]]]]] [default - ["[0]" platform {"+" Platform}]] + ["[0]" platform (.only Platform)]] [meta ["[0]" context] ["[0]" cli] - [archive {"+" Archive} + [archive (.only Archive) ["[0]" unit]] ["[0]" packager "_" ["[1]" script]]]]]]] diff --git a/lux-r/source/program.lux b/lux-r/source/program.lux index 2f477efcb..7e7a6ed88 100644 --- a/lux-r/source/program.lux +++ b/lux-r/source/program.lux @@ -1,33 +1,33 @@ (.using [lux "*" - [program {"+" program:}] + [program (.only program:)] ["[0]" ffi] ["[0]" debug] [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["[0]" pipe] ["[0]" maybe] - ["[0]" try {"+" Try}] - ["[0]" exception {"+" exception:}] - ["[0]" io {"+" IO io}] + ["[0]" try (.only Try)] + ["[0]" exception (.only exception:)] + ["[0]" io (.only IO io)] [concurrency - ["[0]" promise {"+" Promise}]] + ["[0]" promise (.only Promise)]] [parser ["<[0]>" code]]] [data ["[0]" text ("[1]#[0]" hash) - ["%" format {"+" format}] + ["%" format (.only format)] [encoding ["[0]" utf8]]] [collection - ["[0]" array {"+" Array}]]] + ["[0]" array (.only Array)]]] ["[0]" macro - [syntax {"+" syntax:}] + [syntax (.only syntax:)] ["[0]" template] ["[0]" code]] [math - [number {"+" hex} + [number (.only hex) ["n" nat] ["[0]" i64]]] ["[0]" world "_" @@ -37,18 +37,18 @@ ["_" r]] [tool [compiler - [phase {"+" Operation Phase}] + [phase (.only Operation Phase)] [reference - [variable {"+" Register}]] + [variable (.only Register)]] [language [lux - [program {"+" Program}] - [generation {"+" Context Host}] + [program (.only Program)] + [generation (.only Context Host)] ["[0]" synthesis] [analysis - [macro {"+" Expander}]] + [macro (.only Expander)]] [phase - ["[0]" extension {"+" Extender Handler} + ["[0]" extension (.only Extender Handler) ["[1]/[0]" bundle] ["[0]" analysis "_" ["[1]" r]] @@ -59,7 +59,7 @@ ["[0]" r ["[0]" runtime]]]]]] [default - ["[0]" platform {"+" Platform}]] + ["[0]" platform (.only Platform)]] [meta ["[0]" packager "_" ["[1]" script]]]]]] diff --git a/lux-r/source/test/program.lux b/lux-r/source/test/program.lux index 112225a56..1f9dcda44 100644 --- a/lux-r/source/test/program.lux +++ b/lux-r/source/test/program.lux @@ -1,14 +1,14 @@ (.using - [lux "*" - ["_" test {"+" Test}] - [control - ["[0]" io] - [parser - [cli {"+" program:}]]]] - [spec - ["[0]" compositor]] - [\\ - ["[0]" /]]) + [lux "*" + ["_" test (.only Test)] + [control + ["[0]" io] + [parser + [cli (.only program:)]]]] + [spec + ["[0]" compositor]] + [\\ + ["[0]" /]]) (program: args (<| io.io diff --git a/lux-ruby/source/program.lux b/lux-ruby/source/program.lux index 5479aadb4..2eba7ea14 100644 --- a/lux-ruby/source/program.lux +++ b/lux-ruby/source/program.lux @@ -1,36 +1,36 @@ (.using [library [lux "*" - [program {"+" program:}] + [program (.only program:)] ["[0]" debug] - ["[0]" ffi {"+" import:}] + ["[0]" ffi (.only import:)] ["[0]" meta] [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["[0]" maybe] - ["[0]" try {"+" Try}] - ["[0]" exception {"+" exception:}] - ["[0]" io {"+" IO io}] + ["[0]" try (.only Try)] + ["[0]" exception (.only exception:)] + ["[0]" io (.only IO io)] ["[0]" function] [concurrency - ["[0]" async {"+" Async}]] + ["[0]" async (.only Async)]] ["<>" parser ["<[0]>" code]]] [data ["[0]" text ("[1]#[0]" hash) - ["%" format {"+" format}] + ["%" format (.only format)] [encoding ["[0]" utf8]]] [collection - ["[0]" array {"+" Array}] + ["[0]" array (.only Array)] ["[0]" list ("[1]#[0]" functor)]]] ["[0]" macro - [syntax {"+" syntax:}] + [syntax (.only syntax:)] ["^" pattern] ["[0]" template]] [math - [number {"+" hex} + [number (.only hex) ["n" nat] ["i" int] ["[0]" i64]]] @@ -41,18 +41,18 @@ ["_" ruby]] [tool ["[0]" compiler - ["[0]" phase {"+" Operation Phase} ("[1]#[0]" monad)] + ["[0]" phase (.only Operation Phase) ("[1]#[0]" monad)] [reference - [variable {"+" Register}]] + [variable (.only Register)]] [language [lux - [program {"+" Program}] - [generation {"+" Host}] + [program (.only Program)] + [generation (.only Host)] ["[0]" synthesis] [analysis - [macro {"+" Expander}]] + [macro (.only Expander)]] [phase - ["[0]" extension {"+" Extender Handler} + ["[0]" extension (.only Extender Handler) ["[1]/[0]" bundle] ["[0]" analysis "_" ["[1]" ruby]] @@ -63,9 +63,9 @@ ["[0]" ruby ["[0]" runtime]]]]]] [default - ["[0]" platform {"+" Platform}]] + ["[0]" platform (.only Platform)]] [meta - [archive {"+" Archive}] + [archive (.only Archive)] ["[0]" context] ["[0]" cli] ["[0]" packager "_" diff --git a/lux-scheme/source/program.lux b/lux-scheme/source/program.lux index f131350d5..17ea4f01d 100644 --- a/lux-scheme/source/program.lux +++ b/lux-scheme/source/program.lux @@ -1,28 +1,28 @@ (.using [lux "*" - [program {"+" program:}] + [program (.only program:)] ["[0]" ffi] ["[0]" debug] [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["[0]" pipe] ["[0]" maybe] - ["[0]" try {"+" Try}] - ["[0]" exception {"+" exception:}] - ["[0]" io {"+" IO io}] + ["[0]" try (.only Try)] + ["[0]" exception (.only exception:)] + ["[0]" io (.only IO io)] [concurrency - ["[0]" promise {"+" Promise}]]] + ["[0]" promise (.only Promise)]]] [data ["[0]" text ("[1]#[0]" hash) - ["%" format {"+" format}] + ["%" format (.only format)] ["[0]" encoding]] [collection - ["[0]" array {"+" Array}]]] + ["[0]" array (.only Array)]]] [macro ["[0]" template]] [math - [number {"+" hex} + [number (.only hex) ["n" nat] ["[0]" i64]]] [time @@ -34,18 +34,18 @@ ["_" scheme]] [tool [compiler - [phase {"+" Operation Phase}] + [phase (.only Operation Phase)] [reference - [variable {"+" Register}]] + [variable (.only Register)]] [language [lux - [program {"+" Program}] - [generation {"+" Context Host}] + [program (.only Program)] + [generation (.only Context Host)] ["[0]" synthesis] [analysis - [macro {"+" Expander}]] + [macro (.only Expander)]] [phase - ["[0]" extension {"+" Extender Handler} + ["[0]" extension (.only Extender Handler) ["[1]/[0]" bundle] ["[0]" analysis "_" ["[1]" scheme]] @@ -56,7 +56,7 @@ ["[0]" scheme ["[0]" runtime]]]]]] [default - ["[0]" platform {"+" Platform}]] + ["[0]" platform (.only Platform)]] [meta ["[0]" packager "_" ["[1]" scheme]]]]]] diff --git a/stdlib/source/documentation/lux.lux b/stdlib/source/documentation/lux.lux index 468fc588f..2a65bf0dc 100644 --- a/stdlib/source/documentation/lux.lux +++ b/stdlib/source/documentation/lux.lux @@ -1,16 +1,16 @@ (.using [library [lux - [program {"+" program:}] - ["$" documentation {"+" documentation:}] + [program (.only program:)] + ["$" documentation (.only documentation:)] ["[0]" debug] [control ["[0]" io] ["<>" parser ["<[0]>" code]]] [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]] + ["[0]" text (.only \n) + ["%" format (.only format)]] [collection ["[0]" list] ["[0]" set]]] diff --git a/stdlib/source/documentation/lux/abstract.lux b/stdlib/source/documentation/lux/abstract.lux index 7fd12c4a8..d7a2b8c1e 100644 --- a/stdlib/source/documentation/lux/abstract.lux +++ b/stdlib/source/documentation/lux/abstract.lux @@ -1,26 +1,26 @@ (.using - [library - [lux "*" - ["$" documentation {"+" documentation:}] - [data - [text {"+" \n} - ["%" format {"+" format}]] - [collection - ["[0]" list]]]]] - ["[0]" / "_" - ["[1][0]" apply] - ["[1][0]" codec] - ["[1][0]" comonad] - ["[1][0]" enum] - ["[1][0]" equivalence] - ["[1][0]" mix] - ["[1][0]" functor] - ["[1][0]" hash] - ["[1][0]" interval] - ["[1][0]" monad] - ["[1][0]" monoid] - ["[1][0]" order] - ["[1][0]" predicate]]) + [library + [lux "*" + ["$" documentation (.only documentation:)] + [data + [text (.only \n) + ["%" format (.only format)]] + [collection + ["[0]" list]]]]] + ["[0]" / "_" + ["[1][0]" apply] + ["[1][0]" codec] + ["[1][0]" comonad] + ["[1][0]" enum] + ["[1][0]" equivalence] + ["[1][0]" mix] + ["[1][0]" functor] + ["[1][0]" hash] + ["[1][0]" interval] + ["[1][0]" monad] + ["[1][0]" monoid] + ["[1][0]" order] + ["[1][0]" predicate]]) (.def: .public documentation (.List $.Module) diff --git a/stdlib/source/documentation/lux/abstract/apply.lux b/stdlib/source/documentation/lux/abstract/apply.lux index 78193973c..7f18dbdc2 100644 --- a/stdlib/source/documentation/lux/abstract/apply.lux +++ b/stdlib/source/documentation/lux/abstract/apply.lux @@ -1,9 +1,9 @@ (.using - [library - [lux - ["$" documentation {"+" documentation:}]]] - [\\library - ["[0]" /]]) + [library + [lux + ["$" documentation (.only documentation:)]]] + [\\library + ["[0]" /]]) (documentation: (/.Apply f) "Applicative functors.") diff --git a/stdlib/source/documentation/lux/abstract/codec.lux b/stdlib/source/documentation/lux/abstract/codec.lux index d39113c45..630e0e504 100644 --- a/stdlib/source/documentation/lux/abstract/codec.lux +++ b/stdlib/source/documentation/lux/abstract/codec.lux @@ -1,7 +1,7 @@ (.using [library [lux - ["$" documentation {"+" documentation:}]]] + ["$" documentation (.only documentation:)]]] [\\library ["[0]" /]]) diff --git a/stdlib/source/documentation/lux/abstract/comonad.lux b/stdlib/source/documentation/lux/abstract/comonad.lux index 50e308506..0c81013ff 100644 --- a/stdlib/source/documentation/lux/abstract/comonad.lux +++ b/stdlib/source/documentation/lux/abstract/comonad.lux @@ -1,14 +1,14 @@ (.using - [library - [lux - ["$" documentation {"+" documentation:}] - [data - [text {"+" \n} - ["%" format {"+" format}]]]]] - [\\library - ["[0]" /]] - ["[0]" / "_" - ["[1][0]" cofree]]) + [library + [lux + ["$" documentation (.only documentation:)] + [data + [text (.only \n) + ["%" format (.only format)]]]]] + [\\library + ["[0]" /]] + ["[0]" / "_" + ["[1][0]" cofree]]) (documentation: (/.CoMonad !) (format "Co-monads are the opposite/complement to monads." diff --git a/stdlib/source/documentation/lux/abstract/comonad/cofree.lux b/stdlib/source/documentation/lux/abstract/comonad/cofree.lux index 240845d28..644357230 100644 --- a/stdlib/source/documentation/lux/abstract/comonad/cofree.lux +++ b/stdlib/source/documentation/lux/abstract/comonad/cofree.lux @@ -1,9 +1,9 @@ (.using - [library - [lux - ["$" documentation {"+" documentation:}]]] - [\\library - ["[0]" /]]) + [library + [lux + ["$" documentation (.only documentation:)]]] + [\\library + ["[0]" /]]) (documentation: (/.CoFree ! it) "The CoFree CoMonad.") diff --git a/stdlib/source/documentation/lux/abstract/enum.lux b/stdlib/source/documentation/lux/abstract/enum.lux index be60cf1df..225a36a1e 100644 --- a/stdlib/source/documentation/lux/abstract/enum.lux +++ b/stdlib/source/documentation/lux/abstract/enum.lux @@ -1,9 +1,9 @@ (.using - [library - [lux - ["$" documentation {"+" documentation:}]]] - [\\library - ["[0]" /]]) + [library + [lux + ["$" documentation (.only documentation:)]]] + [\\library + ["[0]" /]]) (documentation: (/.Enum it) "Enumerable types, with a notion of moving forward and backwards through a type's instances.") diff --git a/stdlib/source/documentation/lux/abstract/equivalence.lux b/stdlib/source/documentation/lux/abstract/equivalence.lux index 4c58fdcc5..558db3902 100644 --- a/stdlib/source/documentation/lux/abstract/equivalence.lux +++ b/stdlib/source/documentation/lux/abstract/equivalence.lux @@ -1,12 +1,12 @@ (.using - [library - [lux - ["$" documentation {"+" documentation:}] - [data - [text {"+" \n} - ["%" format {"+" format}]]]]] - [\\library - ["[0]" /]]) + [library + [lux + ["$" documentation (.only documentation:)] + [data + [text (.only \n) + ["%" format (.only format)]]]]] + [\\library + ["[0]" /]]) (documentation: (/.Equivalence it) "Equivalence for a type's instances.") diff --git a/stdlib/source/documentation/lux/abstract/functor.lux b/stdlib/source/documentation/lux/abstract/functor.lux index 92c0a61c9..837dba3e6 100644 --- a/stdlib/source/documentation/lux/abstract/functor.lux +++ b/stdlib/source/documentation/lux/abstract/functor.lux @@ -1,10 +1,10 @@ (.using [library [lux - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [data - [text {"+" \n} - ["%" format {"+" format}]]]]] + [text (.only \n) + ["%" format (.only format)]]]]] [\\library ["[0]" /]] ["[0]" / "_" diff --git a/stdlib/source/documentation/lux/abstract/functor/contravariant.lux b/stdlib/source/documentation/lux/abstract/functor/contravariant.lux index 625dfee00..72c873f4c 100644 --- a/stdlib/source/documentation/lux/abstract/functor/contravariant.lux +++ b/stdlib/source/documentation/lux/abstract/functor/contravariant.lux @@ -1,9 +1,9 @@ (.using - [library - [lux - ["$" documentation {"+" documentation:}]]] - [\\library - ["[0]" /]]) + [library + [lux + ["$" documentation (.only documentation:)]]] + [\\library + ["[0]" /]]) (documentation: (/.Functor !) "The contravariant functor.") diff --git a/stdlib/source/documentation/lux/abstract/hash.lux b/stdlib/source/documentation/lux/abstract/hash.lux index 46cf611a1..b227175c2 100644 --- a/stdlib/source/documentation/lux/abstract/hash.lux +++ b/stdlib/source/documentation/lux/abstract/hash.lux @@ -1,12 +1,12 @@ (.using - [library - [lux - ["$" documentation {"+" documentation:}] - [data - [text {"+" \n} - ["%" format {"+" format}]]]]] - [\\library - ["[0]" /]]) + [library + [lux + ["$" documentation (.only documentation:)] + [data + [text (.only \n) + ["%" format (.only format)]]]]] + [\\library + ["[0]" /]]) (documentation: (/.Hash it) "A way to produce hash-codes for a type's instances.") diff --git a/stdlib/source/documentation/lux/abstract/interval.lux b/stdlib/source/documentation/lux/abstract/interval.lux index cccd26b9b..57cc874ac 100644 --- a/stdlib/source/documentation/lux/abstract/interval.lux +++ b/stdlib/source/documentation/lux/abstract/interval.lux @@ -1,12 +1,12 @@ (.using - [library - [lux - ["$" documentation {"+" documentation:}] - [data - [text {"+" \n} - ["%" format {"+" format}]]]]] - [\\library - ["[0]" /]]) + [library + [lux + ["$" documentation (.only documentation:)] + [data + [text (.only \n) + ["%" format (.only format)]]]]] + [\\library + ["[0]" /]]) (documentation: (/.Interval it) "A representation of top and bottom boundaries for an ordered type.") diff --git a/stdlib/source/documentation/lux/abstract/mix.lux b/stdlib/source/documentation/lux/abstract/mix.lux index b43b815b9..883ebf27f 100644 --- a/stdlib/source/documentation/lux/abstract/mix.lux +++ b/stdlib/source/documentation/lux/abstract/mix.lux @@ -1,12 +1,12 @@ (.using - [library - [lux - ["$" documentation {"+" documentation:}] - [data - [text {"+" \n} - ["%" format {"+" format}]]]]] - [\\library - ["[0]" /]]) + [library + [lux + ["$" documentation (.only documentation:)] + [data + [text (.only \n) + ["%" format (.only format)]]]]] + [\\library + ["[0]" /]]) (documentation: (/.Mix structure) "Iterate over a structure's values to build a summary value.") diff --git a/stdlib/source/documentation/lux/abstract/monad.lux b/stdlib/source/documentation/lux/abstract/monad.lux index cac36742b..6134bceda 100644 --- a/stdlib/source/documentation/lux/abstract/monad.lux +++ b/stdlib/source/documentation/lux/abstract/monad.lux @@ -1,14 +1,14 @@ (.using - [library - [lux - ["$" documentation {"+" documentation:}] - [data - [text {"+" \n} - ["%" format {"+" format}]]]]] - [\\library - ["[0]" /]] - ["[0]" / "_" - ["[1][0]" free]]) + [library + [lux + ["$" documentation (.only documentation:)] + [data + [text (.only \n) + ["%" format (.only format)]]]]] + [\\library + ["[0]" /]] + ["[0]" / "_" + ["[1][0]" free]]) (documentation: (/.Monad it) (format "A monad is a monoid in the category of endofunctors." diff --git a/stdlib/source/documentation/lux/abstract/monad/free.lux b/stdlib/source/documentation/lux/abstract/monad/free.lux index 7faa07400..fc97271f6 100644 --- a/stdlib/source/documentation/lux/abstract/monad/free.lux +++ b/stdlib/source/documentation/lux/abstract/monad/free.lux @@ -1,9 +1,9 @@ (.using - [library - [lux - ["$" documentation {"+" documentation:}]]] - [\\library - ["[0]" /]]) + [library + [lux + ["$" documentation (.only documentation:)]]] + [\\library + ["[0]" /]]) (documentation: (/.Free ! it) "The Free Monad.") diff --git a/stdlib/source/documentation/lux/abstract/monoid.lux b/stdlib/source/documentation/lux/abstract/monoid.lux index 08a0903ec..ea6043c5b 100644 --- a/stdlib/source/documentation/lux/abstract/monoid.lux +++ b/stdlib/source/documentation/lux/abstract/monoid.lux @@ -1,12 +1,12 @@ (.using - [library - [lux - ["$" documentation {"+" documentation:}] - [data - [text {"+" \n} - ["%" format {"+" format}]]]]] - [\\library - ["[0]" /]]) + [library + [lux + ["$" documentation (.only documentation:)] + [data + [text (.only \n) + ["%" format (.only format)]]]]] + [\\library + ["[0]" /]]) (documentation: (/.Monoid it) (format "A way to compose values." diff --git a/stdlib/source/documentation/lux/abstract/order.lux b/stdlib/source/documentation/lux/abstract/order.lux index 85a72995f..d1c63844c 100644 --- a/stdlib/source/documentation/lux/abstract/order.lux +++ b/stdlib/source/documentation/lux/abstract/order.lux @@ -1,12 +1,12 @@ (.using - [library - [lux - ["$" documentation {"+" documentation:}] - [data - [text {"+" \n} - ["%" format {"+" format}]]]]] - [\\library - ["[0]" /]]) + [library + [lux + ["$" documentation (.only documentation:)] + [data + [text (.only \n) + ["%" format (.only format)]]]]] + [\\library + ["[0]" /]]) (documentation: (/.Order it) "A signature for types that possess some sense of ordering among their elements.") diff --git a/stdlib/source/documentation/lux/abstract/predicate.lux b/stdlib/source/documentation/lux/abstract/predicate.lux index 36956c8e2..d75b19959 100644 --- a/stdlib/source/documentation/lux/abstract/predicate.lux +++ b/stdlib/source/documentation/lux/abstract/predicate.lux @@ -1,12 +1,12 @@ (.using - [library - [lux - ["$" documentation {"+" documentation:}] - [data - [text {"+" \n} - ["%" format {"+" format}]]]]] - [\\library - ["[0]" /]]) + [library + [lux + ["$" documentation (.only documentation:)] + [data + [text (.only \n) + ["%" format (.only format)]]]]] + [\\library + ["[0]" /]]) (documentation: (/.Predicate it) "A question that can be asked of a value, yield either false (#0) or true (#1).") diff --git a/stdlib/source/documentation/lux/control.lux b/stdlib/source/documentation/lux/control.lux index afb68da76..7ca840dfc 100644 --- a/stdlib/source/documentation/lux/control.lux +++ b/stdlib/source/documentation/lux/control.lux @@ -1,32 +1,32 @@ (.using - [library - [lux "*" - ["$" documentation {"+" documentation:}] - [data - [text {"+" \n} - ["%" format {"+" format}]] - [collection - ["[0]" list]]]]] - ["[0]" / "_" - ["[1][0]" concatenative] - ["[1][0]" concurrency] - ["[1][0]" continuation] - ["[1][0]" exception] - ["[1][0]" function] - ["[1][0]" io] - ["[1][0]" lazy] - ["[1][0]" maybe] - ["[1][0]" parser] - ["[1][0]" pipe] - ["[1][0]" reader] - ["[1][0]" region] - ["[1][0]" remember] - ["[1][0]" security] - ["[1][0]" state] - ["[1][0]" thread] - ["[1][0]" try] - ["[1][0]" writer] - ]) + [library + [lux "*" + ["$" documentation (.only documentation:)] + [data + [text (.only \n) + ["%" format (.only format)]] + [collection + ["[0]" list]]]]] + ["[0]" / "_" + ["[1][0]" concatenative] + ["[1][0]" concurrency] + ["[1][0]" continuation] + ["[1][0]" exception] + ["[1][0]" function] + ["[1][0]" io] + ["[1][0]" lazy] + ["[1][0]" maybe] + ["[1][0]" parser] + ["[1][0]" pipe] + ["[1][0]" reader] + ["[1][0]" region] + ["[1][0]" remember] + ["[1][0]" security] + ["[1][0]" state] + ["[1][0]" thread] + ["[1][0]" try] + ["[1][0]" writer] + ]) (.def: .public documentation (.List $.Module) diff --git a/stdlib/source/documentation/lux/control/concatenative.lux b/stdlib/source/documentation/lux/control/concatenative.lux index d56a9f513..f1ea0d4bc 100644 --- a/stdlib/source/documentation/lux/control/concatenative.lux +++ b/stdlib/source/documentation/lux/control/concatenative.lux @@ -1,10 +1,10 @@ (.using [library [lux {"-" if loop} - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [data [text - ["%" format {"+" format}]]] + ["%" format (.only format)]]] [macro ["[0]" template]] [math diff --git a/stdlib/source/documentation/lux/control/concurrency.lux b/stdlib/source/documentation/lux/control/concurrency.lux index 2980874f5..5e308ee43 100644 --- a/stdlib/source/documentation/lux/control/concurrency.lux +++ b/stdlib/source/documentation/lux/control/concurrency.lux @@ -1,20 +1,20 @@ (.using - [library - [lux "*" - ["$" documentation {"+" documentation:}] - [data - [text {"+" \n} - ["%" format {"+" format}]] - [collection - ["[0]" list]]]]] - ["[0]" / "_" - ["[1][0]" actor] - ["[1][0]" async] - ["[1][0]" atom] - ["[1][0]" frp] - ["[1][0]" semaphore] - ["[1][0]" stm] - ["[1][0]" thread]]) + [library + [lux "*" + ["$" documentation (.only documentation:)] + [data + [text (.only \n) + ["%" format (.only format)]] + [collection + ["[0]" list]]]]] + ["[0]" / "_" + ["[1][0]" actor] + ["[1][0]" async] + ["[1][0]" atom] + ["[1][0]" frp] + ["[1][0]" semaphore] + ["[1][0]" stm] + ["[1][0]" thread]]) (.def: .public documentation (.List $.Module) diff --git a/stdlib/source/documentation/lux/control/concurrency/actor.lux b/stdlib/source/documentation/lux/control/concurrency/actor.lux index 4a7199952..4485be388 100644 --- a/stdlib/source/documentation/lux/control/concurrency/actor.lux +++ b/stdlib/source/documentation/lux/control/concurrency/actor.lux @@ -1,10 +1,10 @@ (.using [library [lux {"-" if loop} - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [data - [text {"+" \n} - ["%" format {"+" format}]]] + [text (.only \n) + ["%" format (.only format)]]] [macro ["[0]" template]]]] [\\library diff --git a/stdlib/source/documentation/lux/control/concurrency/async.lux b/stdlib/source/documentation/lux/control/concurrency/async.lux index d060b0ca3..79bf0838a 100644 --- a/stdlib/source/documentation/lux/control/concurrency/async.lux +++ b/stdlib/source/documentation/lux/control/concurrency/async.lux @@ -1,14 +1,14 @@ (.using - [library - [lux {"-" or and} - ["$" documentation {"+" documentation:}] - [data - [text {"+" \n} - ["%" format {"+" format}]]] - [macro - ["[0]" template]]]] - [\\library - ["[0]" /]]) + [library + [lux {"-" or and} + ["$" documentation (.only documentation:)] + [data + [text (.only \n) + ["%" format (.only format)]]] + [macro + ["[0]" template]]]] + [\\library + ["[0]" /]]) (documentation: (/.Async it) "Represents values produced by asynchronous computations (unlike IO, which is synchronous).") diff --git a/stdlib/source/documentation/lux/control/concurrency/atom.lux b/stdlib/source/documentation/lux/control/concurrency/atom.lux index 205f5c9dc..674f621ec 100644 --- a/stdlib/source/documentation/lux/control/concurrency/atom.lux +++ b/stdlib/source/documentation/lux/control/concurrency/atom.lux @@ -1,14 +1,14 @@ (.using - [library - [lux {"-" if loop} - ["$" documentation {"+" documentation:}] - [data - [text {"+" \n} - ["%" format {"+" format}]]] - [macro - ["[0]" template]]]] - [\\library - ["[0]" /]]) + [library + [lux {"-" if loop} + ["$" documentation (.only documentation:)] + [data + [text (.only \n) + ["%" format (.only format)]]] + [macro + ["[0]" template]]]] + [\\library + ["[0]" /]]) (documentation: (/.Atom it) "Atomic references that are safe to mutate concurrently.") diff --git a/stdlib/source/documentation/lux/control/concurrency/frp.lux b/stdlib/source/documentation/lux/control/concurrency/frp.lux index 563177e1a..d896d96ee 100644 --- a/stdlib/source/documentation/lux/control/concurrency/frp.lux +++ b/stdlib/source/documentation/lux/control/concurrency/frp.lux @@ -1,14 +1,14 @@ (.using - [library - [lux {"-" if loop} - ["$" documentation {"+" documentation:}] - [data - [text {"+" \n} - ["%" format {"+" format}]]] - [macro - ["[0]" template]]]] - [\\library - ["[0]" /]]) + [library + [lux {"-" if loop} + ["$" documentation (.only documentation:)] + [data + [text (.only \n) + ["%" format (.only format)]]] + [macro + ["[0]" template]]]] + [\\library + ["[0]" /]]) (documentation: (/.Channel it) "An asynchronous channel to distribute values.") diff --git a/stdlib/source/documentation/lux/control/concurrency/semaphore.lux b/stdlib/source/documentation/lux/control/concurrency/semaphore.lux index b13c8fe49..d5ba9d84b 100644 --- a/stdlib/source/documentation/lux/control/concurrency/semaphore.lux +++ b/stdlib/source/documentation/lux/control/concurrency/semaphore.lux @@ -1,14 +1,14 @@ (.using - [library - [lux {"-" if loop} - ["$" documentation {"+" documentation:}] - [data - [text {"+" \n} - ["%" format {"+" format}]]] - [macro - ["[0]" template]]]] - [\\library - ["[0]" /]]) + [library + [lux {"-" if loop} + ["$" documentation (.only documentation:)] + [data + [text (.only \n) + ["%" format (.only format)]]] + [macro + ["[0]" template]]]] + [\\library + ["[0]" /]]) (documentation: /.Semaphore "A tool for controlling access to resources by multiple concurrent processes.") diff --git a/stdlib/source/documentation/lux/control/concurrency/stm.lux b/stdlib/source/documentation/lux/control/concurrency/stm.lux index 1d2c75baa..2d77deac8 100644 --- a/stdlib/source/documentation/lux/control/concurrency/stm.lux +++ b/stdlib/source/documentation/lux/control/concurrency/stm.lux @@ -1,10 +1,10 @@ (.using [library [lux {"-" if loop} - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [data - [text {"+" \n} - ["%" format {"+" format}]]] + [text (.only \n) + ["%" format (.only format)]]] [macro ["[0]" template]]]] [\\library diff --git a/stdlib/source/documentation/lux/control/concurrency/thread.lux b/stdlib/source/documentation/lux/control/concurrency/thread.lux index b085383aa..41060e6f0 100644 --- a/stdlib/source/documentation/lux/control/concurrency/thread.lux +++ b/stdlib/source/documentation/lux/control/concurrency/thread.lux @@ -1,14 +1,14 @@ (.using - [library - [lux {"-" if loop} - ["$" documentation {"+" documentation:}] - [data - [text {"+" \n} - ["%" format {"+" format}]]] - [macro - ["[0]" template]]]] - [\\library - ["[0]" /]]) + [library + [lux {"-" if loop} + ["$" documentation (.only documentation:)] + [data + [text (.only \n) + ["%" format (.only format)]]] + [macro + ["[0]" template]]]] + [\\library + ["[0]" /]]) (documentation: /.parallelism "How many processes can run in parallel.") diff --git a/stdlib/source/documentation/lux/control/continuation.lux b/stdlib/source/documentation/lux/control/continuation.lux index 42dec462f..13320a6fc 100644 --- a/stdlib/source/documentation/lux/control/continuation.lux +++ b/stdlib/source/documentation/lux/control/continuation.lux @@ -1,14 +1,14 @@ (.using - [library - [lux {"-" if loop} - ["$" documentation {"+" documentation:}] - [data - [text {"+" \n} - ["%" format {"+" format}]]] - [macro - ["[0]" template]]]] - [\\library - ["[0]" /]]) + [library + [lux {"-" if loop} + ["$" documentation (.only documentation:)] + [data + [text (.only \n) + ["%" format (.only format)]]] + [macro + ["[0]" template]]]] + [\\library + ["[0]" /]]) (documentation: (/.Cont input output) "Continuations.") diff --git a/stdlib/source/documentation/lux/control/exception.lux b/stdlib/source/documentation/lux/control/exception.lux index 96e970156..df5c09066 100644 --- a/stdlib/source/documentation/lux/control/exception.lux +++ b/stdlib/source/documentation/lux/control/exception.lux @@ -1,10 +1,10 @@ (.using [library [lux {"-" if loop} - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [data - [text {"+" \n} - ["%" format {"+" format}]]] + [text (.only \n) + ["%" format (.only format)]]] [macro ["[0]" template]]]] [\\library diff --git a/stdlib/source/documentation/lux/control/function.lux b/stdlib/source/documentation/lux/control/function.lux index 8213b2616..0dac18b26 100644 --- a/stdlib/source/documentation/lux/control/function.lux +++ b/stdlib/source/documentation/lux/control/function.lux @@ -1,19 +1,19 @@ (.using - [library - [lux {"-" if loop} - ["$" documentation {"+" documentation:}] - [data - [text {"+" \n} - ["%" format {"+" format}]]] - [macro - ["[0]" template]]]] - [\\library - ["[0]" /]] - ["[0]" / "_" - ["[1][0]" contract] - ["[1][0]" memo] - ["[1][0]" mixin] - ["[1][0]" mutual]]) + [library + [lux {"-" if loop} + ["$" documentation (.only documentation:)] + [data + [text (.only \n) + ["%" format (.only format)]]] + [macro + ["[0]" template]]]] + [\\library + ["[0]" /]] + ["[0]" / "_" + ["[1][0]" contract] + ["[1][0]" memo] + ["[1][0]" mixin] + ["[1][0]" mutual]]) (documentation: /.identity (format "Identity function." diff --git a/stdlib/source/documentation/lux/control/function/contract.lux b/stdlib/source/documentation/lux/control/function/contract.lux index 62aff3670..f57997793 100644 --- a/stdlib/source/documentation/lux/control/function/contract.lux +++ b/stdlib/source/documentation/lux/control/function/contract.lux @@ -1,14 +1,14 @@ (.using - [library - [lux {"-" if loop} - ["$" documentation {"+" documentation:}] - [data - [text {"+" \n} - ["%" format {"+" format}]]] - [macro - ["[0]" template]]]] - [\\library - ["[0]" /]]) + [library + [lux {"-" if loop} + ["$" documentation (.only documentation:)] + [data + [text (.only \n) + ["%" format (.only format)]]] + [macro + ["[0]" template]]]] + [\\library + ["[0]" /]]) (documentation: /.pre (format "Pre-conditions." diff --git a/stdlib/source/documentation/lux/control/function/memo.lux b/stdlib/source/documentation/lux/control/function/memo.lux index 9baa0d1a7..0f07fdf33 100644 --- a/stdlib/source/documentation/lux/control/function/memo.lux +++ b/stdlib/source/documentation/lux/control/function/memo.lux @@ -1,10 +1,10 @@ (.using [library [lux {"-" open} - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [data - [text {"+" \n} - ["%" format {"+" format}]]] + [text (.only \n) + ["%" format (.only format)]]] [macro ["[0]" template]]]] [\\library diff --git a/stdlib/source/documentation/lux/control/function/mixin.lux b/stdlib/source/documentation/lux/control/function/mixin.lux index 83ecbaac1..c6ddcf3c5 100644 --- a/stdlib/source/documentation/lux/control/function/mixin.lux +++ b/stdlib/source/documentation/lux/control/function/mixin.lux @@ -1,14 +1,14 @@ (.using - [library - [lux {"-" if loop} - ["$" documentation {"+" documentation:}] - [data - [text {"+" \n} - ["%" format {"+" format}]]] - [macro - ["[0]" template]]]] - [\\library - ["[0]" /]]) + [library + [lux {"-" if loop} + ["$" documentation (.only documentation:)] + [data + [text (.only \n) + ["%" format (.only format)]]] + [macro + ["[0]" template]]]] + [\\library + ["[0]" /]]) (documentation: (/.Mixin input output) "A partially-defined function which can be mixed with others to inherit their behavior.") diff --git a/stdlib/source/documentation/lux/control/function/mutual.lux b/stdlib/source/documentation/lux/control/function/mutual.lux index 732db8308..2568fd4a5 100644 --- a/stdlib/source/documentation/lux/control/function/mutual.lux +++ b/stdlib/source/documentation/lux/control/function/mutual.lux @@ -1,14 +1,14 @@ (.using - [library - [lux {"-" let def:} - ["$" documentation {"+" documentation:}] - [data - [text {"+" \n} - ["%" format {"+" format}]]] - [macro - ["[0]" template]]]] - [\\library - ["[0]" /]]) + [library + [lux {"-" let def:} + ["$" documentation (.only documentation:)] + [data + [text (.only \n) + ["%" format (.only format)]]] + [macro + ["[0]" template]]]] + [\\library + ["[0]" /]]) (documentation: /.let "Locally-defined mutually-recursive functions." diff --git a/stdlib/source/documentation/lux/control/io.lux b/stdlib/source/documentation/lux/control/io.lux index 6dc82c1e1..a5ff21915 100644 --- a/stdlib/source/documentation/lux/control/io.lux +++ b/stdlib/source/documentation/lux/control/io.lux @@ -1,14 +1,14 @@ (.using - [library - [lux {"-" if loop} - ["$" documentation {"+" documentation:}] - [data - [text {"+" \n} - ["%" format {"+" format}]]] - [macro - ["[0]" template]]]] - [\\library - ["[0]" /]]) + [library + [lux {"-" if loop} + ["$" documentation (.only documentation:)] + [data + [text (.only \n) + ["%" format (.only format)]]] + [macro + ["[0]" template]]]] + [\\library + ["[0]" /]]) (documentation: (/.IO it) "A type that represents synchronous, effectful computations that may interact with the outside world.") diff --git a/stdlib/source/documentation/lux/control/lazy.lux b/stdlib/source/documentation/lux/control/lazy.lux index fe4950b12..bfb83290c 100644 --- a/stdlib/source/documentation/lux/control/lazy.lux +++ b/stdlib/source/documentation/lux/control/lazy.lux @@ -1,14 +1,14 @@ (.using - [library - [lux {"-" if loop} - ["$" documentation {"+" documentation:}] - [data - [text {"+" \n} - ["%" format {"+" format}]]] - [macro - ["[0]" template]]]] - [\\library - ["[0]" /]]) + [library + [lux {"-" if loop} + ["$" documentation (.only documentation:)] + [data + [text (.only \n) + ["%" format (.only format)]]] + [macro + ["[0]" template]]]] + [\\library + ["[0]" /]]) (documentation: (/.Lazy it) (format "A value specified by an expression that is calculated only at the last moment possible." diff --git a/stdlib/source/documentation/lux/control/maybe.lux b/stdlib/source/documentation/lux/control/maybe.lux index be14998dc..00923d380 100644 --- a/stdlib/source/documentation/lux/control/maybe.lux +++ b/stdlib/source/documentation/lux/control/maybe.lux @@ -1,14 +1,14 @@ (.using - [library - [lux {"-" if loop} - ["$" documentation {"+" documentation:}] - [data - [text {"+" \n} - ["%" format {"+" format}]]] - [macro - ["[0]" template]]]] - [\\library - ["[0]" /]]) + [library + [lux {"-" if loop} + ["$" documentation (.only documentation:)] + [data + [text (.only \n) + ["%" format (.only format)]]] + [macro + ["[0]" template]]]] + [\\library + ["[0]" /]]) (documentation: /.lifted "Wraps a monadic value with Maybe machinery." diff --git a/stdlib/source/documentation/lux/control/parser.lux b/stdlib/source/documentation/lux/control/parser.lux index 7dcfbbaf6..15817f391 100644 --- a/stdlib/source/documentation/lux/control/parser.lux +++ b/stdlib/source/documentation/lux/control/parser.lux @@ -1,26 +1,26 @@ (.using - [library - [lux {"-" or and not} - ["$" documentation {"+" documentation:}] - [data - [text {"+" \n} - ["%" format {"+" format}]]] - [macro - ["[0]" template]]]] - [\\library - ["[0]" /]] - ["[0]" / "_" - ["[1][0]" analysis] - ["[1][0]" binary] - ["[1][0]" cli] - ["[1][0]" code] - ["[1][0]" environment] - ["[1][0]" json] - ["[1][0]" synthesis] - ["[1][0]" text] - ["[1][0]" tree] - ["[1][0]" type] - ["[1][0]" xml]]) + [library + [lux {"-" or and not} + ["$" documentation (.only documentation:)] + [data + [text (.only \n) + ["%" format (.only format)]]] + [macro + ["[0]" template]]]] + [\\library + ["[0]" /]] + ["[0]" / "_" + ["[1][0]" analysis] + ["[1][0]" binary] + ["[1][0]" cli] + ["[1][0]" code] + ["[1][0]" environment] + ["[1][0]" json] + ["[1][0]" synthesis] + ["[1][0]" text] + ["[1][0]" tree] + ["[1][0]" type] + ["[1][0]" xml]]) (documentation: (/.Parser state it) "A generic parser.") diff --git a/stdlib/source/documentation/lux/control/parser/analysis.lux b/stdlib/source/documentation/lux/control/parser/analysis.lux index aa4542f2d..493a21e3a 100644 --- a/stdlib/source/documentation/lux/control/parser/analysis.lux +++ b/stdlib/source/documentation/lux/control/parser/analysis.lux @@ -1,10 +1,10 @@ (.using [library [lux {"-" nat int rev local} - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [data - [text {"+" \n} - ["%" format {"+" format}]]] + [text (.only \n) + ["%" format (.only format)]]] [macro ["[0]" template]]]] [\\library diff --git a/stdlib/source/documentation/lux/control/parser/binary.lux b/stdlib/source/documentation/lux/control/parser/binary.lux index 0a163f2a8..746e9fcee 100644 --- a/stdlib/source/documentation/lux/control/parser/binary.lux +++ b/stdlib/source/documentation/lux/control/parser/binary.lux @@ -1,10 +1,10 @@ (.using [library [lux {"-" list} - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [data - [text {"+" \n} - ["%" format {"+" format}]]] + [text (.only \n) + ["%" format (.only format)]]] [macro ["[0]" template]]]] [\\library diff --git a/stdlib/source/documentation/lux/control/parser/cli.lux b/stdlib/source/documentation/lux/control/parser/cli.lux index 1ef937a0b..f20d3a686 100644 --- a/stdlib/source/documentation/lux/control/parser/cli.lux +++ b/stdlib/source/documentation/lux/control/parser/cli.lux @@ -1,10 +1,10 @@ (.using [library [lux {"-" parameter} - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [data - [text {"+" \n} - ["%" format {"+" format}]]] + [text (.only \n) + ["%" format (.only format)]]] [macro ["[0]" template]]]] [\\library diff --git a/stdlib/source/documentation/lux/control/parser/code.lux b/stdlib/source/documentation/lux/control/parser/code.lux index 552738c03..b0336ce13 100644 --- a/stdlib/source/documentation/lux/control/parser/code.lux +++ b/stdlib/source/documentation/lux/control/parser/code.lux @@ -1,10 +1,10 @@ (.using [library [lux {"-" nat int rev local not symbol} - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [data - [text {"+" \n} - ["%" format {"+" format}]]] + [text (.only \n) + ["%" format (.only format)]]] [macro ["[0]" template]]]] [\\library diff --git a/stdlib/source/documentation/lux/control/parser/environment.lux b/stdlib/source/documentation/lux/control/parser/environment.lux index 9d99d77df..b27b0bff8 100644 --- a/stdlib/source/documentation/lux/control/parser/environment.lux +++ b/stdlib/source/documentation/lux/control/parser/environment.lux @@ -1,14 +1,14 @@ (.using - [library - [lux "*" - ["$" documentation {"+" documentation:}] - [data - [text {"+" \n} - ["%" format {"+" format}]]] - [macro - ["[0]" template]]]] - [\\library - ["[0]" /]]) + [library + [lux "*" + ["$" documentation (.only documentation:)] + [data + [text (.only \n) + ["%" format (.only format)]]] + [macro + ["[0]" template]]]] + [\\library + ["[0]" /]]) (documentation: /.Property "A property in the environment.") diff --git a/stdlib/source/documentation/lux/control/parser/json.lux b/stdlib/source/documentation/lux/control/parser/json.lux index 714fd3326..0404d2227 100644 --- a/stdlib/source/documentation/lux/control/parser/json.lux +++ b/stdlib/source/documentation/lux/control/parser/json.lux @@ -1,10 +1,10 @@ (.using [library [lux "*" - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [data - [text {"+" \n} - ["%" format {"+" format}]]] + [text (.only \n) + ["%" format (.only format)]]] [macro ["[0]" template]]]] [\\library diff --git a/stdlib/source/documentation/lux/control/parser/synthesis.lux b/stdlib/source/documentation/lux/control/parser/synthesis.lux index 498b88d96..1420d65ec 100644 --- a/stdlib/source/documentation/lux/control/parser/synthesis.lux +++ b/stdlib/source/documentation/lux/control/parser/synthesis.lux @@ -1,10 +1,10 @@ (.using [library [lux {"-" i64 local function loop} - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [data - [text {"+" \n} - ["%" format {"+" format}]]] + [text (.only \n) + ["%" format (.only format)]]] [macro ["[0]" template]]]] [\\library diff --git a/stdlib/source/documentation/lux/control/parser/text.lux b/stdlib/source/documentation/lux/control/parser/text.lux index 1859f451c..581c04668 100644 --- a/stdlib/source/documentation/lux/control/parser/text.lux +++ b/stdlib/source/documentation/lux/control/parser/text.lux @@ -1,10 +1,10 @@ (.using [library [lux {"-" and not local} - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [data - [text {"+" \n} - ["%" format {"+" format}]]] + [text (.only \n) + ["%" format (.only format)]]] [macro ["[0]" template]]]] [\\library diff --git a/stdlib/source/documentation/lux/control/parser/tree.lux b/stdlib/source/documentation/lux/control/parser/tree.lux index 282fcc7af..42c51b68a 100644 --- a/stdlib/source/documentation/lux/control/parser/tree.lux +++ b/stdlib/source/documentation/lux/control/parser/tree.lux @@ -1,10 +1,10 @@ (.using [library [lux {"-" left right} - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [data - [text {"+" \n} - ["%" format {"+" format}]]] + [text (.only \n) + ["%" format (.only format)]]] [macro ["[0]" template]]]] [\\library diff --git a/stdlib/source/documentation/lux/control/parser/type.lux b/stdlib/source/documentation/lux/control/parser/type.lux index b240b24ad..7f4858310 100644 --- a/stdlib/source/documentation/lux/control/parser/type.lux +++ b/stdlib/source/documentation/lux/control/parser/type.lux @@ -1,10 +1,10 @@ (.using [library [lux {"-" local function} - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [data - [text {"+" \n} - ["%" format {"+" format}]]] + [text (.only \n) + ["%" format (.only format)]]] [macro ["[0]" template]]]] [\\library diff --git a/stdlib/source/documentation/lux/control/parser/xml.lux b/stdlib/source/documentation/lux/control/parser/xml.lux index 44cb9f663..c286b18a1 100644 --- a/stdlib/source/documentation/lux/control/parser/xml.lux +++ b/stdlib/source/documentation/lux/control/parser/xml.lux @@ -1,14 +1,14 @@ (.using - [library - [lux "*" - ["$" documentation {"+" documentation:}] - [data - [text {"+" \n} - ["%" format {"+" format}]]] - [macro - ["[0]" template]]]] - [\\library - ["[0]" /]]) + [library + [lux "*" + ["$" documentation (.only documentation:)] + [data + [text (.only \n) + ["%" format (.only format)]]] + [macro + ["[0]" template]]]] + [\\library + ["[0]" /]]) (documentation: (/.Parser it) "A parser of XML-encoded data.") diff --git a/stdlib/source/documentation/lux/control/pipe.lux b/stdlib/source/documentation/lux/control/pipe.lux index ae6c1e740..e2d58f76e 100644 --- a/stdlib/source/documentation/lux/control/pipe.lux +++ b/stdlib/source/documentation/lux/control/pipe.lux @@ -1,10 +1,10 @@ (.using [library [lux {"-" let cond if exec case} - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [data - [text {"+" \n} - ["%" format {"+" format}]]] + [text (.only \n) + ["%" format (.only format)]]] [macro ["[0]" template]]]] [\\library diff --git a/stdlib/source/documentation/lux/control/reader.lux b/stdlib/source/documentation/lux/control/reader.lux index 909f8bf59..5e3991942 100644 --- a/stdlib/source/documentation/lux/control/reader.lux +++ b/stdlib/source/documentation/lux/control/reader.lux @@ -1,14 +1,14 @@ (.using - [library - [lux {"-" local} - ["$" documentation {"+" documentation:}] - [data - [text {"+" \n} - ["%" format {"+" format}]]] - [macro - ["[0]" template]]]] - [\\library - ["[0]" /]]) + [library + [lux {"-" local} + ["$" documentation (.only documentation:)] + [data + [text (.only \n) + ["%" format (.only format)]]] + [macro + ["[0]" template]]]] + [\\library + ["[0]" /]]) (documentation: (/.Reader environment it) "Computations that have access to some environmental value.") diff --git a/stdlib/source/documentation/lux/control/region.lux b/stdlib/source/documentation/lux/control/region.lux index 3ea4361f5..9b6574ef3 100644 --- a/stdlib/source/documentation/lux/control/region.lux +++ b/stdlib/source/documentation/lux/control/region.lux @@ -1,14 +1,14 @@ (.using - [library - [lux {"-" if loop} - ["$" documentation {"+" documentation:}] - [data - [text {"+" \n} - ["%" format {"+" format}]]] - [macro - ["[0]" template]]]] - [\\library - ["[0]" /]]) + [library + [lux {"-" if loop} + ["$" documentation (.only documentation:)] + [data + [text (.only \n) + ["%" format (.only format)]]] + [macro + ["[0]" template]]]] + [\\library + ["[0]" /]]) (documentation: (/.Region r ! it) (format "A region where resources may be be claimed and where a side-effecting computation may be performed." diff --git a/stdlib/source/documentation/lux/control/remember.lux b/stdlib/source/documentation/lux/control/remember.lux index f19ef860d..6008acd0b 100644 --- a/stdlib/source/documentation/lux/control/remember.lux +++ b/stdlib/source/documentation/lux/control/remember.lux @@ -1,14 +1,14 @@ (.using - [library - [lux "*" - ["$" documentation {"+" documentation:}] - [data - [text {"+" \n} - ["%" format {"+" format}]]] - [macro - ["[0]" template]]]] - [\\library - ["[0]" /]]) + [library + [lux "*" + ["$" documentation (.only documentation:)] + [data + [text (.only \n) + ["%" format (.only format)]]] + [macro + ["[0]" template]]]] + [\\library + ["[0]" /]]) (documentation: /.remember (format "A message with an expiration date." diff --git a/stdlib/source/documentation/lux/control/security.lux b/stdlib/source/documentation/lux/control/security.lux index e88b60028..d43a54228 100644 --- a/stdlib/source/documentation/lux/control/security.lux +++ b/stdlib/source/documentation/lux/control/security.lux @@ -1,15 +1,15 @@ (.using - [library - [lux "*" - ["$" documentation {"+" documentation:}] - [data - [text {"+" \n} - ["%" format {"+" format}]] - [collection - ["[0]" list]]]]] - ["[0]" / "_" - ["[1][0]" capability] - ["[1][0]" policy]]) + [library + [lux "*" + ["$" documentation (.only documentation:)] + [data + [text (.only \n) + ["%" format (.only format)]] + [collection + ["[0]" list]]]]] + ["[0]" / "_" + ["[1][0]" capability] + ["[1][0]" policy]]) (.def: .public documentation (.List $.Module) diff --git a/stdlib/source/documentation/lux/control/security/capability.lux b/stdlib/source/documentation/lux/control/security/capability.lux index 6acef6829..f29b5f8a9 100644 --- a/stdlib/source/documentation/lux/control/security/capability.lux +++ b/stdlib/source/documentation/lux/control/security/capability.lux @@ -1,14 +1,14 @@ (.using - [library - [lux "*" - ["$" documentation {"+" documentation:}] - [data - [text {"+" \n} - ["%" format {"+" format}]]] - [macro - ["[0]" template]]]] - [\\library - ["[0]" /]]) + [library + [lux "*" + ["$" documentation (.only documentation:)] + [data + [text (.only \n) + ["%" format (.only format)]]] + [macro + ["[0]" template]]]] + [\\library + ["[0]" /]]) (documentation: (/.Capability brand input output) (format "Represents the capability to perform an operation." diff --git a/stdlib/source/documentation/lux/control/security/policy.lux b/stdlib/source/documentation/lux/control/security/policy.lux index 2a373f04c..d9243d7ad 100644 --- a/stdlib/source/documentation/lux/control/security/policy.lux +++ b/stdlib/source/documentation/lux/control/security/policy.lux @@ -1,10 +1,10 @@ (.using [library [lux "*" - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [data - [text {"+" \n} - ["%" format {"+" format}]]] + [text (.only \n) + ["%" format (.only format)]]] [macro ["[0]" template]]]] [\\library diff --git a/stdlib/source/documentation/lux/control/state.lux b/stdlib/source/documentation/lux/control/state.lux index dc1d9effd..316748cd9 100644 --- a/stdlib/source/documentation/lux/control/state.lux +++ b/stdlib/source/documentation/lux/control/state.lux @@ -1,14 +1,14 @@ (.using - [library - [lux {"-" local} - ["$" documentation {"+" documentation:}] - [data - [text {"+" \n} - ["%" format {"+" format}]]] - [macro - ["[0]" template]]]] - [\\library - ["[0]" /]]) + [library + [lux {"-" local} + ["$" documentation (.only documentation:)] + [data + [text (.only \n) + ["%" format (.only format)]]] + [macro + ["[0]" template]]]] + [\\library + ["[0]" /]]) (documentation: (/.State state it) "Stateful computations.") diff --git a/stdlib/source/documentation/lux/control/thread.lux b/stdlib/source/documentation/lux/control/thread.lux index c67998e1d..1b08487c4 100644 --- a/stdlib/source/documentation/lux/control/thread.lux +++ b/stdlib/source/documentation/lux/control/thread.lux @@ -1,14 +1,14 @@ (.using - [library - [lux {"-" local} - ["$" documentation {"+" documentation:}] - [data - [text {"+" \n} - ["%" format {"+" format}]]] - [macro - ["[0]" template]]]] - [\\library - ["[0]" /]]) + [library + [lux {"-" local} + ["$" documentation (.only documentation:)] + [data + [text (.only \n) + ["%" format (.only format)]]] + [macro + ["[0]" template]]]] + [\\library + ["[0]" /]]) (documentation: (/.Thread ! it) "An imperative process with access to mutable values.") diff --git a/stdlib/source/documentation/lux/control/try.lux b/stdlib/source/documentation/lux/control/try.lux index b2a586bf0..61147f884 100644 --- a/stdlib/source/documentation/lux/control/try.lux +++ b/stdlib/source/documentation/lux/control/try.lux @@ -1,14 +1,14 @@ (.using - [library - [lux {"-" local} - ["$" documentation {"+" documentation:}] - [data - [text {"+" \n} - ["%" format {"+" format}]]] - [macro - ["[0]" template]]]] - [\\library - ["[0]" /]]) + [library + [lux {"-" local} + ["$" documentation (.only documentation:)] + [data + [text (.only \n) + ["%" format (.only format)]]] + [macro + ["[0]" template]]]] + [\\library + ["[0]" /]]) (documentation: (/.Try it) "A computation that can fail with an error message.") diff --git a/stdlib/source/documentation/lux/control/writer.lux b/stdlib/source/documentation/lux/control/writer.lux index b786c25ee..535e856e0 100644 --- a/stdlib/source/documentation/lux/control/writer.lux +++ b/stdlib/source/documentation/lux/control/writer.lux @@ -1,14 +1,14 @@ (.using - [library - [lux {"-" local} - ["$" documentation {"+" documentation:}] - [data - [text {"+" \n} - ["%" format {"+" format}]]] - [macro - ["[0]" template]]]] - [\\library - ["[0]" /]]) + [library + [lux {"-" local} + ["$" documentation (.only documentation:)] + [data + [text (.only \n) + ["%" format (.only format)]]] + [macro + ["[0]" template]]]] + [\\library + ["[0]" /]]) (documentation: (/.Writer log value) "Represents a value with an associated 'log' to record arbitrary information.") diff --git a/stdlib/source/documentation/lux/data.lux b/stdlib/source/documentation/lux/data.lux index e9cf6e827..2379b4653 100644 --- a/stdlib/source/documentation/lux/data.lux +++ b/stdlib/source/documentation/lux/data.lux @@ -1,22 +1,22 @@ (.using - [library - [lux "*" - ["$" documentation {"+" documentation:}] - [data - [text {"+" \n} - ["%" format {"+" format}]] - [collection - ["[0]" list]]]]] - ["[0]" / "_" - ["[1][0]" binary] - ["[1][0]" bit] - ["[1][0]" collection] - ["[1][0]" color] - ["[1][0]" format] - ["[1][0]" identity] - ["[1][0]" product] - ["[1][0]" sum] - ["[1][0]" text]]) + [library + [lux "*" + ["$" documentation (.only documentation:)] + [data + [text (.only \n) + ["%" format (.only format)]] + [collection + ["[0]" list]]]]] + ["[0]" / "_" + ["[1][0]" binary] + ["[1][0]" bit] + ["[1][0]" collection] + ["[1][0]" color] + ["[1][0]" format] + ["[1][0]" identity] + ["[1][0]" product] + ["[1][0]" sum] + ["[1][0]" text]]) (.def: .public documentation (.List $.Module) diff --git a/stdlib/source/documentation/lux/data/binary.lux b/stdlib/source/documentation/lux/data/binary.lux index ecf9bba44..3e3b50999 100644 --- a/stdlib/source/documentation/lux/data/binary.lux +++ b/stdlib/source/documentation/lux/data/binary.lux @@ -1,10 +1,10 @@ (.using [library [lux "*" - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [data - [text {"+" \n} - ["%" format {"+" format}]]] + [text (.only \n) + ["%" format (.only format)]]] [macro ["[0]" template]]]] [\\library diff --git a/stdlib/source/documentation/lux/data/bit.lux b/stdlib/source/documentation/lux/data/bit.lux index 4ae895893..757cbea9f 100644 --- a/stdlib/source/documentation/lux/data/bit.lux +++ b/stdlib/source/documentation/lux/data/bit.lux @@ -1,14 +1,14 @@ (.using - [library - [lux "*" - ["$" documentation {"+" documentation:}] - [data - [text {"+" \n} - ["%" format {"+" format}]]] - [macro - ["[0]" template]]]] - [\\library - ["[0]" /]]) + [library + [lux "*" + ["$" documentation (.only documentation:)] + [data + [text (.only \n) + ["%" format (.only format)]]] + [macro + ["[0]" template]]]] + [\\library + ["[0]" /]]) (documentation: /.complement (format "Generates the complement of a predicate." diff --git a/stdlib/source/documentation/lux/data/collection.lux b/stdlib/source/documentation/lux/data/collection.lux index 9928cbe3e..ce9b1b1d3 100644 --- a/stdlib/source/documentation/lux/data/collection.lux +++ b/stdlib/source/documentation/lux/data/collection.lux @@ -1,23 +1,23 @@ (.using - [library - [lux "*" - ["$" documentation {"+" documentation:}] - [data - [text {"+" \n} - ["%" format {"+" format}]] - [collection - ["[0]" list]]]]] - ["[0]" / "_" - ["[1][0]" array] - ["[1][0]" bits] - ["[1][0]" dictionary] - ["[1][0]" list] - ["[1][0]" queue] - ["[1][0]" sequence] - ["[1][0]" stream] - ["[1][0]" stack] - ["[1][0]" set] - ["[1][0]" tree]]) + [library + [lux "*" + ["$" documentation (.only documentation:)] + [data + [text (.only \n) + ["%" format (.only format)]] + [collection + ["[0]" list]]]]] + ["[0]" / "_" + ["[1][0]" array] + ["[1][0]" bits] + ["[1][0]" dictionary] + ["[1][0]" list] + ["[1][0]" queue] + ["[1][0]" sequence] + ["[1][0]" stream] + ["[1][0]" stack] + ["[1][0]" set] + ["[1][0]" tree]]) (.def: .public documentation (.List $.Module) diff --git a/stdlib/source/documentation/lux/data/collection/array.lux b/stdlib/source/documentation/lux/data/collection/array.lux index d516f1ec3..d89589979 100644 --- a/stdlib/source/documentation/lux/data/collection/array.lux +++ b/stdlib/source/documentation/lux/data/collection/array.lux @@ -1,19 +1,19 @@ (.using - [library - [lux {"-" list} - ["$" documentation {"+" documentation:}] - [control - ["<>" parser - ["<[0]>" code]]] - [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] - [macro - [syntax {"+" syntax:}] - ["[0]" code] - ["[0]" template]]]] - [\\library - ["[0]" /]]) + [library + [lux {"-" list} + ["$" documentation (.only documentation:)] + [control + ["<>" parser + ["<[0]>" code]]] + [data + ["[0]" text (.only \n) + ["%" format (.only format)]]] + [macro + [syntax (.only syntax:)] + ["[0]" code] + ["[0]" template]]]] + [\\library + ["[0]" /]]) (documentation: (/.Array it) "Mutable arrays.") diff --git a/stdlib/source/documentation/lux/data/collection/bits.lux b/stdlib/source/documentation/lux/data/collection/bits.lux index 7b1438405..d9c23a672 100644 --- a/stdlib/source/documentation/lux/data/collection/bits.lux +++ b/stdlib/source/documentation/lux/data/collection/bits.lux @@ -1,19 +1,19 @@ (.using - [library - [lux {"-" or and not} - ["$" documentation {"+" documentation:}] - [control - ["<>" parser - ["<[0]>" code]]] - [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] - [macro - [syntax {"+" syntax:}] - ["[0]" code] - ["[0]" template]]]] - [\\library - ["[0]" /]]) + [library + [lux {"-" or and not} + ["$" documentation (.only documentation:)] + [control + ["<>" parser + ["<[0]>" code]]] + [data + ["[0]" text (.only \n) + ["%" format (.only format)]]] + [macro + [syntax (.only syntax:)] + ["[0]" code] + ["[0]" template]]]] + [\\library + ["[0]" /]]) (documentation: /.Bits "A bit-map.") diff --git a/stdlib/source/documentation/lux/data/collection/dictionary.lux b/stdlib/source/documentation/lux/data/collection/dictionary.lux index 80e23fc70..90884cad9 100644 --- a/stdlib/source/documentation/lux/data/collection/dictionary.lux +++ b/stdlib/source/documentation/lux/data/collection/dictionary.lux @@ -1,15 +1,15 @@ (.using [library [lux {"-" has revised} - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [control ["<>" parser ["<[0]>" code]]] [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] + ["[0]" text (.only \n) + ["%" format (.only format)]]] [macro - [syntax {"+" syntax:}] + [syntax (.only syntax:)] ["[0]" code] ["[0]" template]]]] [\\library diff --git a/stdlib/source/documentation/lux/data/collection/dictionary/ordered.lux b/stdlib/source/documentation/lux/data/collection/dictionary/ordered.lux index e597d73fa..b0bf3f97d 100644 --- a/stdlib/source/documentation/lux/data/collection/dictionary/ordered.lux +++ b/stdlib/source/documentation/lux/data/collection/dictionary/ordered.lux @@ -1,15 +1,15 @@ (.using [library [lux {"-" has revised} - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [control ["<>" parser ["<[0]>" code]]] [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] + ["[0]" text (.only \n) + ["%" format (.only format)]]] [macro - [syntax {"+" syntax:}] + [syntax (.only syntax:)] ["[0]" code] ["[0]" template]]]] [\\library diff --git a/stdlib/source/documentation/lux/data/collection/dictionary/plist.lux b/stdlib/source/documentation/lux/data/collection/dictionary/plist.lux index 81ca8e29c..88a24b0f0 100644 --- a/stdlib/source/documentation/lux/data/collection/dictionary/plist.lux +++ b/stdlib/source/documentation/lux/data/collection/dictionary/plist.lux @@ -1,15 +1,15 @@ (.using [library [lux {"-" has revised} - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [control ["<>" parser ["<[0]>" code]]] [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] + ["[0]" text (.only \n) + ["%" format (.only format)]]] [macro - [syntax {"+" syntax:}] + [syntax (.only syntax:)] ["[0]" code] ["[0]" template]]]] [\\library diff --git a/stdlib/source/documentation/lux/data/collection/list.lux b/stdlib/source/documentation/lux/data/collection/list.lux index 459e1f8c9..acd54eaab 100644 --- a/stdlib/source/documentation/lux/data/collection/list.lux +++ b/stdlib/source/documentation/lux/data/collection/list.lux @@ -1,15 +1,15 @@ (.using [library [lux {"-" all} - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [control ["<>" parser ["<[0]>" code]]] [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] + ["[0]" text (.only \n) + ["%" format (.only format)]]] [macro - [syntax {"+" syntax:}] + [syntax (.only syntax:)] ["[0]" code] ["[0]" template]]]] [\\library diff --git a/stdlib/source/documentation/lux/data/collection/queue.lux b/stdlib/source/documentation/lux/data/collection/queue.lux index db9dbf22d..a9e243dce 100644 --- a/stdlib/source/documentation/lux/data/collection/queue.lux +++ b/stdlib/source/documentation/lux/data/collection/queue.lux @@ -1,21 +1,21 @@ (.using - [library - [lux {"-" list} - ["$" documentation {"+" documentation:}] - [control - ["<>" parser - ["<[0]>" code]]] - [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] - [macro - [syntax {"+" syntax:}] - ["[0]" code] - ["[0]" template]]]] - [\\library - ["[0]" /]] - ["[0]" / "_" - ["[1][0]" priority]]) + [library + [lux {"-" list} + ["$" documentation (.only documentation:)] + [control + ["<>" parser + ["<[0]>" code]]] + [data + ["[0]" text (.only \n) + ["%" format (.only format)]]] + [macro + [syntax (.only syntax:)] + ["[0]" code] + ["[0]" template]]]] + [\\library + ["[0]" /]] + ["[0]" / "_" + ["[1][0]" priority]]) (documentation: (/.Queue it) "A first-in, first-out sequential data-structure.") diff --git a/stdlib/source/documentation/lux/data/collection/queue/priority.lux b/stdlib/source/documentation/lux/data/collection/queue/priority.lux index 2d75d2405..37030d30a 100644 --- a/stdlib/source/documentation/lux/data/collection/queue/priority.lux +++ b/stdlib/source/documentation/lux/data/collection/queue/priority.lux @@ -1,19 +1,19 @@ (.using - [library - [lux {"-" list} - ["$" documentation {"+" documentation:}] - [control - ["<>" parser - ["<[0]>" code]]] - [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] - [macro - [syntax {"+" syntax:}] - ["[0]" code] - ["[0]" template]]]] - [\\library - ["[0]" /]]) + [library + [lux {"-" list} + ["$" documentation (.only documentation:)] + [control + ["<>" parser + ["<[0]>" code]]] + [data + ["[0]" text (.only \n) + ["%" format (.only format)]]] + [macro + [syntax (.only syntax:)] + ["[0]" code] + ["[0]" template]]]] + [\\library + ["[0]" /]]) (documentation: /.member? "" diff --git a/stdlib/source/documentation/lux/data/collection/sequence.lux b/stdlib/source/documentation/lux/data/collection/sequence.lux index 3f25a8a2b..13521af1c 100644 --- a/stdlib/source/documentation/lux/data/collection/sequence.lux +++ b/stdlib/source/documentation/lux/data/collection/sequence.lux @@ -1,15 +1,15 @@ (.using [library [lux {"-" list has revised} - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [control ["<>" parser ["<[0]>" code]]] [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] + ["[0]" text (.only \n) + ["%" format (.only format)]]] [macro - [syntax {"+" syntax:}] + [syntax (.only syntax:)] ["[0]" code] ["[0]" template]]]] [\\library diff --git a/stdlib/source/documentation/lux/data/collection/set.lux b/stdlib/source/documentation/lux/data/collection/set.lux index afac731cb..7b0e2e838 100644 --- a/stdlib/source/documentation/lux/data/collection/set.lux +++ b/stdlib/source/documentation/lux/data/collection/set.lux @@ -1,13 +1,13 @@ (.using [library [lux {"-" list has} - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [control ["<>" parser ["<[0]>" code]]] [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] + ["[0]" text (.only \n) + ["%" format (.only format)]]] [macro ["[0]" template]]]] [\\library diff --git a/stdlib/source/documentation/lux/data/collection/set/multi.lux b/stdlib/source/documentation/lux/data/collection/set/multi.lux index 40c11a4d0..ec0e44e6f 100644 --- a/stdlib/source/documentation/lux/data/collection/set/multi.lux +++ b/stdlib/source/documentation/lux/data/collection/set/multi.lux @@ -1,13 +1,13 @@ (.using [library [lux {"-" list has} - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [control ["<>" parser ["<[0]>" code]]] [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] + ["[0]" text (.only \n) + ["%" format (.only format)]]] [macro ["[0]" template]]]] [\\library diff --git a/stdlib/source/documentation/lux/data/collection/set/ordered.lux b/stdlib/source/documentation/lux/data/collection/set/ordered.lux index c239a9b35..1664a6683 100644 --- a/stdlib/source/documentation/lux/data/collection/set/ordered.lux +++ b/stdlib/source/documentation/lux/data/collection/set/ordered.lux @@ -1,13 +1,13 @@ (.using [library [lux {"-" list has} - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [control ["<>" parser ["<[0]>" code]]] [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] + ["[0]" text (.only \n) + ["%" format (.only format)]]] [macro ["[0]" template]]]] [\\library diff --git a/stdlib/source/documentation/lux/data/collection/stack.lux b/stdlib/source/documentation/lux/data/collection/stack.lux index b66f00e58..f5b8626e3 100644 --- a/stdlib/source/documentation/lux/data/collection/stack.lux +++ b/stdlib/source/documentation/lux/data/collection/stack.lux @@ -1,17 +1,17 @@ (.using - [library - [lux {"-" list} - ["$" documentation {"+" documentation:}] - [control - ["<>" parser - ["<[0]>" code]]] - [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] - [macro - ["[0]" template]]]] - [\\library - ["[0]" /]]) + [library + [lux {"-" list} + ["$" documentation (.only documentation:)] + [control + ["<>" parser + ["<[0]>" code]]] + [data + ["[0]" text (.only \n) + ["%" format (.only format)]]] + [macro + ["[0]" template]]]] + [\\library + ["[0]" /]]) (documentation: (/.Stack it) "A first-in, last-out sequential data-structure.") diff --git a/stdlib/source/documentation/lux/data/collection/stream.lux b/stdlib/source/documentation/lux/data/collection/stream.lux index bba416ae1..942772a3f 100644 --- a/stdlib/source/documentation/lux/data/collection/stream.lux +++ b/stdlib/source/documentation/lux/data/collection/stream.lux @@ -1,15 +1,15 @@ (.using [library [lux {"-" list pattern} - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [control ["<>" parser ["<[0]>" code]]] [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] + ["[0]" text (.only \n) + ["%" format (.only format)]]] [macro - [syntax {"+" syntax:}] + [syntax (.only syntax:)] ["[0]" code] ["[0]" template]]]] [\\library diff --git a/stdlib/source/documentation/lux/data/collection/tree.lux b/stdlib/source/documentation/lux/data/collection/tree.lux index f4287d194..bd39bb4e5 100644 --- a/stdlib/source/documentation/lux/data/collection/tree.lux +++ b/stdlib/source/documentation/lux/data/collection/tree.lux @@ -1,13 +1,13 @@ (.using [library [lux {"-" list} - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [control ["<>" parser ["<[0]>" code]]] [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] + ["[0]" text (.only \n) + ["%" format (.only format)]]] [macro ["[0]" template]]]] [\\library diff --git a/stdlib/source/documentation/lux/data/collection/tree/finger.lux b/stdlib/source/documentation/lux/data/collection/tree/finger.lux index 6925c9667..ea3e6d859 100644 --- a/stdlib/source/documentation/lux/data/collection/tree/finger.lux +++ b/stdlib/source/documentation/lux/data/collection/tree/finger.lux @@ -1,17 +1,17 @@ (.using - [library - [lux {"-" list} - ["$" documentation {"+" documentation:}] - [control - ["<>" parser - ["<[0]>" code]]] - [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] - [macro - ["[0]" template]]]] - [\\library - ["[0]" /]]) + [library + [lux {"-" list} + ["$" documentation (.only documentation:)] + [control + ["<>" parser + ["<[0]>" code]]] + [data + ["[0]" text (.only \n) + ["%" format (.only format)]]] + [macro + ["[0]" template]]]] + [\\library + ["[0]" /]]) (documentation: (/.Tree @ tag value) "A finger tree.") diff --git a/stdlib/source/documentation/lux/data/collection/tree/zipper.lux b/stdlib/source/documentation/lux/data/collection/tree/zipper.lux index 6a9fdf3e0..505be963f 100644 --- a/stdlib/source/documentation/lux/data/collection/tree/zipper.lux +++ b/stdlib/source/documentation/lux/data/collection/tree/zipper.lux @@ -1,17 +1,17 @@ (.using - [library - [lux {"-" list} - ["$" documentation {"+" documentation:}] - [control - ["<>" parser - ["<[0]>" code]]] - [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] - [macro - ["[0]" template]]]] - [\\library - ["[0]" /]]) + [library + [lux {"-" list} + ["$" documentation (.only documentation:)] + [control + ["<>" parser + ["<[0]>" code]]] + [data + ["[0]" text (.only \n) + ["%" format (.only format)]]] + [macro + ["[0]" template]]]] + [\\library + ["[0]" /]]) (documentation: (/.Zipper it) "Tree zippers, for easy navigation and editing of trees.") diff --git a/stdlib/source/documentation/lux/data/color.lux b/stdlib/source/documentation/lux/data/color.lux index ca2a4c430..b7bb52100 100644 --- a/stdlib/source/documentation/lux/data/color.lux +++ b/stdlib/source/documentation/lux/data/color.lux @@ -1,21 +1,21 @@ (.using - [library - [lux "*" - ["$" documentation {"+" documentation:}] - [control - ["<>" parser - ["<[0]>" code]]] - [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] - [macro - [syntax {"+" syntax:}] - ["[0]" code] - ["[0]" template]]]] - [\\library - ["[0]" /]] - ["[0]" / "_" - ["[1][0]" named]]) + [library + [lux "*" + ["$" documentation (.only documentation:)] + [control + ["<>" parser + ["<[0]>" code]]] + [data + ["[0]" text (.only \n) + ["%" format (.only format)]]] + [macro + [syntax (.only syntax:)] + ["[0]" code] + ["[0]" template]]]] + [\\library + ["[0]" /]] + ["[0]" / "_" + ["[1][0]" named]]) (documentation: /.RGB "Red-Green-Blue color format.") diff --git a/stdlib/source/documentation/lux/data/color/named.lux b/stdlib/source/documentation/lux/data/color/named.lux index 0dd397b41..77ab94ea8 100644 --- a/stdlib/source/documentation/lux/data/color/named.lux +++ b/stdlib/source/documentation/lux/data/color/named.lux @@ -1,23 +1,23 @@ (.using - [library - [lux "*" - ["$" documentation {"+" documentation:}] - [control - ["<>" parser - ["<[0]>" code]]] - [data - ["[0]" text - ["%" format {"+" format}]]] - [macro - [syntax {"+" syntax:}] - ["[0]" code] - ["[0]" template]] - [math - [number - ["[0]" nat ("hex#[0]" hex)]]]]] - [\\library - ["[0]" / - ["/[1]" //]]]) + [library + [lux "*" + ["$" documentation (.only documentation:)] + [control + ["<>" parser + ["<[0]>" code]]] + [data + ["[0]" text + ["%" format (.only format)]]] + [macro + [syntax (.only syntax:)] + ["[0]" code] + ["[0]" template]] + [math + [number + ["[0]" nat ("hex#[0]" hex)]]]]] + [\\library + ["[0]" / + ["/[1]" //]]]) (template [<name>] [(documentation: <name> diff --git a/stdlib/source/documentation/lux/data/format.lux b/stdlib/source/documentation/lux/data/format.lux index bc1013057..d1f9a7627 100644 --- a/stdlib/source/documentation/lux/data/format.lux +++ b/stdlib/source/documentation/lux/data/format.lux @@ -1,17 +1,17 @@ (.using - [library - [lux "*" - ["$" documentation {"+" documentation:}] - [data - [text {"+" \n} - ["%" format {"+" format}]] - [collection - ["[0]" list]]]]] - ["[0]" / "_" - ["[1][0]" binary] - ["[1][0]" json] - ["[1][0]" tar] - ["[1][0]" xml]]) + [library + [lux "*" + ["$" documentation (.only documentation:)] + [data + [text (.only \n) + ["%" format (.only format)]] + [collection + ["[0]" list]]]]] + ["[0]" / "_" + ["[1][0]" binary] + ["[1][0]" json] + ["[1][0]" tar] + ["[1][0]" xml]]) (.def: .public documentation (.List $.Module) diff --git a/stdlib/source/documentation/lux/data/format/binary.lux b/stdlib/source/documentation/lux/data/format/binary.lux index 497de2dba..e0d2bc7fe 100644 --- a/stdlib/source/documentation/lux/data/format/binary.lux +++ b/stdlib/source/documentation/lux/data/format/binary.lux @@ -1,10 +1,10 @@ (.using [library [lux {"-" nat int rev list type or and symbol} - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [data - [text {"+" \n} - ["%" format {"+" format}]]] + [text (.only \n) + ["%" format (.only format)]]] [macro ["[0]" template]]]] [\\library diff --git a/stdlib/source/documentation/lux/data/format/json.lux b/stdlib/source/documentation/lux/data/format/json.lux index 78e8bd332..ea0cb0663 100644 --- a/stdlib/source/documentation/lux/data/format/json.lux +++ b/stdlib/source/documentation/lux/data/format/json.lux @@ -1,10 +1,10 @@ (.using [library [lux {"-" nat int rev list type or and has} - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [data - [text {"+" \n} - ["%" format {"+" format}]]] + [text (.only \n) + ["%" format (.only format)]]] [macro ["[0]" template]]]] [\\library diff --git a/stdlib/source/documentation/lux/data/format/tar.lux b/stdlib/source/documentation/lux/data/format/tar.lux index df4e17788..dc4ef6c7f 100644 --- a/stdlib/source/documentation/lux/data/format/tar.lux +++ b/stdlib/source/documentation/lux/data/format/tar.lux @@ -1,10 +1,10 @@ (.using [library [lux "*" - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [data - [text {"+" \n} - ["%" format {"+" format}]]] + [text (.only \n) + ["%" format (.only format)]]] [macro ["[0]" template]]]] [\\library diff --git a/stdlib/source/documentation/lux/data/format/xml.lux b/stdlib/source/documentation/lux/data/format/xml.lux index 3678f3474..ec9df6b04 100644 --- a/stdlib/source/documentation/lux/data/format/xml.lux +++ b/stdlib/source/documentation/lux/data/format/xml.lux @@ -1,14 +1,14 @@ (.using - [library - [lux {"-" nat int rev list type or and} - ["$" documentation {"+" documentation:}] - [data - [text {"+" \n} - ["%" format {"+" format}]]] - [macro - ["[0]" template]]]] - [\\library - ["[0]" /]]) + [library + [lux {"-" nat int rev list type or and} + ["$" documentation (.only documentation:)] + [data + [text (.only \n) + ["%" format (.only format)]]] + [macro + ["[0]" template]]]] + [\\library + ["[0]" /]]) (documentation: /.attributes "An empty set of XML attributes.") diff --git a/stdlib/source/documentation/lux/data/identity.lux b/stdlib/source/documentation/lux/data/identity.lux index 4af4c2236..a6f587da4 100644 --- a/stdlib/source/documentation/lux/data/identity.lux +++ b/stdlib/source/documentation/lux/data/identity.lux @@ -1,14 +1,14 @@ (.using - [library - [lux {"-" nat int rev list type or and} - ["$" documentation {"+" documentation:}] - [data - [text {"+" \n} - ["%" format {"+" format}]]] - [macro - ["[0]" template]]]] - [\\library - ["[0]" /]]) + [library + [lux {"-" nat int rev list type or and} + ["$" documentation (.only documentation:)] + [data + [text (.only \n) + ["%" format (.only format)]]] + [macro + ["[0]" template]]]] + [\\library + ["[0]" /]]) (documentation: (/.Identity it) "A value, as is, without any extra structure super-imposed on it.") diff --git a/stdlib/source/documentation/lux/data/product.lux b/stdlib/source/documentation/lux/data/product.lux index a437421f5..9e1a87faa 100644 --- a/stdlib/source/documentation/lux/data/product.lux +++ b/stdlib/source/documentation/lux/data/product.lux @@ -1,10 +1,10 @@ (.using [library [lux {"-" left right} - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [data [text - ["%" format {"+" format}]]] + ["%" format (.only format)]]] [macro ["[0]" template]]]] [\\library diff --git a/stdlib/source/documentation/lux/data/sum.lux b/stdlib/source/documentation/lux/data/sum.lux index 8d4a1edc5..fd5125489 100644 --- a/stdlib/source/documentation/lux/data/sum.lux +++ b/stdlib/source/documentation/lux/data/sum.lux @@ -1,10 +1,10 @@ (.using [library [lux {"-" left right} - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [data - [text {"+" \n} - ["%" format {"+" format}]]] + [text (.only \n) + ["%" format (.only format)]]] [macro ["[0]" template]]]] [\\library diff --git a/stdlib/source/documentation/lux/data/text.lux b/stdlib/source/documentation/lux/data/text.lux index 94886667c..53411a89b 100644 --- a/stdlib/source/documentation/lux/data/text.lux +++ b/stdlib/source/documentation/lux/data/text.lux @@ -1,10 +1,10 @@ (.using [library [lux {"-" char} - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [data [text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list]]]]] ["[0]" / "_" diff --git a/stdlib/source/documentation/lux/data/text/buffer.lux b/stdlib/source/documentation/lux/data/text/buffer.lux index dc55213ed..9f30c4597 100644 --- a/stdlib/source/documentation/lux/data/text/buffer.lux +++ b/stdlib/source/documentation/lux/data/text/buffer.lux @@ -1,14 +1,14 @@ (.using - [library - [lux "*" - ["$" documentation {"+" documentation:}] - [data - [text {"+" \n} - ["%" format {"+" format}]]] - [macro - ["[0]" template]]]] - [\\library - ["[0]" /]]) + [library + [lux "*" + ["$" documentation (.only documentation:)] + [data + [text (.only \n) + ["%" format (.only format)]]] + [macro + ["[0]" template]]]] + [\\library + ["[0]" /]]) (documentation: /.Buffer "Immutable text buffer for efficient text concatenation.") diff --git a/stdlib/source/documentation/lux/data/text/encoding.lux b/stdlib/source/documentation/lux/data/text/encoding.lux index c24126db7..93849025c 100644 --- a/stdlib/source/documentation/lux/data/text/encoding.lux +++ b/stdlib/source/documentation/lux/data/text/encoding.lux @@ -1,16 +1,16 @@ (.using - [library - [lux "*" - ["$" documentation {"+" documentation:}] - [data - [text {"+" \n} - ["%" format {"+" format}]]] - [macro - ["[0]" template]]]] - [\\library - ["[0]" /]] - ["[0]" / "_" - ["[1][0]" utf8]]) + [library + [lux "*" + ["$" documentation (.only documentation:)] + [data + [text (.only \n) + ["%" format (.only format)]]] + [macro + ["[0]" template]]]] + [\\library + ["[0]" /]] + ["[0]" / "_" + ["[1][0]" utf8]]) (documentation: /.Encoding "Encoding formats for text.") diff --git a/stdlib/source/documentation/lux/data/text/encoding/utf8.lux b/stdlib/source/documentation/lux/data/text/encoding/utf8.lux index dd1fed946..bac1da966 100644 --- a/stdlib/source/documentation/lux/data/text/encoding/utf8.lux +++ b/stdlib/source/documentation/lux/data/text/encoding/utf8.lux @@ -1,14 +1,14 @@ (.using - [library - [lux "*" - ["$" documentation {"+" documentation:}] - [data - [text {"+" \n} - ["%" format {"+" format}]]] - [macro - ["[0]" template]]]] - [\\library - ["[0]" /]]) + [library + [lux "*" + ["$" documentation (.only documentation:)] + [data + [text (.only \n) + ["%" format (.only format)]]] + [macro + ["[0]" template]]]] + [\\library + ["[0]" /]]) (documentation: /.codec "A codec for binary encoding of text as UTF-8.") diff --git a/stdlib/source/documentation/lux/data/text/escape.lux b/stdlib/source/documentation/lux/data/text/escape.lux index a4944b1f4..562720a22 100644 --- a/stdlib/source/documentation/lux/data/text/escape.lux +++ b/stdlib/source/documentation/lux/data/text/escape.lux @@ -1,14 +1,14 @@ (.using - [library - [lux "*" - ["$" documentation {"+" documentation:}] - [data - [text {"+" \n} - ["%" format {"+" format}]]] - [macro - ["[0]" template]]]] - [\\library - ["[0]" /]]) + [library + [lux "*" + ["$" documentation (.only documentation:)] + [data + [text (.only \n) + ["%" format (.only format)]]] + [macro + ["[0]" template]]]] + [\\library + ["[0]" /]]) (documentation: /.escaped "Yields a escaped version of the text." diff --git a/stdlib/source/documentation/lux/data/text/format.lux b/stdlib/source/documentation/lux/data/text/format.lux index 7cf561034..b188c4f83 100644 --- a/stdlib/source/documentation/lux/data/text/format.lux +++ b/stdlib/source/documentation/lux/data/text/format.lux @@ -1,7 +1,7 @@ (.using [library [lux {"-" nat int rev type list symbol} - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [macro ["[0]" template]]]] [\\library diff --git a/stdlib/source/documentation/lux/data/text/regex.lux b/stdlib/source/documentation/lux/data/text/regex.lux index 1fb81532e..7184e5a93 100644 --- a/stdlib/source/documentation/lux/data/text/regex.lux +++ b/stdlib/source/documentation/lux/data/text/regex.lux @@ -1,10 +1,10 @@ (.using [library [lux {"-" pattern} - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [data - [text {"+" \n} - ["%" format {"+" format}]]] + [text (.only \n) + ["%" format (.only format)]]] [macro ["[0]" template]]]] [\\library diff --git a/stdlib/source/documentation/lux/data/text/unicode.lux b/stdlib/source/documentation/lux/data/text/unicode.lux index f8ffbb93d..353678568 100644 --- a/stdlib/source/documentation/lux/data/text/unicode.lux +++ b/stdlib/source/documentation/lux/data/text/unicode.lux @@ -1,15 +1,15 @@ (.using - [library - [lux "*" - ["$" documentation {"+" documentation:}] - [data - [text - ["%" format {"+" format}]] - [collection - ["[0]" list]]]]] - ["[0]" / "_" - ["[1][0]" block] - ["[1][0]" set]]) + [library + [lux "*" + ["$" documentation (.only documentation:)] + [data + [text + ["%" format (.only format)]] + [collection + ["[0]" list]]]]] + ["[0]" / "_" + ["[1][0]" block] + ["[1][0]" set]]) (.def: .public documentation (.List $.Module) diff --git a/stdlib/source/documentation/lux/data/text/unicode/block.lux b/stdlib/source/documentation/lux/data/text/unicode/block.lux index 422cb77b9..058fc78ad 100644 --- a/stdlib/source/documentation/lux/data/text/unicode/block.lux +++ b/stdlib/source/documentation/lux/data/text/unicode/block.lux @@ -1,10 +1,10 @@ (.using [library [lux "*" - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [data ["[0]" text - ["%" format {"+" format}]]] + ["%" format (.only format)]]] [macro ["[0]" template]] [math diff --git a/stdlib/source/documentation/lux/data/text/unicode/set.lux b/stdlib/source/documentation/lux/data/text/unicode/set.lux index 9e14f0802..02aade7f3 100644 --- a/stdlib/source/documentation/lux/data/text/unicode/set.lux +++ b/stdlib/source/documentation/lux/data/text/unicode/set.lux @@ -1,10 +1,10 @@ (.using [library [lux "*" - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [data [text - ["%" format {"+" format}]]] + ["%" format (.only format)]]] [macro ["[0]" template]]]] [\\library diff --git a/stdlib/source/documentation/lux/debug.lux b/stdlib/source/documentation/lux/debug.lux index f40a14bde..9e41684fa 100644 --- a/stdlib/source/documentation/lux/debug.lux +++ b/stdlib/source/documentation/lux/debug.lux @@ -1,10 +1,10 @@ (.using [library [lux {"-" private} - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] + ["[0]" text (.only \n) + ["%" format (.only format)]]] [macro ["[0]" template]]]] [\\library diff --git a/stdlib/source/documentation/lux/documentation.lux b/stdlib/source/documentation/lux/documentation.lux index f1ba6db85..05ac9b9a2 100644 --- a/stdlib/source/documentation/lux/documentation.lux +++ b/stdlib/source/documentation/lux/documentation.lux @@ -2,8 +2,8 @@ [library [lux "*" [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] + ["[0]" text (.only \n) + ["%" format (.only format)]]] [macro ["[0]" template]]]] [\\library diff --git a/stdlib/source/documentation/lux/extension.lux b/stdlib/source/documentation/lux/extension.lux index f2a0dca26..75d42a772 100644 --- a/stdlib/source/documentation/lux/extension.lux +++ b/stdlib/source/documentation/lux/extension.lux @@ -1,14 +1,14 @@ (.using [library [lux "*" - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] ["[0]" debug] [control ["<>" parser ["<[0]>" code]]] [data [text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" sequence]]] [macro diff --git a/stdlib/source/documentation/lux/ffi.js.lux b/stdlib/source/documentation/lux/ffi.js.lux index df5a6f037..3476a3c5d 100644 --- a/stdlib/source/documentation/lux/ffi.js.lux +++ b/stdlib/source/documentation/lux/ffi.js.lux @@ -1,10 +1,10 @@ (.using [library [lux {"-" int char type} - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] + ["[0]" text (.only \n) + ["%" format (.only format)]]] [macro ["[0]" template]]]] [\\library diff --git a/stdlib/source/documentation/lux/ffi.jvm.lux b/stdlib/source/documentation/lux/ffi.jvm.lux index 2ce78b3a2..35c07b63f 100644 --- a/stdlib/source/documentation/lux/ffi.jvm.lux +++ b/stdlib/source/documentation/lux/ffi.jvm.lux @@ -1,10 +1,10 @@ (.using [library [lux {"-" int char type is as} - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] + ["[0]" text (.only \n) + ["%" format (.only format)]]] [macro ["[0]" template]]]] [\\library diff --git a/stdlib/source/documentation/lux/ffi.lua.lux b/stdlib/source/documentation/lux/ffi.lua.lux index 0126a5117..c1afabc19 100644 --- a/stdlib/source/documentation/lux/ffi.lua.lux +++ b/stdlib/source/documentation/lux/ffi.lua.lux @@ -1,10 +1,10 @@ (.using [library [lux {"-" int char type} - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] + ["[0]" text (.only \n) + ["%" format (.only format)]]] [macro ["[0]" template]]]] [\\library diff --git a/stdlib/source/documentation/lux/ffi.old.lux b/stdlib/source/documentation/lux/ffi.old.lux index 926b70045..83f587a1c 100644 --- a/stdlib/source/documentation/lux/ffi.old.lux +++ b/stdlib/source/documentation/lux/ffi.old.lux @@ -1,10 +1,10 @@ (.using [library [lux {"-" int char type} - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] + ["[0]" text (.only \n) + ["%" format (.only format)]]] [macro ["[0]" template]]]] [\\library diff --git a/stdlib/source/documentation/lux/ffi.py.lux b/stdlib/source/documentation/lux/ffi.py.lux index 40ea7878e..b21b56819 100644 --- a/stdlib/source/documentation/lux/ffi.py.lux +++ b/stdlib/source/documentation/lux/ffi.py.lux @@ -1,10 +1,10 @@ (.using [library [lux {"-" int char type} - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] + ["[0]" text (.only \n) + ["%" format (.only format)]]] [macro ["[0]" template]]]] [\\library diff --git a/stdlib/source/documentation/lux/ffi.rb.lux b/stdlib/source/documentation/lux/ffi.rb.lux index 822ad8146..071468773 100644 --- a/stdlib/source/documentation/lux/ffi.rb.lux +++ b/stdlib/source/documentation/lux/ffi.rb.lux @@ -1,10 +1,10 @@ (.using [library [lux {"-" int char type} - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] + ["[0]" text (.only \n) + ["%" format (.only format)]]] [macro ["[0]" template]]]] [\\library diff --git a/stdlib/source/documentation/lux/locale.lux b/stdlib/source/documentation/lux/locale.lux index f3d66353e..d1170b22b 100644 --- a/stdlib/source/documentation/lux/locale.lux +++ b/stdlib/source/documentation/lux/locale.lux @@ -1,17 +1,17 @@ (.using - [library - [lux {"-" char} - ["$" documentation {"+" documentation:}] - [data - [text - ["%" format {"+" format}]] - [collection - ["[0]" list]]]]] - ["[0]" / "_" - ["[1][0]" language] - ["[1][0]" territory]] - [\\library - ["[0]" /]]) + [library + [lux {"-" char} + ["$" documentation (.only documentation:)] + [data + [text + ["%" format (.only format)]] + [collection + ["[0]" list]]]]] + ["[0]" / "_" + ["[1][0]" language] + ["[1][0]" territory]] + [\\library + ["[0]" /]]) (documentation: /.Locale "A description of a locale; with territory, (optional) language, and (optional) text-encoding.") diff --git a/stdlib/source/documentation/lux/locale/language.lux b/stdlib/source/documentation/lux/locale/language.lux index faabf76d2..e63d72fee 100644 --- a/stdlib/source/documentation/lux/locale/language.lux +++ b/stdlib/source/documentation/lux/locale/language.lux @@ -1,14 +1,14 @@ (.using - [library - [lux {"-" char} - ["$" documentation {"+" documentation:}] - [data - [text - ["%" format {"+" format}]] - [collection - ["[0]" list]]]]] - [\\library - ["[0]" /]]) + [library + [lux {"-" char} + ["$" documentation (.only documentation:)] + [data + [text + ["%" format (.only format)]] + [collection + ["[0]" list]]]]] + [\\library + ["[0]" /]]) (documentation: /.Language "An ISO 639 language.") diff --git a/stdlib/source/documentation/lux/locale/territory.lux b/stdlib/source/documentation/lux/locale/territory.lux index bcff3e835..f444dc1e5 100644 --- a/stdlib/source/documentation/lux/locale/territory.lux +++ b/stdlib/source/documentation/lux/locale/territory.lux @@ -1,14 +1,14 @@ (.using - [library - [lux {"-" char} - ["$" documentation {"+" documentation:}] - [data - [text - ["%" format {"+" format}]] - [collection - ["[0]" list]]]]] - [\\library - ["[0]" /]]) + [library + [lux {"-" char} + ["$" documentation (.only documentation:)] + [data + [text + ["%" format (.only format)]] + [collection + ["[0]" list]]]]] + [\\library + ["[0]" /]]) (documentation: /.Territory "An ISO 3166 territory.") diff --git a/stdlib/source/documentation/lux/macro.lux b/stdlib/source/documentation/lux/macro.lux index 02e0f77f8..192de3a4c 100644 --- a/stdlib/source/documentation/lux/macro.lux +++ b/stdlib/source/documentation/lux/macro.lux @@ -1,19 +1,19 @@ (.using - [library - [lux {"-" char symbol} - ["$" documentation {"+" documentation:}] - [data - [text {"+" \n} - ["%" format {"+" format}]] - [collection - ["[0]" list]]]]] - ["[0]" / "_" - ["[1][0]" code] - ["[1][0]" local] - ["[1][0]" syntax] - ["[1][0]" template]] - [\\library - ["[0]" /]]) + [library + [lux {"-" char symbol} + ["$" documentation (.only documentation:)] + [data + [text (.only \n) + ["%" format (.only format)]] + [collection + ["[0]" list]]]]] + ["[0]" / "_" + ["[1][0]" code] + ["[1][0]" local] + ["[1][0]" syntax] + ["[1][0]" template]] + [\\library + ["[0]" /]]) (documentation: /.single_expansion (format "Given code that requires applying a macro, does it once and returns the result." diff --git a/stdlib/source/documentation/lux/macro/code.lux b/stdlib/source/documentation/lux/macro/code.lux index 1a824238f..39695a9f4 100644 --- a/stdlib/source/documentation/lux/macro/code.lux +++ b/stdlib/source/documentation/lux/macro/code.lux @@ -1,14 +1,14 @@ (.using - [library - [lux {"-" char local global} - ["$" documentation {"+" documentation:}] - [data - [text - ["%" format {"+" format}]] - [collection - ["[0]" list]]]]] - [\\library - ["[0]" /]]) + [library + [lux {"-" char local global} + ["$" documentation (.only documentation:)] + [data + [text + ["%" format (.only format)]] + [collection + ["[0]" list]]]]] + [\\library + ["[0]" /]]) (documentation: /.local "Produces a local symbol (an symbol with no module prefix).") diff --git a/stdlib/source/documentation/lux/macro/local.lux b/stdlib/source/documentation/lux/macro/local.lux index 6f9783f90..e9ee18890 100644 --- a/stdlib/source/documentation/lux/macro/local.lux +++ b/stdlib/source/documentation/lux/macro/local.lux @@ -1,14 +1,14 @@ (.using - [library - [lux {"-" char} - ["$" documentation {"+" documentation:}] - [data - [text {"+" \n} - ["%" format {"+" format}]] - [collection - ["[0]" list]]]]] - [\\library - ["[0]" /]]) + [library + [lux {"-" char} + ["$" documentation (.only documentation:)] + [data + [text (.only \n) + ["%" format (.only format)]] + [collection + ["[0]" list]]]]] + [\\library + ["[0]" /]]) (documentation: /.push (format "Installs macros in the compiler-state, with the given names." diff --git a/stdlib/source/documentation/lux/macro/syntax.lux b/stdlib/source/documentation/lux/macro/syntax.lux index 664439f72..847fae3ac 100644 --- a/stdlib/source/documentation/lux/macro/syntax.lux +++ b/stdlib/source/documentation/lux/macro/syntax.lux @@ -1,10 +1,10 @@ (.using [library [lux {"-" char} - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [data - [text {"+" \n} - ["%" format {"+" format}]] + [text (.only \n) + ["%" format (.only format)]] [collection ["[0]" list]]]]] ["[0]" / "_" diff --git a/stdlib/source/documentation/lux/macro/syntax/check.lux b/stdlib/source/documentation/lux/macro/syntax/check.lux index 5a34c038b..560eedd76 100644 --- a/stdlib/source/documentation/lux/macro/syntax/check.lux +++ b/stdlib/source/documentation/lux/macro/syntax/check.lux @@ -1,14 +1,14 @@ (.using - [library - [lux {"-" char} - ["$" documentation {"+" documentation:}] - [data - [text - ["%" format {"+" format}]] - [collection - ["[0]" list]]]]] - [\\library - ["[0]" /]]) + [library + [lux {"-" char} + ["$" documentation (.only documentation:)] + [data + [text + ["%" format (.only format)]] + [collection + ["[0]" list]]]]] + [\\library + ["[0]" /]]) (documentation: /.Check "A type annotation for an expression.") diff --git a/stdlib/source/documentation/lux/macro/syntax/declaration.lux b/stdlib/source/documentation/lux/macro/syntax/declaration.lux index e2d4d415e..6bb312a33 100644 --- a/stdlib/source/documentation/lux/macro/syntax/declaration.lux +++ b/stdlib/source/documentation/lux/macro/syntax/declaration.lux @@ -1,14 +1,14 @@ (.using - [library - [lux {"-" char} - ["$" documentation {"+" documentation:}] - [data - [text - ["%" format {"+" format}]] - [collection - ["[0]" list]]]]] - [\\library - ["[0]" /]]) + [library + [lux {"-" char} + ["$" documentation (.only documentation:)] + [data + [text + ["%" format (.only format)]] + [collection + ["[0]" list]]]]] + [\\library + ["[0]" /]]) (documentation: /.Declaration "A declaration for either a constant or a function.") diff --git a/stdlib/source/documentation/lux/macro/syntax/definition.lux b/stdlib/source/documentation/lux/macro/syntax/definition.lux index 00326aaa9..f8c276133 100644 --- a/stdlib/source/documentation/lux/macro/syntax/definition.lux +++ b/stdlib/source/documentation/lux/macro/syntax/definition.lux @@ -1,14 +1,14 @@ (.using - [library - [lux {"-" Definition} - ["$" documentation {"+" documentation:}] - [data - [text - ["%" format {"+" format}]] - [collection - ["[0]" list]]]]] - [\\library - ["[0]" /]]) + [library + [lux {"-" Definition} + ["$" documentation (.only documentation:)] + [data + [text + ["%" format (.only format)]] + [collection + ["[0]" list]]]]] + [\\library + ["[0]" /]]) (documentation: /.Definition "Syntax for a constant definition.") diff --git a/stdlib/source/documentation/lux/macro/syntax/export.lux b/stdlib/source/documentation/lux/macro/syntax/export.lux index 95a4895f1..39a814663 100644 --- a/stdlib/source/documentation/lux/macro/syntax/export.lux +++ b/stdlib/source/documentation/lux/macro/syntax/export.lux @@ -1,14 +1,14 @@ (.using - [library - [lux {"-" char} - ["$" documentation {"+" documentation:}] - [data - [text - ["%" format {"+" format}]] - [collection - ["[0]" list]]]]] - [\\library - ["[0]" /]]) + [library + [lux {"-" char} + ["$" documentation (.only documentation:)] + [data + [text + ["%" format (.only format)]] + [collection + ["[0]" list]]]]] + [\\library + ["[0]" /]]) (documentation: /.parser "" diff --git a/stdlib/source/documentation/lux/macro/syntax/input.lux b/stdlib/source/documentation/lux/macro/syntax/input.lux index f64392647..26ca37784 100644 --- a/stdlib/source/documentation/lux/macro/syntax/input.lux +++ b/stdlib/source/documentation/lux/macro/syntax/input.lux @@ -1,14 +1,14 @@ (.using - [library - [lux {"-" char} - ["$" documentation {"+" documentation:}] - [data - [text - ["%" format {"+" format}]] - [collection - ["[0]" list]]]]] - [\\library - ["[0]" /]]) + [library + [lux {"-" char} + ["$" documentation (.only documentation:)] + [data + [text + ["%" format (.only format)]] + [collection + ["[0]" list]]]]] + [\\library + ["[0]" /]]) (documentation: /.Input "The common typed-argument syntax used by many macros.") diff --git a/stdlib/source/documentation/lux/macro/syntax/type/variable.lux b/stdlib/source/documentation/lux/macro/syntax/type/variable.lux index 2144f9b4f..408740210 100644 --- a/stdlib/source/documentation/lux/macro/syntax/type/variable.lux +++ b/stdlib/source/documentation/lux/macro/syntax/type/variable.lux @@ -1,14 +1,14 @@ (.using - [library - [lux {"-" char} - ["$" documentation {"+" documentation:}] - [data - [text - ["%" format {"+" format}]] - [collection - ["[0]" list]]]]] - [\\library - ["[0]" /]]) + [library + [lux {"-" char} + ["$" documentation (.only documentation:)] + [data + [text + ["%" format (.only format)]] + [collection + ["[0]" list]]]]] + [\\library + ["[0]" /]]) (documentation: /.Variable "A variable's name.") diff --git a/stdlib/source/documentation/lux/macro/template.lux b/stdlib/source/documentation/lux/macro/template.lux index 495832bdf..aed55fb9a 100644 --- a/stdlib/source/documentation/lux/macro/template.lux +++ b/stdlib/source/documentation/lux/macro/template.lux @@ -1,14 +1,14 @@ (.using - [library - [lux {"-" let symbol} - ["$" documentation {"+" documentation:}] - [data - [text {"+" \n} - ["%" format {"+" format}]] - [collection - ["[0]" list]]]]] - [\\library - ["[0]" /]]) + [library + [lux {"-" let symbol} + ["$" documentation (.only documentation:)] + [data + [text (.only \n) + ["%" format (.only format)]] + [collection + ["[0]" list]]]]] + [\\library + ["[0]" /]]) (documentation: /.spliced "" diff --git a/stdlib/source/documentation/lux/math.lux b/stdlib/source/documentation/lux/math.lux index 06db95c3a..dd5783817 100644 --- a/stdlib/source/documentation/lux/math.lux +++ b/stdlib/source/documentation/lux/math.lux @@ -1,10 +1,10 @@ (.using [library [lux "*" - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [data [text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list]]]]] ["[0]" / "_" diff --git a/stdlib/source/documentation/lux/math/infix.lux b/stdlib/source/documentation/lux/math/infix.lux index 9f6f7f8ed..e9164740a 100644 --- a/stdlib/source/documentation/lux/math/infix.lux +++ b/stdlib/source/documentation/lux/math/infix.lux @@ -1,14 +1,14 @@ (.using - [library - [lux {"-" private} - ["$" documentation {"+" documentation:}] - [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] - [macro - ["[0]" template]]]] - [\\library - ["[0]" /]]) + [library + [lux {"-" private} + ["$" documentation (.only documentation:)] + [data + ["[0]" text (.only \n) + ["%" format (.only format)]]] + [macro + ["[0]" template]]]] + [\\library + ["[0]" /]]) (documentation: /.infix (format "Infix math syntax." diff --git a/stdlib/source/documentation/lux/math/logic.lux b/stdlib/source/documentation/lux/math/logic.lux index 11d930333..23b3e5c3f 100644 --- a/stdlib/source/documentation/lux/math/logic.lux +++ b/stdlib/source/documentation/lux/math/logic.lux @@ -1,10 +1,10 @@ (.using [library [lux {"-" char} - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [data [text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" monoid)]]]]] ["[0]" / "_" diff --git a/stdlib/source/documentation/lux/math/logic/continuous.lux b/stdlib/source/documentation/lux/math/logic/continuous.lux index b7d95a8c9..ea81cd054 100644 --- a/stdlib/source/documentation/lux/math/logic/continuous.lux +++ b/stdlib/source/documentation/lux/math/logic/continuous.lux @@ -1,14 +1,14 @@ (.using - [library - [lux {"-" private} - ["$" documentation {"+" documentation:}] - [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] - [macro - ["[0]" template]]]] - [\\library - ["[0]" /]]) + [library + [lux {"-" private} + ["$" documentation (.only documentation:)] + [data + ["[0]" text (.only \n) + ["%" format (.only format)]]] + [macro + ["[0]" template]]]] + [\\library + ["[0]" /]]) (documentation: /.implies "" diff --git a/stdlib/source/documentation/lux/math/logic/fuzzy.lux b/stdlib/source/documentation/lux/math/logic/fuzzy.lux index f101e1451..0058d01fc 100644 --- a/stdlib/source/documentation/lux/math/logic/fuzzy.lux +++ b/stdlib/source/documentation/lux/math/logic/fuzzy.lux @@ -1,14 +1,14 @@ (.using - [library - [lux {"-" private} - ["$" documentation {"+" documentation:}] - [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] - [macro - ["[0]" template]]]] - [\\library - ["[0]" /]]) + [library + [lux {"-" private} + ["$" documentation (.only documentation:)] + [data + ["[0]" text (.only \n) + ["%" format (.only format)]]] + [macro + ["[0]" template]]]] + [\\library + ["[0]" /]]) (documentation: (/.Fuzzy it) "A fuzzy set.") diff --git a/stdlib/source/documentation/lux/math/modular.lux b/stdlib/source/documentation/lux/math/modular.lux index e6fe66781..4af0f2b2a 100644 --- a/stdlib/source/documentation/lux/math/modular.lux +++ b/stdlib/source/documentation/lux/math/modular.lux @@ -1,14 +1,14 @@ (.using - [library - [lux {"-" private} - ["$" documentation {"+" documentation:}] - [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] - [macro - ["[0]" template]]]] - [\\library - ["[0]" /]]) + [library + [lux {"-" private} + ["$" documentation (.only documentation:)] + [data + ["[0]" text (.only \n) + ["%" format (.only format)]]] + [macro + ["[0]" template]]]] + [\\library + ["[0]" /]]) (documentation: (/.Mod %) "A number under a modulus.") diff --git a/stdlib/source/documentation/lux/math/modulus.lux b/stdlib/source/documentation/lux/math/modulus.lux index dc44b99df..940974ff5 100644 --- a/stdlib/source/documentation/lux/math/modulus.lux +++ b/stdlib/source/documentation/lux/math/modulus.lux @@ -1,14 +1,14 @@ (.using - [library - [lux {"-" private} - ["$" documentation {"+" documentation:}] - [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] - [macro - ["[0]" template]]]] - [\\library - ["[0]" /]]) + [library + [lux {"-" private} + ["$" documentation (.only documentation:)] + [data + ["[0]" text (.only \n) + ["%" format (.only format)]]] + [macro + ["[0]" template]]]] + [\\library + ["[0]" /]]) (documentation: (/.Modulus %) (format "A number used as a modulus in modular arithmetic." diff --git a/stdlib/source/documentation/lux/math/number.lux b/stdlib/source/documentation/lux/math/number.lux index 3cb492042..e1df87e80 100644 --- a/stdlib/source/documentation/lux/math/number.lux +++ b/stdlib/source/documentation/lux/math/number.lux @@ -1,25 +1,25 @@ (.using - [library - [lux {"-" private} - ["$" documentation {"+" documentation:}] - [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] - [macro - ["[0]" template]]]] - [\\library - ["[0]" /]] - ["[0]" / "_" - ["[1][0]" i8] - ["[1][0]" i16] - ["[1][0]" i32] - ["[1][0]" i64] - ["[1][0]" nat] - ["[1][0]" int] - ["[1][0]" rev] - ["[1][0]" frac] - ["[1][0]" ratio] - ["[1][0]" complex]]) + [library + [lux {"-" private} + ["$" documentation (.only documentation:)] + [data + ["[0]" text (.only \n) + ["%" format (.only format)]]] + [macro + ["[0]" template]]]] + [\\library + ["[0]" /]] + ["[0]" / "_" + ["[1][0]" i8] + ["[1][0]" i16] + ["[1][0]" i32] + ["[1][0]" i64] + ["[1][0]" nat] + ["[1][0]" int] + ["[1][0]" rev] + ["[1][0]" frac] + ["[1][0]" ratio] + ["[1][0]" complex]]) (template [<name> <encoding> <no_commas> <with_commas>] [(documentation: <name> diff --git a/stdlib/source/documentation/lux/math/number/complex.lux b/stdlib/source/documentation/lux/math/number/complex.lux index fd912cd57..05ea3ef79 100644 --- a/stdlib/source/documentation/lux/math/number/complex.lux +++ b/stdlib/source/documentation/lux/math/number/complex.lux @@ -1,10 +1,10 @@ (.using [library [lux {"-" private} - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] + ["[0]" text (.only \n) + ["%" format (.only format)]]] [macro ["[0]" template]]]] [\\library diff --git a/stdlib/source/documentation/lux/math/number/frac.lux b/stdlib/source/documentation/lux/math/number/frac.lux index 3378609bb..051f45924 100644 --- a/stdlib/source/documentation/lux/math/number/frac.lux +++ b/stdlib/source/documentation/lux/math/number/frac.lux @@ -1,10 +1,10 @@ (.using [library [lux {"-" private} - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] + ["[0]" text (.only \n) + ["%" format (.only format)]]] [macro ["[0]" template]]]] [\\library diff --git a/stdlib/source/documentation/lux/math/number/i16.lux b/stdlib/source/documentation/lux/math/number/i16.lux index a1c8d5f4b..97cfa33e3 100644 --- a/stdlib/source/documentation/lux/math/number/i16.lux +++ b/stdlib/source/documentation/lux/math/number/i16.lux @@ -1,14 +1,14 @@ (.using - [library - [lux {"-" private} - ["$" documentation {"+" documentation:}] - [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] - [macro - ["[0]" template]]]] - [\\library - ["[0]" /]]) + [library + [lux {"-" private} + ["$" documentation (.only documentation:)] + [data + ["[0]" text (.only \n) + ["%" format (.only format)]]] + [macro + ["[0]" template]]]] + [\\library + ["[0]" /]]) (documentation: /.I16 "A 16-bit integer.") diff --git a/stdlib/source/documentation/lux/math/number/i32.lux b/stdlib/source/documentation/lux/math/number/i32.lux index 0571dd876..3afe8dc41 100644 --- a/stdlib/source/documentation/lux/math/number/i32.lux +++ b/stdlib/source/documentation/lux/math/number/i32.lux @@ -1,14 +1,14 @@ (.using - [library - [lux {"-" private} - ["$" documentation {"+" documentation:}] - [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] - [macro - ["[0]" template]]]] - [\\library - ["[0]" /]]) + [library + [lux {"-" private} + ["$" documentation (.only documentation:)] + [data + ["[0]" text (.only \n) + ["%" format (.only format)]]] + [macro + ["[0]" template]]]] + [\\library + ["[0]" /]]) (documentation: /.I32 "A 32-bit integer.") diff --git a/stdlib/source/documentation/lux/math/number/i64.lux b/stdlib/source/documentation/lux/math/number/i64.lux index 7cc53e741..03c3d8d1d 100644 --- a/stdlib/source/documentation/lux/math/number/i64.lux +++ b/stdlib/source/documentation/lux/math/number/i64.lux @@ -1,14 +1,14 @@ (.using - [library - [lux {"-" or and not} - ["$" documentation {"+" documentation:}] - [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] - [macro - ["[0]" template]]]] - [\\library - ["[0]" /]]) + [library + [lux {"-" or and not} + ["$" documentation (.only documentation:)] + [data + ["[0]" text (.only \n) + ["%" format (.only format)]]] + [macro + ["[0]" template]]]] + [\\library + ["[0]" /]]) (template [<name> <doc>] [(documentation: <name> diff --git a/stdlib/source/documentation/lux/math/number/i8.lux b/stdlib/source/documentation/lux/math/number/i8.lux index 2dbe3e958..1fea5cd48 100644 --- a/stdlib/source/documentation/lux/math/number/i8.lux +++ b/stdlib/source/documentation/lux/math/number/i8.lux @@ -1,14 +1,14 @@ (.using - [library - [lux {"-" private} - ["$" documentation {"+" documentation:}] - [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] - [macro - ["[0]" template]]]] - [\\library - ["[0]" /]]) + [library + [lux {"-" private} + ["$" documentation (.only documentation:)] + [data + ["[0]" text (.only \n) + ["%" format (.only format)]]] + [macro + ["[0]" template]]]] + [\\library + ["[0]" /]]) (documentation: /.I8 "A 8-bit integer.") diff --git a/stdlib/source/documentation/lux/math/number/int.lux b/stdlib/source/documentation/lux/math/number/int.lux index beefffd00..c520bb867 100644 --- a/stdlib/source/documentation/lux/math/number/int.lux +++ b/stdlib/source/documentation/lux/math/number/int.lux @@ -1,14 +1,14 @@ (.using - [library - [lux {"-" private} - ["$" documentation {"+" documentation:}] - [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] - [macro - ["[0]" template]]]] - [\\library - ["[0]" /]]) + [library + [lux {"-" private} + ["$" documentation (.only documentation:)] + [data + ["[0]" text (.only \n) + ["%" format (.only format)]]] + [macro + ["[0]" template]]]] + [\\library + ["[0]" /]]) (documentation: /.= "Int(eger) equivalence." diff --git a/stdlib/source/documentation/lux/math/number/nat.lux b/stdlib/source/documentation/lux/math/number/nat.lux index 155d9249e..9773fbaa9 100644 --- a/stdlib/source/documentation/lux/math/number/nat.lux +++ b/stdlib/source/documentation/lux/math/number/nat.lux @@ -1,14 +1,14 @@ (.using - [library - [lux {"-" private} - ["$" documentation {"+" documentation:}] - [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] - [macro - ["[0]" template]]]] - [\\library - ["[0]" /]]) + [library + [lux {"-" private} + ["$" documentation (.only documentation:)] + [data + ["[0]" text (.only \n) + ["%" format (.only format)]]] + [macro + ["[0]" template]]]] + [\\library + ["[0]" /]]) (template [<name> <documentation>] [(documentation: <name> diff --git a/stdlib/source/documentation/lux/math/number/ratio.lux b/stdlib/source/documentation/lux/math/number/ratio.lux index 620e1a41c..5e5b805a1 100644 --- a/stdlib/source/documentation/lux/math/number/ratio.lux +++ b/stdlib/source/documentation/lux/math/number/ratio.lux @@ -1,14 +1,14 @@ (.using - [library - [lux {"-" private} - ["$" documentation {"+" documentation:}] - [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] - [macro - ["[0]" template]]]] - [\\library - ["[0]" /]]) + [library + [lux {"-" private} + ["$" documentation (.only documentation:)] + [data + ["[0]" text (.only \n) + ["%" format (.only format)]]] + [macro + ["[0]" template]]]] + [\\library + ["[0]" /]]) (documentation: /.Ratio "An unsigned ratio of numbers.") diff --git a/stdlib/source/documentation/lux/math/number/rev.lux b/stdlib/source/documentation/lux/math/number/rev.lux index ba91d9c30..a76069bc4 100644 --- a/stdlib/source/documentation/lux/math/number/rev.lux +++ b/stdlib/source/documentation/lux/math/number/rev.lux @@ -1,14 +1,14 @@ (.using - [library - [lux {"-" private} - ["$" documentation {"+" documentation:}] - [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] - [macro - ["[0]" template]]]] - [\\library - ["[0]" /]]) + [library + [lux {"-" private} + ["$" documentation (.only documentation:)] + [data + ["[0]" text (.only \n) + ["%" format (.only format)]]] + [macro + ["[0]" template]]]] + [\\library + ["[0]" /]]) (documentation: /.= "Rev(olution) equivalence." diff --git a/stdlib/source/documentation/lux/math/random.lux b/stdlib/source/documentation/lux/math/random.lux index 258de2631..2d16c59b0 100644 --- a/stdlib/source/documentation/lux/math/random.lux +++ b/stdlib/source/documentation/lux/math/random.lux @@ -1,10 +1,10 @@ (.using [library [lux {"-" or and nat int rev} - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] + ["[0]" text (.only \n) + ["%" format (.only format)]]] [macro ["[0]" template]]]] [\\library diff --git a/stdlib/source/documentation/lux/meta.lux b/stdlib/source/documentation/lux/meta.lux index 1d29f25c7..e450a6b9a 100644 --- a/stdlib/source/documentation/lux/meta.lux +++ b/stdlib/source/documentation/lux/meta.lux @@ -1,17 +1,17 @@ (.using - [library - [lux {"-" type macro} - ["$" documentation {"+" documentation:}] - [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] - [macro - ["[0]" template]]]] - [\\library - ["[0]" /]] - ["[0]" / "_" - ["[1][0]" location] - ["[1][0]" symbol]]) + [library + [lux {"-" type macro} + ["$" documentation (.only documentation:)] + [data + ["[0]" text (.only \n) + ["%" format (.only format)]]] + [macro + ["[0]" template]]]] + [\\library + ["[0]" /]] + ["[0]" / "_" + ["[1][0]" location] + ["[1][0]" symbol]]) (documentation: /.result' (format "Evaluates a computation that depends on Lux's compiler state." diff --git a/stdlib/source/documentation/lux/meta/location.lux b/stdlib/source/documentation/lux/meta/location.lux index f4444216d..e4b9424fe 100644 --- a/stdlib/source/documentation/lux/meta/location.lux +++ b/stdlib/source/documentation/lux/meta/location.lux @@ -1,14 +1,14 @@ (.using - [library - [lux {"-" private} - ["$" documentation {"+" documentation:}] - [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] - [macro - ["[0]" template]]]] - [\\library - ["[0]" /]]) + [library + [lux {"-" private} + ["$" documentation (.only documentation:)] + [data + ["[0]" text (.only \n) + ["%" format (.only format)]]] + [macro + ["[0]" template]]]] + [\\library + ["[0]" /]]) (documentation: /.here "The Location of the current form." diff --git a/stdlib/source/documentation/lux/meta/symbol.lux b/stdlib/source/documentation/lux/meta/symbol.lux index dd68301aa..924ada33c 100644 --- a/stdlib/source/documentation/lux/meta/symbol.lux +++ b/stdlib/source/documentation/lux/meta/symbol.lux @@ -1,14 +1,14 @@ (.using - [library - [lux {"-" nat int rev list type or and} - ["$" documentation {"+" documentation:}] - [data - [text {"+" \n} - ["%" format {"+" format}]]] - [macro - ["[0]" template]]]] - [\\library - ["[0]" /]]) + [library + [lux {"-" nat int rev list type or and} + ["$" documentation (.only documentation:)] + [data + [text (.only \n) + ["%" format (.only format)]]] + [macro + ["[0]" template]]]] + [\\library + ["[0]" /]]) (documentation: /.module "The module part of a symbol.") diff --git a/stdlib/source/documentation/lux/program.lux b/stdlib/source/documentation/lux/program.lux index 181c912b7..d60b2d633 100644 --- a/stdlib/source/documentation/lux/program.lux +++ b/stdlib/source/documentation/lux/program.lux @@ -1,16 +1,16 @@ (.using - [library - [lux "*" - ["$" documentation {"+" documentation:}] - [control - ["[0]" io]] - [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] - [macro - ["[0]" template]]]] - [\\library - ["[0]" /]]) + [library + [lux "*" + ["$" documentation (.only documentation:)] + [control + ["[0]" io]] + [data + ["[0]" text (.only \n) + ["%" format (.only format)]]] + [macro + ["[0]" template]]]] + [\\library + ["[0]" /]]) (documentation: /.program: "Defines the entry-point to a program (similar to the 'main' function/method in other programming languages)." diff --git a/stdlib/source/documentation/lux/static.lux b/stdlib/source/documentation/lux/static.lux index bcde2dad6..025a3da30 100644 --- a/stdlib/source/documentation/lux/static.lux +++ b/stdlib/source/documentation/lux/static.lux @@ -1,10 +1,10 @@ (.using [library [lux {"-" nat int rev} - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [data [text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list]]]]] [\\library diff --git a/stdlib/source/documentation/lux/target.lux b/stdlib/source/documentation/lux/target.lux index 11691d06f..9d5eca38e 100644 --- a/stdlib/source/documentation/lux/target.lux +++ b/stdlib/source/documentation/lux/target.lux @@ -1,20 +1,20 @@ (.using - [library - [lux {"-" char} - ["$" documentation {"+" documentation:}] - [data - [text {"+" \n} - ["%" format {"+" format}]] - [collection - ["[0]" list]]]]] - [\\library - ["[0]" /]] - ["[0]" / "_" - ["[1][0]" js] - ["[1][0]" jvm] - ["[1][0]" lua] - ["[1][0]" python] - ["[1][0]" ruby]]) + [library + [lux {"-" char} + ["$" documentation (.only documentation:)] + [data + [text (.only \n) + ["%" format (.only format)]] + [collection + ["[0]" list]]]]] + [\\library + ["[0]" /]] + ["[0]" / "_" + ["[1][0]" js] + ["[1][0]" jvm] + ["[1][0]" lua] + ["[1][0]" python] + ["[1][0]" ruby]]) (documentation: /.Target (format "The name/ID of a platform targetted by a Lux compiler." diff --git a/stdlib/source/documentation/lux/target/js.lux b/stdlib/source/documentation/lux/target/js.lux index 744b61310..ac31482ce 100644 --- a/stdlib/source/documentation/lux/target/js.lux +++ b/stdlib/source/documentation/lux/target/js.lux @@ -1,10 +1,10 @@ (.using [library [lux "*" - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [data - [text {"+" \n} - ["%" format {"+" format}]] + [text (.only \n) + ["%" format (.only format)]] [collection ["[0]" list]]]]] [\\library diff --git a/stdlib/source/documentation/lux/target/jvm.lux b/stdlib/source/documentation/lux/target/jvm.lux index fe6cc7ab6..fdaed612c 100644 --- a/stdlib/source/documentation/lux/target/jvm.lux +++ b/stdlib/source/documentation/lux/target/jvm.lux @@ -1,10 +1,10 @@ (.using [library [lux {"-" char} - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [data - [text {"+" \n} - ["%" format {"+" format}]] + [text (.only \n) + ["%" format (.only format)]] [collection ["[0]" list]]]]] [\\library diff --git a/stdlib/source/documentation/lux/target/jvm/type.lux b/stdlib/source/documentation/lux/target/jvm/type.lux index e4e3f042c..d83e27552 100644 --- a/stdlib/source/documentation/lux/target/jvm/type.lux +++ b/stdlib/source/documentation/lux/target/jvm/type.lux @@ -1,10 +1,10 @@ (.using [library [lux {"-" char} - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [data - [text {"+" \n} - ["%" format {"+" format}]] + [text (.only \n) + ["%" format (.only format)]] [collection ["[0]" list]]]]] [\\library diff --git a/stdlib/source/documentation/lux/target/jvm/type/alias.lux b/stdlib/source/documentation/lux/target/jvm/type/alias.lux index 72ace63a0..d37664b30 100644 --- a/stdlib/source/documentation/lux/target/jvm/type/alias.lux +++ b/stdlib/source/documentation/lux/target/jvm/type/alias.lux @@ -1,10 +1,10 @@ (.using [library [lux {"-" char} - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [data - [text {"+" \n} - ["%" format {"+" format}]] + [text (.only \n) + ["%" format (.only format)]] [collection ["[0]" list]]]]] [\\library diff --git a/stdlib/source/documentation/lux/target/jvm/type/box.lux b/stdlib/source/documentation/lux/target/jvm/type/box.lux index ef7426ec7..a17addccd 100644 --- a/stdlib/source/documentation/lux/target/jvm/type/box.lux +++ b/stdlib/source/documentation/lux/target/jvm/type/box.lux @@ -1,10 +1,10 @@ (.using [library [lux {"-" char} - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [data - [text {"+" \n} - ["%" format {"+" format}]] + [text (.only \n) + ["%" format (.only format)]] [collection ["[0]" list]]]]] [\\library diff --git a/stdlib/source/documentation/lux/target/jvm/type/category.lux b/stdlib/source/documentation/lux/target/jvm/type/category.lux index 370ba21b3..b6f28d7dc 100644 --- a/stdlib/source/documentation/lux/target/jvm/type/category.lux +++ b/stdlib/source/documentation/lux/target/jvm/type/category.lux @@ -1,10 +1,10 @@ (.using [library [lux {"-" char} - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [data - [text {"+" \n} - ["%" format {"+" format}]] + [text (.only \n) + ["%" format (.only format)]] [collection ["[0]" list]]]]] [\\library diff --git a/stdlib/source/documentation/lux/target/jvm/type/descriptor.lux b/stdlib/source/documentation/lux/target/jvm/type/descriptor.lux index 51dd8be76..8a77f56a5 100644 --- a/stdlib/source/documentation/lux/target/jvm/type/descriptor.lux +++ b/stdlib/source/documentation/lux/target/jvm/type/descriptor.lux @@ -1,10 +1,10 @@ (.using [library [lux {"-" char} - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [data - [text {"+" \n} - ["%" format {"+" format}]] + [text (.only \n) + ["%" format (.only format)]] [collection ["[0]" list]]]]] [\\library diff --git a/stdlib/source/documentation/lux/target/jvm/type/lux.lux b/stdlib/source/documentation/lux/target/jvm/type/lux.lux index d0a9120fc..72b240c89 100644 --- a/stdlib/source/documentation/lux/target/jvm/type/lux.lux +++ b/stdlib/source/documentation/lux/target/jvm/type/lux.lux @@ -1,10 +1,10 @@ (.using [library [lux {"-" char} - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [data - [text {"+" \n} - ["%" format {"+" format}]] + [text (.only \n) + ["%" format (.only format)]] [collection ["[0]" list]]]]] [\\library diff --git a/stdlib/source/documentation/lux/target/jvm/type/parser.lux b/stdlib/source/documentation/lux/target/jvm/type/parser.lux index dd04f9b9c..b3ccb4da1 100644 --- a/stdlib/source/documentation/lux/target/jvm/type/parser.lux +++ b/stdlib/source/documentation/lux/target/jvm/type/parser.lux @@ -1,10 +1,10 @@ (.using [library [lux {"-" char} - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [data - [text {"+" \n} - ["%" format {"+" format}]] + [text (.only \n) + ["%" format (.only format)]] [collection ["[0]" list]]]]] [\\library diff --git a/stdlib/source/documentation/lux/target/jvm/type/reflection.lux b/stdlib/source/documentation/lux/target/jvm/type/reflection.lux index b386fa4ff..190fd48a6 100644 --- a/stdlib/source/documentation/lux/target/jvm/type/reflection.lux +++ b/stdlib/source/documentation/lux/target/jvm/type/reflection.lux @@ -1,10 +1,10 @@ (.using [library [lux {"-" char} - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [data - [text {"+" \n} - ["%" format {"+" format}]] + [text (.only \n) + ["%" format (.only format)]] [collection ["[0]" list]]]]] [\\library diff --git a/stdlib/source/documentation/lux/target/jvm/type/signature.lux b/stdlib/source/documentation/lux/target/jvm/type/signature.lux index ff3df3280..6b65f4b8e 100644 --- a/stdlib/source/documentation/lux/target/jvm/type/signature.lux +++ b/stdlib/source/documentation/lux/target/jvm/type/signature.lux @@ -1,10 +1,10 @@ (.using [library [lux {"-" char} - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [data - [text {"+" \n} - ["%" format {"+" format}]] + [text (.only \n) + ["%" format (.only format)]] [collection ["[0]" list]]]]] [\\library diff --git a/stdlib/source/documentation/lux/target/lua.lux b/stdlib/source/documentation/lux/target/lua.lux index 657caf75a..efadf5a77 100644 --- a/stdlib/source/documentation/lux/target/lua.lux +++ b/stdlib/source/documentation/lux/target/lua.lux @@ -1,10 +1,10 @@ (.using [library [lux "*" - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [data - [text {"+" \n} - ["%" format {"+" format}]] + [text (.only \n) + ["%" format (.only format)]] [collection ["[0]" list]]]]] [\\library diff --git a/stdlib/source/documentation/lux/target/python.lux b/stdlib/source/documentation/lux/target/python.lux index 60d5172bd..d835e8948 100644 --- a/stdlib/source/documentation/lux/target/python.lux +++ b/stdlib/source/documentation/lux/target/python.lux @@ -1,10 +1,10 @@ (.using [library [lux "*" - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [data - [text {"+" \n} - ["%" format {"+" format}]] + [text (.only \n) + ["%" format (.only format)]] [collection ["[0]" list]]]]] [\\library diff --git a/stdlib/source/documentation/lux/target/ruby.lux b/stdlib/source/documentation/lux/target/ruby.lux index 0f24c30da..190b2faee 100644 --- a/stdlib/source/documentation/lux/target/ruby.lux +++ b/stdlib/source/documentation/lux/target/ruby.lux @@ -1,10 +1,10 @@ (.using [library [lux "*" - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [data - [text {"+" \n} - ["%" format {"+" format}]] + [text (.only \n) + ["%" format (.only format)]] [collection ["[0]" list]]]]] [\\library diff --git a/stdlib/source/documentation/lux/test.lux b/stdlib/source/documentation/lux/test.lux index ade8f549f..5d0167ac5 100644 --- a/stdlib/source/documentation/lux/test.lux +++ b/stdlib/source/documentation/lux/test.lux @@ -1,13 +1,13 @@ (.using [library [lux {"-" and for} - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [control ["<>" parser ["<[0]>" code]]] [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] + ["[0]" text (.only \n) + ["%" format (.only format)]]] [macro ["[0]" template]]]] [\\library diff --git a/stdlib/source/documentation/lux/time.lux b/stdlib/source/documentation/lux/time.lux index 9395a6357..9df383e0c 100644 --- a/stdlib/source/documentation/lux/time.lux +++ b/stdlib/source/documentation/lux/time.lux @@ -1,24 +1,24 @@ (.using - [library - [lux {"-" and} - ["$" documentation {"+" documentation:}] - [control - ["<>" parser - ["<[0]>" code]]] - [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] - [macro - ["[0]" template]]]] - [\\library - ["[0]" /]] - ["[0]" / "_" - ["[1][0]" date] - ["[1][0]" day] - ["[1][0]" duration] - ["[1][0]" instant] - ["[1][0]" month] - ["[1][0]" year]]) + [library + [lux {"-" and} + ["$" documentation (.only documentation:)] + [control + ["<>" parser + ["<[0]>" code]]] + [data + ["[0]" text (.only \n) + ["%" format (.only format)]]] + [macro + ["[0]" template]]]] + [\\library + ["[0]" /]] + ["[0]" / "_" + ["[1][0]" date] + ["[1][0]" day] + ["[1][0]" duration] + ["[1][0]" instant] + ["[1][0]" month] + ["[1][0]" year]]) (template [<name> <doc>] [(documentation: <name> diff --git a/stdlib/source/documentation/lux/time/date.lux b/stdlib/source/documentation/lux/time/date.lux index 24a49a5b1..017449554 100644 --- a/stdlib/source/documentation/lux/time/date.lux +++ b/stdlib/source/documentation/lux/time/date.lux @@ -1,17 +1,17 @@ (.using - [library - [lux {"-" and} - ["$" documentation {"+" documentation:}] - [control - ["<>" parser - ["<[0]>" code]]] - [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] - [macro - ["[0]" template]]]] - [\\library - ["[0]" /]]) + [library + [lux {"-" and} + ["$" documentation (.only documentation:)] + [control + ["<>" parser + ["<[0]>" code]]] + [data + ["[0]" text (.only \n) + ["%" format (.only format)]]] + [macro + ["[0]" template]]]] + [\\library + ["[0]" /]]) (documentation: /.Date "A date specified as a year/month/day triplet.") diff --git a/stdlib/source/documentation/lux/time/day.lux b/stdlib/source/documentation/lux/time/day.lux index 85a19aec7..715d09a15 100644 --- a/stdlib/source/documentation/lux/time/day.lux +++ b/stdlib/source/documentation/lux/time/day.lux @@ -1,17 +1,17 @@ (.using - [library - [lux {"-" and} - ["$" documentation {"+" documentation:}] - [control - ["<>" parser - ["<[0]>" code]]] - [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] - [macro - ["[0]" template]]]] - [\\library - ["[0]" /]]) + [library + [lux {"-" and} + ["$" documentation (.only documentation:)] + [control + ["<>" parser + ["<[0]>" code]]] + [data + ["[0]" text (.only \n) + ["%" format (.only format)]]] + [macro + ["[0]" template]]]] + [\\library + ["[0]" /]]) (documentation: /.Day "A day of the week.") diff --git a/stdlib/source/documentation/lux/time/duration.lux b/stdlib/source/documentation/lux/time/duration.lux index fcd2a6706..37dbf4d72 100644 --- a/stdlib/source/documentation/lux/time/duration.lux +++ b/stdlib/source/documentation/lux/time/duration.lux @@ -1,13 +1,13 @@ (.using [library [lux {"-" and} - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [control ["<>" parser ["<[0]>" code]]] [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] + ["[0]" text (.only \n) + ["%" format (.only format)]]] [macro ["[0]" template]]]] [\\library diff --git a/stdlib/source/documentation/lux/time/instant.lux b/stdlib/source/documentation/lux/time/instant.lux index b4a7e4d09..fca8f288d 100644 --- a/stdlib/source/documentation/lux/time/instant.lux +++ b/stdlib/source/documentation/lux/time/instant.lux @@ -1,17 +1,17 @@ (.using - [library - [lux {"-" and} - ["$" documentation {"+" documentation:}] - [control - ["<>" parser - ["<[0]>" code]]] - [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] - [macro - ["[0]" template]]]] - [\\library - ["[0]" /]]) + [library + [lux {"-" and} + ["$" documentation (.only documentation:)] + [control + ["<>" parser + ["<[0]>" code]]] + [data + ["[0]" text (.only \n) + ["%" format (.only format)]]] + [macro + ["[0]" template]]]] + [\\library + ["[0]" /]]) (documentation: /.Instant "Instant is defined as milli-seconds since the epoch.") diff --git a/stdlib/source/documentation/lux/time/month.lux b/stdlib/source/documentation/lux/time/month.lux index b59eac676..4f8bfc14c 100644 --- a/stdlib/source/documentation/lux/time/month.lux +++ b/stdlib/source/documentation/lux/time/month.lux @@ -1,17 +1,17 @@ (.using - [library - [lux {"-" and} - ["$" documentation {"+" documentation:}] - [control - ["<>" parser - ["<[0]>" code]]] - [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] - [macro - ["[0]" template]]]] - [\\library - ["[0]" /]]) + [library + [lux {"-" and} + ["$" documentation (.only documentation:)] + [control + ["<>" parser + ["<[0]>" code]]] + [data + ["[0]" text (.only \n) + ["%" format (.only format)]]] + [macro + ["[0]" template]]]] + [\\library + ["[0]" /]]) (documentation: /.Month "A month of the year.") diff --git a/stdlib/source/documentation/lux/time/year.lux b/stdlib/source/documentation/lux/time/year.lux index f4d6807bb..099b0ea09 100644 --- a/stdlib/source/documentation/lux/time/year.lux +++ b/stdlib/source/documentation/lux/time/year.lux @@ -1,17 +1,17 @@ (.using - [library - [lux {"-" and} - ["$" documentation {"+" documentation:}] - [control - ["<>" parser - ["<[0]>" code]]] - [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] - [macro - ["[0]" template]]]] - [\\library - ["[0]" /]]) + [library + [lux {"-" and} + ["$" documentation (.only documentation:)] + [control + ["<>" parser + ["<[0]>" code]]] + [data + ["[0]" text (.only \n) + ["%" format (.only format)]]] + [macro + ["[0]" template]]]] + [\\library + ["[0]" /]]) (documentation: /.Year (format "A year in the gregorian calendar." diff --git a/stdlib/source/documentation/lux/tool.lux b/stdlib/source/documentation/lux/tool.lux index f101ea48d..84090f0bb 100644 --- a/stdlib/source/documentation/lux/tool.lux +++ b/stdlib/source/documentation/lux/tool.lux @@ -1,21 +1,21 @@ (.using - [library - [lux {"-" char} - ["$" documentation {"+" documentation:}] - [data - [text {"+" \n} - ["%" format {"+" format}]] - [collection - ["[0]" list]]]]] - ["[0]" / "_" - [compiler - ["[1][0]" phase] - [language - [lux - ["[1][0]" analysis] - ["[1][0]" directive] - ["[1][0]" generation] - ["[1][0]" synthesis]]]]]) + [library + [lux {"-" char} + ["$" documentation (.only documentation:)] + [data + [text (.only \n) + ["%" format (.only format)]] + [collection + ["[0]" list]]]]] + ["[0]" / "_" + [compiler + ["[1][0]" phase] + [language + [lux + ["[1][0]" analysis] + ["[1][0]" directive] + ["[1][0]" generation] + ["[1][0]" synthesis]]]]]) (.def: .public documentation (.List $.Module) diff --git a/stdlib/source/documentation/lux/tool/compiler/language/lux/analysis.lux b/stdlib/source/documentation/lux/tool/compiler/language/lux/analysis.lux index 8cda0769a..949b46218 100644 --- a/stdlib/source/documentation/lux/tool/compiler/language/lux/analysis.lux +++ b/stdlib/source/documentation/lux/tool/compiler/language/lux/analysis.lux @@ -1,10 +1,10 @@ (.using [library [lux "*" - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [data - [text {"+" \n} - ["%" format {"+" format}]] + [text (.only \n) + ["%" format (.only format)]] [collection ["[0]" list]]]]] [\\library diff --git a/stdlib/source/documentation/lux/tool/compiler/language/lux/directive.lux b/stdlib/source/documentation/lux/tool/compiler/language/lux/directive.lux index f47919714..69444aff6 100644 --- a/stdlib/source/documentation/lux/tool/compiler/language/lux/directive.lux +++ b/stdlib/source/documentation/lux/tool/compiler/language/lux/directive.lux @@ -1,14 +1,14 @@ (.using - [library - [lux {"-" char} - ["$" documentation {"+" documentation:}] - [data - [text {"+" \n} - ["%" format {"+" format}]] - [collection - ["[0]" list]]]]] - [\\library - ["[0]" /]]) + [library + [lux {"-" char} + ["$" documentation (.only documentation:)] + [data + [text (.only \n) + ["%" format (.only format)]] + [collection + ["[0]" list]]]]] + [\\library + ["[0]" /]]) (.def: .public documentation (.List $.Module) diff --git a/stdlib/source/documentation/lux/tool/compiler/language/lux/generation.lux b/stdlib/source/documentation/lux/tool/compiler/language/lux/generation.lux index e02893f28..f4ffdb570 100644 --- a/stdlib/source/documentation/lux/tool/compiler/language/lux/generation.lux +++ b/stdlib/source/documentation/lux/tool/compiler/language/lux/generation.lux @@ -1,10 +1,10 @@ (.using [library [lux "*" - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [data - [text {"+" \n} - ["%" format {"+" format}]] + [text (.only \n) + ["%" format (.only format)]] [collection ["[0]" list]]]]] [\\library diff --git a/stdlib/source/documentation/lux/tool/compiler/language/lux/synthesis.lux b/stdlib/source/documentation/lux/tool/compiler/language/lux/synthesis.lux index ada773fab..0fe773f75 100644 --- a/stdlib/source/documentation/lux/tool/compiler/language/lux/synthesis.lux +++ b/stdlib/source/documentation/lux/tool/compiler/language/lux/synthesis.lux @@ -1,10 +1,10 @@ (.using [library [lux "*" - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [data - [text {"+" \n} - ["%" format {"+" format}]] + [text (.only \n) + ["%" format (.only format)]] [collection ["[0]" list]]]]] [\\library diff --git a/stdlib/source/documentation/lux/tool/compiler/phase.lux b/stdlib/source/documentation/lux/tool/compiler/phase.lux index 0ef45f8db..824383330 100644 --- a/stdlib/source/documentation/lux/tool/compiler/phase.lux +++ b/stdlib/source/documentation/lux/tool/compiler/phase.lux @@ -1,14 +1,14 @@ (.using - [library - [lux {"-" char} - ["$" documentation {"+" documentation:}] - [data - [text {"+" \n} - ["%" format {"+" format}]] - [collection - ["[0]" list]]]]] - [\\library - ["[0]" /]]) + [library + [lux {"-" char} + ["$" documentation (.only documentation:)] + [data + [text (.only \n) + ["%" format (.only format)]] + [collection + ["[0]" list]]]]] + [\\library + ["[0]" /]]) (.def: .public documentation (.List $.Module) diff --git a/stdlib/source/documentation/lux/type.lux b/stdlib/source/documentation/lux/type.lux index f7d1e3f64..a33565f6f 100644 --- a/stdlib/source/documentation/lux/type.lux +++ b/stdlib/source/documentation/lux/type.lux @@ -1,12 +1,12 @@ (.using [library [lux {"-" function as let} - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [control ["<>" parser ["<[0]>" code]]] [data - ["[0]" text {"+" \n} + ["[0]" text (.only \n) ["%" format]]] [macro ["[0]" template]]]] diff --git a/stdlib/source/documentation/lux/type/check.lux b/stdlib/source/documentation/lux/type/check.lux index 92a02c563..4cf4e2e69 100644 --- a/stdlib/source/documentation/lux/type/check.lux +++ b/stdlib/source/documentation/lux/type/check.lux @@ -1,17 +1,17 @@ (.using - [library - [lux {"-" and} - ["$" documentation {"+" documentation:}] - [control - ["<>" parser - ["<[0]>" code]]] - [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] - [macro - ["[0]" template]]]] - [\\library - ["[0]" /]]) + [library + [lux {"-" and} + ["$" documentation (.only documentation:)] + [control + ["<>" parser + ["<[0]>" code]]] + [data + ["[0]" text (.only \n) + ["%" format (.only format)]]] + [macro + ["[0]" template]]]] + [\\library + ["[0]" /]]) (documentation: /.Var "The ID for a type-variable in a type-checking context.") diff --git a/stdlib/source/documentation/lux/type/dynamic.lux b/stdlib/source/documentation/lux/type/dynamic.lux index 1140e6158..53ef5fffe 100644 --- a/stdlib/source/documentation/lux/type/dynamic.lux +++ b/stdlib/source/documentation/lux/type/dynamic.lux @@ -1,13 +1,13 @@ (.using [library [lux {"-" static} - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [control ["<>" parser ["<[0]>" code]]] [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] + ["[0]" text (.only \n) + ["%" format (.only format)]]] [macro ["[0]" template]]]] [\\library diff --git a/stdlib/source/documentation/lux/type/implicit.lux b/stdlib/source/documentation/lux/type/implicit.lux index 6596b7f97..58822366c 100644 --- a/stdlib/source/documentation/lux/type/implicit.lux +++ b/stdlib/source/documentation/lux/type/implicit.lux @@ -1,17 +1,17 @@ (.using - [library - [lux {"-" and} - ["$" documentation {"+" documentation:}] - [control - ["<>" parser - ["<[0]>" code]]] - [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] - [macro - ["[0]" template]]]] - [\\library - ["[0]" /]]) + [library + [lux {"-" and} + ["$" documentation (.only documentation:)] + [control + ["<>" parser + ["<[0]>" code]]] + [data + ["[0]" text (.only \n) + ["%" format (.only format)]]] + [macro + ["[0]" template]]]] + [\\library + ["[0]" /]]) (documentation: /.## (format "Automatic implementation selection (for type-class style polymorphism)." diff --git a/stdlib/source/documentation/lux/type/poly.lux b/stdlib/source/documentation/lux/type/poly.lux index bb8f1489e..ba787f87d 100644 --- a/stdlib/source/documentation/lux/type/poly.lux +++ b/stdlib/source/documentation/lux/type/poly.lux @@ -1,21 +1,21 @@ (.using - [library - [lux {"-" and} - ["$" documentation {"+" documentation:}] - [abstract - [\\specification - ["$[0]" equivalence] - ["$[0]" codec]]] - [control - ["<>" parser - ["<[0]>" code]]] - [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] - [macro - ["[0]" template]]]] - [\\library - ["[0]" /]]) + [library + [lux {"-" and} + ["$" documentation (.only documentation:)] + [abstract + [\\specification + ["$[0]" equivalence] + ["$[0]" codec]]] + [control + ["<>" parser + ["<[0]>" code]]] + [data + ["[0]" text (.only \n) + ["%" format (.only format)]]] + [macro + ["[0]" template]]]] + [\\library + ["[0]" /]]) (documentation: /.code "" diff --git a/stdlib/source/documentation/lux/type/primitive.lux b/stdlib/source/documentation/lux/type/primitive.lux index e4a180bfc..b8e885dcf 100644 --- a/stdlib/source/documentation/lux/type/primitive.lux +++ b/stdlib/source/documentation/lux/type/primitive.lux @@ -1,13 +1,13 @@ (.using [library [lux "*" - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [control ["<>" parser ["<[0]>" code]]] [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] + ["[0]" text (.only \n) + ["%" format (.only format)]]] [macro ["[0]" template]]]] [\\library diff --git a/stdlib/source/documentation/lux/type/quotient.lux b/stdlib/source/documentation/lux/type/quotient.lux index 799645f81..9013f97a9 100644 --- a/stdlib/source/documentation/lux/type/quotient.lux +++ b/stdlib/source/documentation/lux/type/quotient.lux @@ -1,13 +1,13 @@ (.using [library [lux {"-" type} - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [control ["<>" parser ["<[0]>" code]]] [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] + ["[0]" text (.only \n) + ["%" format (.only format)]]] [macro ["[0]" template]]]] [\\library diff --git a/stdlib/source/documentation/lux/type/refinement.lux b/stdlib/source/documentation/lux/type/refinement.lux index bbe26014b..43386ca18 100644 --- a/stdlib/source/documentation/lux/type/refinement.lux +++ b/stdlib/source/documentation/lux/type/refinement.lux @@ -1,13 +1,13 @@ (.using [library [lux {"-" type} - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [control ["<>" parser ["<[0]>" code]]] [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] + ["[0]" text (.only \n) + ["%" format (.only format)]]] [macro ["[0]" template]]]] [\\library diff --git a/stdlib/source/documentation/lux/type/resource.lux b/stdlib/source/documentation/lux/type/resource.lux index cb3ec74bc..0df523b1f 100644 --- a/stdlib/source/documentation/lux/type/resource.lux +++ b/stdlib/source/documentation/lux/type/resource.lux @@ -1,17 +1,17 @@ (.using - [library - [lux {"-" and} - ["$" documentation {"+" documentation:}] - [control - ["<>" parser - ["<[0]>" code]]] - [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] - [macro - ["[0]" template]]]] - [\\library - ["[0]" /]]) + [library + [lux {"-" and} + ["$" documentation (.only documentation:)] + [control + ["<>" parser + ["<[0]>" code]]] + [data + ["[0]" text (.only \n) + ["%" format (.only format)]]] + [macro + ["[0]" template]]]] + [\\library + ["[0]" /]]) (documentation: (/.Procedure monad input output value) (format "A computation that takes a sequence of resource access rights as inputs and yields a different sequence as outputs." diff --git a/stdlib/source/documentation/lux/type/unit.lux b/stdlib/source/documentation/lux/type/unit.lux index a3d37d552..dabf9262b 100644 --- a/stdlib/source/documentation/lux/type/unit.lux +++ b/stdlib/source/documentation/lux/type/unit.lux @@ -1,13 +1,13 @@ (.using [library [lux {"-" and} - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [control ["<>" parser ["<[0]>" code]]] [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] + ["[0]" text (.only \n) + ["%" format (.only format)]]] [macro ["[0]" template]] [math diff --git a/stdlib/source/documentation/lux/type/variance.lux b/stdlib/source/documentation/lux/type/variance.lux index 8969e37e9..e02756049 100644 --- a/stdlib/source/documentation/lux/type/variance.lux +++ b/stdlib/source/documentation/lux/type/variance.lux @@ -1,17 +1,17 @@ (.using - [library - [lux {"-" and} - ["$" documentation {"+" documentation:}] - [control - ["<>" parser - ["<[0]>" code]]] - [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] - [macro - ["[0]" template]]]] - [\\library - ["[0]" /]]) + [library + [lux {"-" and} + ["$" documentation (.only documentation:)] + [control + ["<>" parser + ["<[0]>" code]]] + [data + ["[0]" text (.only \n) + ["%" format (.only format)]]] + [macro + ["[0]" template]]]] + [\\library + ["[0]" /]]) (documentation: (/.Co it) "A constraint for covariant types.") diff --git a/stdlib/source/documentation/lux/world.lux b/stdlib/source/documentation/lux/world.lux index d226dfa3d..527c627d4 100644 --- a/stdlib/source/documentation/lux/world.lux +++ b/stdlib/source/documentation/lux/world.lux @@ -1,8 +1,8 @@ (.using [library [lux "*" - [program {"+" program:}] - ["$" documentation {"+" documentation:}] + [program (.only program:)] + ["$" documentation (.only documentation:)] ["[0]" debug] [control ["[0]" io]] diff --git a/stdlib/source/documentation/lux/world/console.lux b/stdlib/source/documentation/lux/world/console.lux index bc7cd8818..cea7b0662 100644 --- a/stdlib/source/documentation/lux/world/console.lux +++ b/stdlib/source/documentation/lux/world/console.lux @@ -1,14 +1,14 @@ (.using [library [lux "*" - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] ["@" target] [control ["<>" parser ["<[0]>" code]]] [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] + ["[0]" text (.only \n) + ["%" format (.only format)]]] [macro ["[0]" template]]]] [\\library diff --git a/stdlib/source/documentation/lux/world/file.lux b/stdlib/source/documentation/lux/world/file.lux index 33b42c72b..639d0b43a 100644 --- a/stdlib/source/documentation/lux/world/file.lux +++ b/stdlib/source/documentation/lux/world/file.lux @@ -1,14 +1,14 @@ (.using [library [lux "*" - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] ["@" target] [control ["<>" parser ["<[0]>" code]]] [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] + ["[0]" text (.only \n) + ["%" format (.only format)]]] [macro ["[0]" template]]]] [\\library diff --git a/stdlib/source/documentation/lux/world/file/watch.lux b/stdlib/source/documentation/lux/world/file/watch.lux index 3cf437056..017d6e707 100644 --- a/stdlib/source/documentation/lux/world/file/watch.lux +++ b/stdlib/source/documentation/lux/world/file/watch.lux @@ -1,14 +1,14 @@ (.using [library [lux "*" - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] ["@" target] [control ["<>" parser ["<[0]>" code]]] [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] + ["[0]" text (.only \n) + ["%" format (.only format)]]] [macro ["[0]" template]]]] [\\library diff --git a/stdlib/source/documentation/lux/world/input/keyboard.lux b/stdlib/source/documentation/lux/world/input/keyboard.lux index c379ef102..d224f77b3 100644 --- a/stdlib/source/documentation/lux/world/input/keyboard.lux +++ b/stdlib/source/documentation/lux/world/input/keyboard.lux @@ -1,17 +1,17 @@ (.using - [library - [lux "*" - ["$" documentation {"+" documentation:}] - [control - ["<>" parser - ["<[0]>" code]]] - [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] - [macro - ["[0]" template]]]] - [\\library - ["[0]" /]]) + [library + [lux "*" + ["$" documentation (.only documentation:)] + [control + ["<>" parser + ["<[0]>" code]]] + [data + ["[0]" text (.only \n) + ["%" format (.only format)]]] + [macro + ["[0]" template]]]] + [\\library + ["[0]" /]]) (documentation: /.Key "A key from a keyboard, identify by a numeric ID.") diff --git a/stdlib/source/documentation/lux/world/net.lux b/stdlib/source/documentation/lux/world/net.lux index 602177486..ba9f93fd5 100644 --- a/stdlib/source/documentation/lux/world/net.lux +++ b/stdlib/source/documentation/lux/world/net.lux @@ -1,18 +1,18 @@ (.using - [library - [lux "*" - [program {"+" program:}] - ["$" documentation {"+" documentation:}] - ["[0]" debug] - [control - ["[0]" io]]]] - [\\library - ["[0]" /]] - ["[0]" / "_" - ["[1][0]" uri] - ["[1][0]" http "_" - ["[1]/[0]" client] - ["[1]/[0]" status]]]) + [library + [lux "*" + [program (.only program:)] + ["$" documentation (.only documentation:)] + ["[0]" debug] + [control + ["[0]" io]]]] + [\\library + ["[0]" /]] + ["[0]" / "_" + ["[1][0]" uri] + ["[1][0]" http "_" + ["[1]/[0]" client] + ["[1]/[0]" status]]]) (documentation: /.Address "A TCP/IP address.") diff --git a/stdlib/source/documentation/lux/world/net/http/client.lux b/stdlib/source/documentation/lux/world/net/http/client.lux index a84745c73..69132bbc3 100644 --- a/stdlib/source/documentation/lux/world/net/http/client.lux +++ b/stdlib/source/documentation/lux/world/net/http/client.lux @@ -1,14 +1,14 @@ (.using [library [lux "*" - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] ["@" target] [control ["<>" parser ["<[0]>" code]]] [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] + ["[0]" text (.only \n) + ["%" format (.only format)]]] [macro ["[0]" template]]]] [\\library diff --git a/stdlib/source/documentation/lux/world/net/http/status.lux b/stdlib/source/documentation/lux/world/net/http/status.lux index 434cc9f7c..a6555daa1 100644 --- a/stdlib/source/documentation/lux/world/net/http/status.lux +++ b/stdlib/source/documentation/lux/world/net/http/status.lux @@ -1,17 +1,17 @@ (.using - [library - [lux "*" - ["$" documentation {"+" documentation:}] - [control - ["<>" parser - ["<[0]>" code]]] - [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] - [macro - ["[0]" template]]]] - [\\library - ["[0]" /]]) + [library + [lux "*" + ["$" documentation (.only documentation:)] + [control + ["<>" parser + ["<[0]>" code]]] + [data + ["[0]" text (.only \n) + ["%" format (.only format)]]] + [macro + ["[0]" template]]]] + [\\library + ["[0]" /]]) (template [<name>] [(documentation: <name> diff --git a/stdlib/source/documentation/lux/world/net/uri.lux b/stdlib/source/documentation/lux/world/net/uri.lux index d25248a81..33094197b 100644 --- a/stdlib/source/documentation/lux/world/net/uri.lux +++ b/stdlib/source/documentation/lux/world/net/uri.lux @@ -1,13 +1,13 @@ (.using - [library - [lux "*" - [program {"+" program:}] - ["$" documentation {"+" documentation:}] - ["[0]" debug] - [control - ["[0]" io]]]] - [\\library - ["[0]" /]]) + [library + [lux "*" + [program (.only program:)] + ["$" documentation (.only documentation:)] + ["[0]" debug] + [control + ["[0]" io]]]] + [\\library + ["[0]" /]]) (documentation: /.URI "A Uniform Resource Identifier.") diff --git a/stdlib/source/documentation/lux/world/output/video/resolution.lux b/stdlib/source/documentation/lux/world/output/video/resolution.lux index 27a42050c..707ed98fa 100644 --- a/stdlib/source/documentation/lux/world/output/video/resolution.lux +++ b/stdlib/source/documentation/lux/world/output/video/resolution.lux @@ -1,13 +1,13 @@ (.using [library [lux "*" - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] [control ["<>" parser ["<[0]>" code]]] [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] + ["[0]" text (.only \n) + ["%" format (.only format)]]] [macro ["[0]" template]]]] [\\library diff --git a/stdlib/source/documentation/lux/world/program.lux b/stdlib/source/documentation/lux/world/program.lux index 34040fa5c..4e46381ea 100644 --- a/stdlib/source/documentation/lux/world/program.lux +++ b/stdlib/source/documentation/lux/world/program.lux @@ -1,17 +1,17 @@ (.using - [library - [lux "*" - ["$" documentation {"+" documentation:}] - [control - ["<>" parser - ["<[0]>" code]]] - [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] - [macro - ["[0]" template]]]] - [\\library - ["[0]" /]]) + [library + [lux "*" + ["$" documentation (.only documentation:)] + [control + ["<>" parser + ["<[0]>" code]]] + [data + ["[0]" text (.only \n) + ["%" format (.only format)]]] + [macro + ["[0]" template]]]] + [\\library + ["[0]" /]]) (documentation: (/.Program !) "Access to ambient program data and the capacity to exit the program.") diff --git a/stdlib/source/documentation/lux/world/shell.lux b/stdlib/source/documentation/lux/world/shell.lux index cccc8dc3e..782bc4d63 100644 --- a/stdlib/source/documentation/lux/world/shell.lux +++ b/stdlib/source/documentation/lux/world/shell.lux @@ -1,14 +1,14 @@ (.using [library [lux "*" - ["$" documentation {"+" documentation:}] + ["$" documentation (.only documentation:)] ["@" target] [control ["<>" parser ["<[0]>" code]]] [data - ["[0]" text {"+" \n} - ["%" format {"+" format}]]] + ["[0]" text (.only \n) + ["%" format (.only format)]]] [macro ["[0]" template]]]] [\\library diff --git a/stdlib/source/experiment/compiler.lux b/stdlib/source/experiment/compiler.lux index f17f6c499..4420574cd 100644 --- a/stdlib/source/experiment/compiler.lux +++ b/stdlib/source/experiment/compiler.lux @@ -4,7 +4,7 @@ [control ["[0]" try]] [tool - ["[0]" compiler {"+" Custom}]]]]) + ["[0]" compiler (.only Custom)]]]]) (def: .public (dummy parameters) (Custom Nat [] []) diff --git a/stdlib/source/library/lux.lux b/stdlib/source/library/lux.lux index 7ff877259..53eb1b987 100644 --- a/stdlib/source/library/lux.lux +++ b/stdlib/source/library/lux.lux @@ -3378,10 +3378,10 @@ (type: Referrals (Variant {#All} - {#Only (List Text)} {#Exclude (List Text)} {#Ignore} - {#Nothing})) + {#Nothing} + {#Referral [Symbol (List Code)]})) (type: Openings [Text (List Text)]) @@ -3407,17 +3407,15 @@ (meta#in name) _ - (failure "only/+ and exclude/- require symbols.")))) + (failure "+ and exclude/- require symbols.")))) defs)) (def: (referrals_parser tokens) (-> (List Code) (Meta [Referrals (List Code)])) (case tokens - (pattern#or (pattern (partial_list [_ {#Variant (partial_list [_ {#Text "+"}] defs)}] tokens')) - (pattern (partial_list [_ {#Variant (partial_list [_ {#Text "only"}] defs)}] tokens'))) - (do meta_monad - [defs' (..referral_references defs)] - (in [{#Only defs'} tokens'])) + (pattern (partial_list [_ {#Form (partial_list [_ {#Symbol macro}] defs)}] tokens')) + (meta#in [{#Referral [macro defs]} + tokens']) (pattern#or (pattern (partial_list [_ {#Variant (partial_list [_ {#Text "-"}] defs)}] tokens')) (pattern (partial_list [_ {#Variant (partial_list [_ {#Text "exclude"}] defs)}] tokens'))) @@ -3723,6 +3721,52 @@ cases)] output)) +... TODO: Allow asking the compiler for the name of the definition +... currently being defined. That name can then be fed into +... 'wrong_syntax_error' for easier maintenance of the error_messages. +(def: (wrong_syntax_error it) + (-> Symbol Text) + (|> it + symbol#encoded + (text#composite "Wrong syntax for "))) + +(macro: .public (symbol tokens) + (case tokens + (pattern (list [_ {#Symbol [module name]}])) + (meta#in (list (` [(~ (text$ module)) (~ (text$ name))]))) + + _ + (failure (..wrong_syntax_error [..prelude_module "symbol"])))) + +(def: (test_referrals current_module imported_module all_defs referred_defs) + (-> Text Text (List Text) (List Text) (Meta (List Any))) + (monad#each meta_monad + (is (-> Text (Meta Any)) + (function (_ _def) + (if (is_member? all_defs _def) + (meta#in []) + (failure (all text#composite _def " is not defined in module " imported_module " @ " current_module))))) + referred_defs)) + +(def: (alias_definition imported_module def) + (-> Text Text Code) + (` ("lux def alias" (~ (local$ def)) (~ (symbol$ [imported_module def]))))) + +(macro: .public (only tokens) + (case (..parsed (all ..andP + ..textP + ..textP + (..someP ..localP)) + tokens) + {.#Some [current_module imported_module actual]} + (do meta_monad + [expected (exported_definitions imported_module) + _ (test_referrals current_module imported_module expected actual)] + (in (list#each (..alias_definition imported_module) actual))) + + {.#None} + (failure (..wrong_syntax_error (symbol ..only))))) + (def: (in_env name state) (-> Text Lux (Maybe Type)) (case state @@ -4129,32 +4173,32 @@ (meta#in []) (failure (all text#composite _def " is not defined in module " module_name " @ " current_module))))) referred_defs)))] - defs' (case r_defs - {#All} - (exported_definitions module_name) - - {#Only +defs} - (do meta_monad - [*defs (exported_definitions module_name) - _ (test_referrals module_name *defs +defs)] - (in +defs)) - - {#Exclude _defs} - (do meta_monad - [*defs (exported_definitions module_name) - _ (test_referrals module_name *defs _defs)] - (in (..list#only (|>> (is_member? _defs) not) *defs))) - - {#Ignore} - (in (list)) - - {#Nothing} - (in (list))) - .let [defs (list#each (is (-> Text Code) - (function (_ def) - (` ("lux def alias" (~ (local$ def)) (~ (symbol$ [module_name def])))))) - defs') - openings (|> r_opens + defs (case r_defs + {#All} + (do meta_monad + [*defs (exported_definitions module_name)] + (in (list#each (alias_definition module_name) + *defs))) + + {#Exclude _defs} + (do meta_monad + [*defs (exported_definitions module_name) + _ (test_referrals module_name *defs _defs)] + (in (list#each (alias_definition module_name) + (..list#only (|>> (is_member? _defs) not) *defs)))) + + {#Ignore} + (in (list)) + + {#Nothing} + (in (list)) + + {#Referral [macro parameters]} + (single_expansion (` ((~ (symbol$ macro)) + (~ (text$ current_module)) + (~ (text$ module_name)) + (~+ parameters))))) + .let [openings (|> r_opens (list#each (is (-> Openings (List Code)) (function (_ [alias structs]) (list#each (function (_ name) @@ -4181,9 +4225,6 @@ {#All} (list (' "*")) - {#Only defs} - (list (variant$ (partial_list (' "+") (list#each local$ defs)))) - {#Exclude defs} (list (variant$ (partial_list (' "-") (list#each local$ defs)))) @@ -4191,7 +4232,10 @@ (list) {#Nothing} - (list))) + (list) + + {#Referral [macro parameters]} + (list (` ((~ (symbol$ macro)) (~+ parameters)))))) openings (list#each (function (_ [alias structs]) (form$ (partial_list (text$ (..module_alias (list (alias_stand_in 0) module_alias) alias)) (list#each local$ structs)))) @@ -4690,22 +4734,6 @@ _ (failure "Wrong syntax for pattern#multi"))) -... TODO: Allow asking the compiler for the name of the definition -... currently being defined. That name can then be fed into -... 'wrong_syntax_error' for easier maintenance of the error_messages. -(def: wrong_syntax_error - (-> Symbol Text) - (|>> symbol#encoded - (text#composite "Wrong syntax for "))) - -(macro: .public (symbol tokens) - (case tokens - (pattern (list [_ {#Symbol [module name]}])) - (meta#in (list (` [(~ (text$ module)) (~ (text$ name))]))) - - _ - (failure (..wrong_syntax_error [..prelude_module "symbol"])))) - (def: .public (same? reference sample) (All (_ a) (-> a a Bit)) diff --git a/stdlib/source/library/lux/abstract/algebra.lux b/stdlib/source/library/lux/abstract/algebra.lux index 0ed8b85a5..5708c3f5b 100644 --- a/stdlib/source/library/lux/abstract/algebra.lux +++ b/stdlib/source/library/lux/abstract/algebra.lux @@ -1,8 +1,8 @@ (.using - [library - [lux "*" - [control - [functor {"+" Fix}]]]]) + [library + [lux "*" + [control + [functor (.only Fix)]]]]) (type: .public (Algebra f a) (-> (f a) a)) diff --git a/stdlib/source/library/lux/abstract/apply.lux b/stdlib/source/library/lux/abstract/apply.lux index 90fedf8d3..45e9c0595 100644 --- a/stdlib/source/library/lux/abstract/apply.lux +++ b/stdlib/source/library/lux/abstract/apply.lux @@ -3,8 +3,8 @@ [lux "*" ["@" target]]] [// - [monad {"+" Monad do}] - ["[0]" functor {"+" Functor}]]) + [monad (.only Monad do)] + ["[0]" functor (.only Functor)]]) (type: .public (Apply f) (Interface diff --git a/stdlib/source/library/lux/abstract/codec.lux b/stdlib/source/library/lux/abstract/codec.lux index d7ff3c13f..012b6502d 100644 --- a/stdlib/source/library/lux/abstract/codec.lux +++ b/stdlib/source/library/lux/abstract/codec.lux @@ -2,9 +2,9 @@ [library [lux "*" [control - ["[0]" try {"+" Try}]]]] + ["[0]" try (.only Try)]]]] [// - [monad {"+" do}] + [monad (.only do)] ["[0]" functor]]) (type: .public (Codec m a) diff --git a/stdlib/source/library/lux/abstract/comonad.lux b/stdlib/source/library/lux/abstract/comonad.lux index c1b40888f..14880ab3e 100644 --- a/stdlib/source/library/lux/abstract/comonad.lux +++ b/stdlib/source/library/lux/abstract/comonad.lux @@ -10,7 +10,7 @@ [meta ["[0]" location]]]] [// - [functor {"+" Functor}]]) + [functor (.only Functor)]]) (type: .public (CoMonad w) (Interface diff --git a/stdlib/source/library/lux/abstract/comonad/cofree.lux b/stdlib/source/library/lux/abstract/comonad/cofree.lux index 4a198b0f6..d90a48fcc 100644 --- a/stdlib/source/library/lux/abstract/comonad/cofree.lux +++ b/stdlib/source/library/lux/abstract/comonad/cofree.lux @@ -1,9 +1,9 @@ (.using [library [lux "*"]] - [// {"+" CoMonad} + [// (.only CoMonad) [// - [functor {"+" Functor}]]]) + [functor (.only Functor)]]]) (type: .public (CoFree F a) [a (F (CoFree F a))]) diff --git a/stdlib/source/library/lux/abstract/enum.lux b/stdlib/source/library/lux/abstract/enum.lux index 280c2b4d0..55051d1a0 100644 --- a/stdlib/source/library/lux/abstract/enum.lux +++ b/stdlib/source/library/lux/abstract/enum.lux @@ -2,7 +2,7 @@ [library [lux "*"]] [// - ["[0]" order {"+" Order}]]) + ["[0]" order (.only Order)]]) (type: .public (Enum e) (Interface diff --git a/stdlib/source/library/lux/abstract/hash.lux b/stdlib/source/library/lux/abstract/hash.lux index c1aa6e3dc..3eefb19ef 100644 --- a/stdlib/source/library/lux/abstract/hash.lux +++ b/stdlib/source/library/lux/abstract/hash.lux @@ -2,7 +2,7 @@ [library [lux "*"]] [// - ["[0]" equivalence {"+" Equivalence}] + ["[0]" equivalence (.only Equivalence)] [functor ["[0]" contravariant]]]) diff --git a/stdlib/source/library/lux/abstract/interval.lux b/stdlib/source/library/lux/abstract/interval.lux index 131d18017..720e78ebb 100644 --- a/stdlib/source/library/lux/abstract/interval.lux +++ b/stdlib/source/library/lux/abstract/interval.lux @@ -3,9 +3,9 @@ [library [lux "*"]] [// - [equivalence {"+" Equivalence}] + [equivalence (.only Equivalence)] ["[0]" order] - [enum {"+" Enum}]]) + [enum (.only Enum)]]) (type: .public (Interval a) (Interface diff --git a/stdlib/source/library/lux/abstract/mix.lux b/stdlib/source/library/lux/abstract/mix.lux index 1c13dd985..3cc9de707 100644 --- a/stdlib/source/library/lux/abstract/mix.lux +++ b/stdlib/source/library/lux/abstract/mix.lux @@ -2,7 +2,7 @@ [library [lux "*"]] [// - [monoid {"+" Monoid}]]) + [monoid (.only Monoid)]]) (type: .public (Mix F) (Interface diff --git a/stdlib/source/library/lux/abstract/monad.lux b/stdlib/source/library/lux/abstract/monad.lux index 6c853b9e4..468ebf29c 100644 --- a/stdlib/source/library/lux/abstract/monad.lux +++ b/stdlib/source/library/lux/abstract/monad.lux @@ -1,10 +1,10 @@ (.using [library - [lux {"-" all} + [lux {"-" all only} [meta ["[0]" location]]]] [// - [functor {"+" Functor}]]) + [functor (.only Functor)]]) (def: (list#mix f init xs) (All (_ a b) diff --git a/stdlib/source/library/lux/abstract/monad/free.lux b/stdlib/source/library/lux/abstract/monad/free.lux index bd250ef05..b0184619f 100644 --- a/stdlib/source/library/lux/abstract/monad/free.lux +++ b/stdlib/source/library/lux/abstract/monad/free.lux @@ -2,9 +2,9 @@ [library [lux "*"]] [/// - [functor {"+" Functor}] - [apply {"+" Apply}] - [monad {"+" Monad}]]) + [functor (.only Functor)] + [apply (.only Apply)] + [monad (.only Monad)]]) (type: .public (Free F a) (Variant diff --git a/stdlib/source/library/lux/abstract/monad/indexed.lux b/stdlib/source/library/lux/abstract/monad/indexed.lux index fb6371bad..44d67817a 100644 --- a/stdlib/source/library/lux/abstract/monad/indexed.lux +++ b/stdlib/source/library/lux/abstract/monad/indexed.lux @@ -3,12 +3,12 @@ [lux {"-" global} [control ["<>" parser - ["<[0]>" code {"+" Parser}]]] + ["<[0]>" code (.only Parser)]]] [data [collection ["[0]" list ("[1]#[0]" functor mix)]]] ["[0]" macro - [syntax {"+" syntax:}] + [syntax (.only syntax:)] ["[0]" code]]]] ["[0]" //]) diff --git a/stdlib/source/library/lux/abstract/order.lux b/stdlib/source/library/lux/abstract/order.lux index 2370a508a..278931fb8 100644 --- a/stdlib/source/library/lux/abstract/order.lux +++ b/stdlib/source/library/lux/abstract/order.lux @@ -4,7 +4,7 @@ [control ["[0]" function]]]] [// - ["[0]" equivalence {"+" Equivalence}] + ["[0]" equivalence (.only Equivalence)] [functor ["[0]" contravariant]]]) diff --git a/stdlib/source/library/lux/abstract/predicate.lux b/stdlib/source/library/lux/abstract/predicate.lux index 7e87cfc9d..7fe2714e6 100644 --- a/stdlib/source/library/lux/abstract/predicate.lux +++ b/stdlib/source/library/lux/abstract/predicate.lux @@ -4,7 +4,7 @@ [control ["[0]" function]]]] [// - [monoid {"+" Monoid}] + [monoid (.only Monoid)] [functor ["[0]" contravariant]]]) diff --git a/stdlib/source/library/lux/control/concatenative.lux b/stdlib/source/library/lux/control/concatenative.lux index 59c692222..9867aa790 100644 --- a/stdlib/source/library/lux/control/concatenative.lux +++ b/stdlib/source/library/lux/control/concatenative.lux @@ -8,13 +8,13 @@ ["[0]" maybe ("[1]#[0]" monad)]] [data ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" mix functor)]]] - ["[0]" macro {"+" with_symbols} + ["[0]" macro (.only with_symbols) ["[0]" code] ["[0]" template] - [syntax {"+" syntax:} + [syntax (.only syntax:) ["|[0]|" export]]] [math [number @@ -24,7 +24,7 @@ ["f" frac]]]]] [// ["<>" parser ("[1]#[0]" monad) - ["<[0]>" code {"+" Parser}]]]) + ["<[0]>" code (.only Parser)]]]) (type: Alias [Text Code]) diff --git a/stdlib/source/library/lux/control/concurrency/actor.lux b/stdlib/source/library/lux/control/concurrency/actor.lux index 18b114cd1..f9ed552bb 100644 --- a/stdlib/source/library/lux/control/concurrency/actor.lux +++ b/stdlib/source/library/lux/control/concurrency/actor.lux @@ -3,37 +3,37 @@ [lux "*" ["[0]" debug] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" pipe] ["[0]" function] - ["[0]" try {"+" Try}] - ["[0]" exception {"+" exception:}] - ["[0]" io {"+" IO io}] + ["[0]" try (.only Try)] + ["[0]" exception (.only exception:)] + ["[0]" io (.only IO io)] ["<>" parser ("[1]#[0]" monad) - ["<[0]>" code {"+" Parser}]]] + ["<[0]>" code (.only Parser)]]] [data ["[0]" bit] ["[0]" product] [text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" monoid monad)]]] - ["[0]" macro {"+" with_symbols} + ["[0]" macro (.only with_symbols) ["[0]" code] - [syntax {"+" syntax:} + [syntax (.only syntax:) ["|[0]|" input] ["|[0]|" export]]] [math [number ["n" nat]]] - ["[0]" meta {"+" monad}] - [type {"+" sharing} - ["[0]" primitive {"+" primitive: representation abstraction}]]]] + ["[0]" meta (.only monad)] + [type (.only sharing) + ["[0]" primitive (.only primitive: representation abstraction)]]]] [// - ["[0]" atom {"+" Atom atom}] - ["[0]" async {"+" Async Resolver} ("[1]#[0]" monad)] - ["[0]" frp {"+" Channel Channel'}]]) + ["[0]" atom (.only Atom atom)] + ["[0]" async (.only Async Resolver) ("[1]#[0]" monad)] + ["[0]" frp (.only Channel Channel')]]) (exception: .public poisoned) (exception: .public dead) diff --git a/stdlib/source/library/lux/control/concurrency/async.lux b/stdlib/source/library/lux/control/concurrency/async.lux index afd05d94b..ba521dc88 100644 --- a/stdlib/source/library/lux/control/concurrency/async.lux +++ b/stdlib/source/library/lux/control/concurrency/async.lux @@ -2,24 +2,24 @@ [library [lux {"-" and or} [abstract - [functor {"+" Functor}] - [apply {"+" Apply}] - ["[0]" monad {"+" Monad do}]] + [functor (.only Functor)] + [apply (.only Apply)] + ["[0]" monad (.only Monad do)]] [control ["[0]" pipe] ["[0]" function] - ["[0]" io {"+" IO io}] + ["[0]" io (.only IO io)] ["[0]" maybe ("[1]#[0]" functor)]] [data ["[0]" product]] [macro ["^" pattern]] - [type {"+" sharing} + [type (.only sharing) [primitive "*"] - ["[0]" variance {"+" Mutable}]]]] + ["[0]" variance (.only Mutable)]]]] [// ["[0]" thread] - ["[0]" atom {"+" Atom atom}]]) + ["[0]" atom (.only Atom atom)]]) (primitive: .public (Async'' a) (Atom [(Maybe a) (List (-> a (IO Any)))]) diff --git a/stdlib/source/library/lux/control/concurrency/atom.lux b/stdlib/source/library/lux/control/concurrency/atom.lux index d5f9299f7..86e9f2ba9 100644 --- a/stdlib/source/library/lux/control/concurrency/atom.lux +++ b/stdlib/source/library/lux/control/concurrency/atom.lux @@ -4,10 +4,10 @@ ["@" target] ["[0]" ffi] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" function] - ["[0]" io {"+" IO} ("[1]#[0]" functor)]] + ["[0]" io (.only IO) ("[1]#[0]" functor)]] [data ["[0]" product] [collection @@ -15,7 +15,7 @@ ["[1]" \\unsafe]]]] [type [primitive "*"] - ["[0]" variance {"+" Mutable}]]]]) + ["[0]" variance (.only Mutable)]]]]) (with_expansions [<jvm> (these (ffi.import: (java/util/concurrent/atomic/AtomicReference a) "[1]::[0]" diff --git a/stdlib/source/library/lux/control/concurrency/frp.lux b/stdlib/source/library/lux/control/concurrency/frp.lux index d0f9799b1..2a9236ed0 100644 --- a/stdlib/source/library/lux/control/concurrency/frp.lux +++ b/stdlib/source/library/lux/control/concurrency/frp.lux @@ -1,21 +1,21 @@ (.using [library - [lux {"-" list} + [lux {"-" list only} [abstract - [equivalence {"+" Equivalence}] - [functor {"+" Functor}] - [apply {"+" Apply}] - ["[0]" monad {"+" Monad do}]] + [equivalence (.only Equivalence)] + [functor (.only Functor)] + [apply (.only Apply)] + ["[0]" monad (.only Monad do)]] [control ["[0]" maybe ("[1]#[0]" functor)] - ["[0]" try {"+" Try}] - ["[0]" exception {"+" exception:}] - ["[0]" io {"+" IO io}]] - [type {"+" sharing} - ["[0]" variance {"+" Mutable}]]]] + ["[0]" try (.only Try)] + ["[0]" exception (.only exception:)] + ["[0]" io (.only IO io)]] + [type (.only sharing) + ["[0]" variance (.only Mutable)]]]] [// - ["[0]" atom {"+" Atom}] - ["[0]" async {"+" Async Async'} ("[1]#[0]" monad)]]) + ["[0]" atom (.only Atom)] + ["[0]" async (.only Async Async') ("[1]#[0]" monad)]]) (type: .public (Channel'' a) (Async (Maybe [a (Channel'' a)]))) diff --git a/stdlib/source/library/lux/control/concurrency/semaphore.lux b/stdlib/source/library/lux/control/concurrency/semaphore.lux index 5661894ad..bc8a518c4 100644 --- a/stdlib/source/library/lux/control/concurrency/semaphore.lux +++ b/stdlib/source/library/lux/control/concurrency/semaphore.lux @@ -2,17 +2,17 @@ [library [lux "*" [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" pipe] - ["[0]" io {"+" IO}] - ["[0]" try {"+" Try}] - ["[0]" exception {"+" exception:}]] + ["[0]" io (.only IO)] + ["[0]" try (.only Try)] + ["[0]" exception (.only exception:)]] [data [text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection - ["[0]" queue {"+" Queue}]]] + ["[0]" queue (.only Queue)]]] [math [number ["n" nat] @@ -21,8 +21,8 @@ ["[0]" primitive "*"] ["[0]" refinement]]]] [// - ["[0]" atom {"+" Atom}] - ["[0]" async {"+" Async Resolver}]]) + ["[0]" atom (.only Atom)] + ["[0]" async (.only Async Resolver)]]) (type: State (Record diff --git a/stdlib/source/library/lux/control/concurrency/stm.lux b/stdlib/source/library/lux/control/concurrency/stm.lux index f6d1423c3..b9f7df872 100644 --- a/stdlib/source/library/lux/control/concurrency/stm.lux +++ b/stdlib/source/library/lux/control/concurrency/stm.lux @@ -2,11 +2,11 @@ [library [lux "*" [abstract - [functor {"+" Functor}] - [apply {"+" Apply}] - ["[0]" monad {"+" Monad do}]] + [functor (.only Functor)] + [apply (.only Apply)] + ["[0]" monad (.only Monad do)]] [control - ["[0]" io {"+" IO io}] + ["[0]" io (.only IO io)] ["[0]" maybe] ["[0]" try]] [data @@ -15,13 +15,13 @@ ["[0]" list]]] [macro ["^" pattern]] - [type {"+" sharing} + [type (.only sharing) [primitive "*"] - ["[0]" variance {"+" Mutable}]]]] + ["[0]" variance (.only Mutable)]]]] [// - ["[0]" atom {"+" Atom atom}] - ["[0]" async {"+" Async Resolver}] - ["[0]" frp {"+" Channel Sink}]]) + ["[0]" atom (.only Atom atom)] + ["[0]" async (.only Async Resolver)] + ["[0]" frp (.only Channel Sink)]]) (type: (Observer a) (-> a (IO Any))) diff --git a/stdlib/source/library/lux/control/concurrency/thread.lux b/stdlib/source/library/lux/control/concurrency/thread.lux index 0902501b4..92523ef84 100644 --- a/stdlib/source/library/lux/control/concurrency/thread.lux +++ b/stdlib/source/library/lux/control/concurrency/thread.lux @@ -4,11 +4,11 @@ ["@" target] ["[0]" ffi] [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["[0]" try] - ["[0]" exception {"+" exception:}] - ["[0]" io {"+" IO io}]] + ["[0]" exception (.only exception:)] + ["[0]" io (.only IO io)]] [data ["[0]" text] [collection @@ -22,7 +22,7 @@ [time ["[0]" instant]]]] [// - ["[0]" atom {"+" Atom}]]) + ["[0]" atom (.only Atom)]]) (with_expansions [<jvm> (these (ffi.import: java/lang/Object "[1]::[0]") diff --git a/stdlib/source/library/lux/control/continuation.lux b/stdlib/source/library/lux/control/continuation.lux index 2f67178bf..7fceb2551 100644 --- a/stdlib/source/library/lux/control/continuation.lux +++ b/stdlib/source/library/lux/control/continuation.lux @@ -2,15 +2,15 @@ [library [lux "*" [abstract - [functor {"+" Functor}] - [apply {"+" Apply}] - [monad {"+" Monad do}]] + [functor (.only Functor)] + [apply (.only Apply)] + [monad (.only Monad do)]] [control ["[0]" function] [parser ["<[0]>" code]]] - [macro {"+" with_symbols} - [syntax {"+" syntax:}] + [macro (.only with_symbols) + [syntax (.only syntax:)] ["[0]" code]]]]) (type: .public (Cont i o) diff --git a/stdlib/source/library/lux/control/exception.lux b/stdlib/source/library/lux/control/exception.lux index 173b8b9bf..ab8b994f0 100644 --- a/stdlib/source/library/lux/control/exception.lux +++ b/stdlib/source/library/lux/control/exception.lux @@ -4,11 +4,11 @@ ["[0]" macro] ["[0]" meta] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" maybe] ["<>" parser ("[1]#[0]" monad) - ["<[0]>" code {"+" Parser}]]] + ["<[0]>" code (.only Parser)]]] [data ["[0]" product] ["[0]" text ("[1]#[0]" monoid)] @@ -16,7 +16,7 @@ ["[0]" list ("[1]#[0]" functor mix)]]] [macro ["[0]" code] - [syntax {"+" syntax:} + [syntax (.only syntax:) ["|[0]|" input] ["[0]" type "_" ["|[1]_[0]|" variable]]]] @@ -24,7 +24,7 @@ [number ["n" nat ("[1]#[0]" decimal)]]]]] [// - ["//" try {"+" Try}]]) + ["//" try (.only Try)]]) (type: .public (Exception a) (Record diff --git a/stdlib/source/library/lux/control/function.lux b/stdlib/source/library/lux/control/function.lux index d014a9ccd..4e162faa0 100644 --- a/stdlib/source/library/lux/control/function.lux +++ b/stdlib/source/library/lux/control/function.lux @@ -1,8 +1,8 @@ (.using - [library - [lux "*" - [abstract - [monoid {"+" Monoid}]]]]) + [library + [lux "*" + [abstract + [monoid (.only Monoid)]]]]) (def: .public identity (All (_ a) (-> a a)) diff --git a/stdlib/source/library/lux/control/function/contract.lux b/stdlib/source/library/lux/control/function/contract.lux index b36aa75c6..c2cec1438 100644 --- a/stdlib/source/library/lux/control/function/contract.lux +++ b/stdlib/source/library/lux/control/function/contract.lux @@ -2,14 +2,14 @@ [library [lux "*" [control - ["[0]" exception {"+" exception:}] + ["[0]" exception (.only exception:)] [parser ["<[0]>" code]]] [data [text - ["%" format {"+" format}]]] - [macro {"+" with_symbols} - [syntax {"+" syntax:}] + ["%" format (.only format)]]] + [macro (.only with_symbols) + [syntax (.only syntax:)] ["[0]" code]] [math [number diff --git a/stdlib/source/library/lux/control/function/inline.lux b/stdlib/source/library/lux/control/function/inline.lux index 8785e6cb7..e9d69818a 100644 --- a/stdlib/source/library/lux/control/function/inline.lux +++ b/stdlib/source/library/lux/control/function/inline.lux @@ -3,16 +3,16 @@ [lux "*" ["[0]" meta] [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["<>" parser - ["<[0]>" code {"+" Parser}]]] + ["<[0]>" code (.only Parser)]]] [data [collection ["[0]" list ("[1]#[0]" monad)]]] ["[0]" macro ["[0]" code] - [syntax {"+" syntax:} + [syntax (.only syntax:) ["|[0]|" export]]]]]) (def: declaration diff --git a/stdlib/source/library/lux/control/function/memo.lux b/stdlib/source/library/lux/control/function/memo.lux index 69b78c0c3..6737e2f5c 100644 --- a/stdlib/source/library/lux/control/function/memo.lux +++ b/stdlib/source/library/lux/control/function/memo.lux @@ -1,20 +1,21 @@ ... Inspired by; ... "The Different Aspects of Monads and Mixins" by Bruno C. d. S. Oliveira + (.using [library [lux {"-" open} ["[0]" type] [abstract - [hash {"+" Hash}] - [monad {"+" do}]] + [hash (.only Hash)] + [monad (.only do)]] [control - ["[0]" state {"+" State}]] + ["[0]" state (.only State)]] [data ["[0]" product] [collection - ["[0]" dictionary {"+" Dictionary}]]]]] + ["[0]" dictionary (.only Dictionary)]]]]] ["[0]" // "_" - ["[1]" mixin {"+" Mixin Recursive}]]) + ["[1]" mixin (.only Mixin Recursive)]]) (def: .public memoization (All (_ i o) diff --git a/stdlib/source/library/lux/control/function/mixin.lux b/stdlib/source/library/lux/control/function/mixin.lux index 95d31f350..fe453b395 100644 --- a/stdlib/source/library/lux/control/function/mixin.lux +++ b/stdlib/source/library/lux/control/function/mixin.lux @@ -2,12 +2,12 @@ ... "The Different Aspects of Monads and Mixins" by Bruno C. d. S. Oliveira (.using - [library - [lux "*" - [abstract - [monoid {"+" Monoid}] - [predicate {"+" Predicate}] - [monad {"+" Monad do}]]]]) + [library + [lux "*" + [abstract + [monoid (.only Monoid)] + [predicate (.only Predicate)] + [monad (.only Monad do)]]]]) (type: .public (Mixin i o) (-> (-> i o) (-> i o) (-> i o))) diff --git a/stdlib/source/library/lux/control/function/mutual.lux b/stdlib/source/library/lux/control/function/mutual.lux index 95a7f132f..dcd749f97 100644 --- a/stdlib/source/library/lux/control/function/mutual.lux +++ b/stdlib/source/library/lux/control/function/mutual.lux @@ -3,25 +3,25 @@ [lux {"-" Definition let def: macro} ["[0]" meta] [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control - ["[0]" try {"+" Try}] - ["[0]" exception {"+" exception:}] + ["[0]" try (.only Try)] + ["[0]" exception (.only exception:)] ["<>" parser ("[1]#[0]" monad) - ["<[0]>" code {"+" Parser}]]] + ["<[0]>" code (.only Parser)]]] [data ["[0]" product] [text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" functor)] [dictionary - ["[0]" plist {"+" PList}]]]] + ["[0]" plist (.only PList)]]]] ["[0]" macro ["[0]" local] ["[0]" code] - [syntax {"+" syntax:} - ["[0]" declaration {"+" Declaration}]]]]] + [syntax (.only syntax:) + ["[0]" declaration (.only Declaration)]]]]] ["[0]" //]) (type: Mutual diff --git a/stdlib/source/library/lux/control/io.lux b/stdlib/source/library/lux/control/io.lux index 297442420..ab1c36168 100644 --- a/stdlib/source/library/lux/control/io.lux +++ b/stdlib/source/library/lux/control/io.lux @@ -2,16 +2,16 @@ [library [lux "*" [abstract - [functor {"+" Functor}] - [apply {"+" Apply}] - [monad {"+" Monad do}]] + [functor (.only Functor)] + [apply (.only Apply)] + [monad (.only Monad do)]] [control [parser ["<[0]>" code]]] [type [primitive "*"]] - [macro {"+" with_symbols} - [syntax {"+" syntax:}] + [macro (.only with_symbols) + [syntax (.only syntax:)] ["[0]" template]]]]) (primitive: .public (IO a) diff --git a/stdlib/source/library/lux/control/lazy.lux b/stdlib/source/library/lux/control/lazy.lux index 3c0116e14..9d4567ff4 100644 --- a/stdlib/source/library/lux/control/lazy.lux +++ b/stdlib/source/library/lux/control/lazy.lux @@ -2,19 +2,19 @@ [library [lux "*" [abstract - [functor {"+" Functor}] - [apply {"+" Apply}] - [monad {"+" Monad do}] - [equivalence {"+" Equivalence}]] + [functor (.only Functor)] + [apply (.only Apply)] + [monad (.only Monad do)] + [equivalence (.only Equivalence)]] [control ["[0]" io] [parser ["<[0]>" code]] [concurrency ["[0]" atom]]] - [macro {"+" with_symbols} - [syntax {"+" syntax:}]] - [type {"+" sharing} + [macro (.only with_symbols) + [syntax (.only syntax:)]] + [type (.only sharing) [primitive "*"]]]]) (primitive: .public (Lazy a) diff --git a/stdlib/source/library/lux/control/maybe.lux b/stdlib/source/library/lux/control/maybe.lux index ecf814d21..233696c13 100644 --- a/stdlib/source/library/lux/control/maybe.lux +++ b/stdlib/source/library/lux/control/maybe.lux @@ -2,12 +2,12 @@ [library [lux {"-" list} [abstract - [monoid {"+" Monoid}] - [equivalence {"+" Equivalence}] - [hash {"+" Hash}] - [apply {"+" Apply}] - ["[0]" functor {"+" Functor}] - ["[0]" monad {"+" Monad do}]] + [monoid (.only Monoid)] + [equivalence (.only Equivalence)] + [hash (.only Hash)] + [apply (.only Apply)] + ["[0]" functor (.only Functor)] + ["[0]" monad (.only Monad do)]] [meta ["[0]" location]]]]) diff --git a/stdlib/source/library/lux/control/parser.lux b/stdlib/source/library/lux/control/parser.lux index 4b9735560..4fdb693e2 100644 --- a/stdlib/source/library/lux/control/parser.lux +++ b/stdlib/source/library/lux/control/parser.lux @@ -1,13 +1,13 @@ (.using [library - [lux {"-" or and not} + [lux {"-" or and not only} [abstract - [functor {"+" Functor}] - [apply {"+" Apply}] - [monad {"+" Monad do}] - [codec {"+" Codec}]] + [functor (.only Functor)] + [apply (.only Apply)] + [monad (.only Monad do)] + [codec (.only Codec)]] [control - ["[0]" try {"+" Try}]] + ["[0]" try (.only Try)]] [data ["[0]" product] [collection diff --git a/stdlib/source/library/lux/control/parser/analysis.lux b/stdlib/source/library/lux/control/parser/analysis.lux index 26d74c274..0adeaa56b 100644 --- a/stdlib/source/library/lux/control/parser/analysis.lux +++ b/stdlib/source/library/lux/control/parser/analysis.lux @@ -2,14 +2,14 @@ [library [lux {"-" nat int rev local} [abstract - [monad {"+" do}]] + [monad (.only do)]] [control - ["[0]" try {"+" Try}] - ["[0]" exception {"+" exception:}]] + ["[0]" try (.only Try)] + ["[0]" exception (.only exception:)]] [data ["[0]" bit] ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" functor)]]] [macro @@ -25,12 +25,12 @@ ["[0]" symbol]] [tool [compiler - [arity {"+" Arity}] - [reference {"+" } - [variable {"+" }]] + [arity (.only Arity)] + [reference (.only) + [variable (.only)]] [language [lux - ["/" analysis {"+" Environment Analysis}]]]]]]] + ["/" analysis (.only Environment Analysis)]]]]]]] ["[0]" //]) (def: (remaining_inputs asts) diff --git a/stdlib/source/library/lux/control/parser/binary.lux b/stdlib/source/library/lux/control/parser/binary.lux index 2c32f7b8d..79408450d 100644 --- a/stdlib/source/library/lux/control/parser/binary.lux +++ b/stdlib/source/library/lux/control/parser/binary.lux @@ -1,27 +1,27 @@ (.using [library [lux {"-" and or nat int rev list type symbol} - [ffi {"+"}] - [type {"+" sharing}] + [ffi (.only)] + [type (.only sharing)] [abstract - [hash {"+" Hash}] - [monad {"+" do}]] + [hash (.only Hash)] + [monad (.only do)]] [control - ["[0]" try {"+" Try}] - ["[0]" exception {"+" exception:}]] + ["[0]" try (.only Try)] + ["[0]" exception (.only exception:)]] [data ["/" binary "_" - ["[1]" \\unsafe {"+" Binary}]] + ["[1]" \\unsafe (.only Binary)]] [text - ["%" format {"+" format}] + ["%" format (.only format)] [encoding ["[0]" utf8]]] [collection ["[0]" list] - ["[0]" sequence {"+" Sequence}] - ["[0]" set {"+" Set}] + ["[0]" sequence (.only Sequence)] + ["[0]" set (.only Set)] [array - [\\unsafe {"+"}]]]] + [\\unsafe (.only)]]]] [macro ["^" pattern] ["[0]" template]] diff --git a/stdlib/source/library/lux/control/parser/cli.lux b/stdlib/source/library/lux/control/parser/cli.lux index 8424b4d37..1a71a39e3 100644 --- a/stdlib/source/library/lux/control/parser/cli.lux +++ b/stdlib/source/library/lux/control/parser/cli.lux @@ -2,12 +2,12 @@ [library [lux {"-" parameter} [abstract - [monad {"+" do}]] + [monad (.only do)]] [control - ["[0]" try {"+" Try}]] + ["[0]" try (.only Try)]] [data ["[0]" text ("[1]#[0]" equivalence) - ["%" format {"+" format}]]]]] + ["%" format (.only format)]]]]] ["[0]" //]) (type: .public (Parser a) diff --git a/stdlib/source/library/lux/control/parser/code.lux b/stdlib/source/library/lux/control/parser/code.lux index 70a65f6e5..1e1f433a4 100644 --- a/stdlib/source/library/lux/control/parser/code.lux +++ b/stdlib/source/library/lux/control/parser/code.lux @@ -2,9 +2,9 @@ [library [lux {"-" nat int rev local not symbol local global} [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control - ["[0]" try {"+" Try}]] + ["[0]" try (.only Try)]] [data ["[0]" bit] ["[0]" text ("[1]#[0]" monoid)] diff --git a/stdlib/source/library/lux/control/parser/environment.lux b/stdlib/source/library/lux/control/parser/environment.lux index a844787f7..708c2ad84 100644 --- a/stdlib/source/library/lux/control/parser/environment.lux +++ b/stdlib/source/library/lux/control/parser/environment.lux @@ -2,14 +2,14 @@ [library [lux "*" [control - ["[0]" try {"+" Try}] - ["[0]" exception {"+" exception:}]] + ["[0]" try (.only Try)] + ["[0]" exception (.only exception:)]] [data ["[0]" product] ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection - ["[0]" dictionary {"+" Dictionary}]]]]] + ["[0]" dictionary (.only Dictionary)]]]]] ["[0]" //]) (type: .public Property diff --git a/stdlib/source/library/lux/control/parser/json.lux b/stdlib/source/library/lux/control/parser/json.lux index 4064ed450..57fc15789 100644 --- a/stdlib/source/library/lux/control/parser/json.lux +++ b/stdlib/source/library/lux/control/parser/json.lux @@ -2,19 +2,19 @@ [library [lux {"-" symbol} [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control - ["[0]" try {"+" Try}] - ["[0]" exception {"+" exception:}]] + ["[0]" try (.only Try)] + ["[0]" exception (.only exception:)]] [data ["[0]" bit] ["[0]" text ("[1]#[0]" equivalence monoid)] [collection ["[0]" list ("[1]#[0]" functor)] ["[0]" sequence] - ["[0]" dictionary {"+" Dictionary}]] + ["[0]" dictionary (.only Dictionary)]] [format - ["/" json {"+" JSON}]]] + ["/" json (.only JSON)]]] [macro ["[0]" code]] [math diff --git a/stdlib/source/library/lux/control/parser/synthesis.lux b/stdlib/source/library/lux/control/parser/synthesis.lux index f457e13fb..ff9522a55 100644 --- a/stdlib/source/library/lux/control/parser/synthesis.lux +++ b/stdlib/source/library/lux/control/parser/synthesis.lux @@ -2,14 +2,14 @@ [library [lux {"-" function loop i64 local} [abstract - [monad {"+" do}]] + [monad (.only do)]] [control - ["[0]" try {"+" Try}] - ["[0]" exception {"+" exception:}]] + ["[0]" try (.only Try)] + ["[0]" exception (.only exception:)]] [data ["[0]" bit] ["[0]" text - ["%" format {"+" format}]]] + ["%" format (.only format)]]] [math [number ["n" nat] @@ -19,13 +19,13 @@ ["[0]" symbol]] [tool [compiler - [reference {"+" } - [variable {"+" Register}]] - [arity {"+" Arity}] + [reference (.only) + [variable (.only Register)]] + [arity (.only Arity)] [language [lux - [analysis {"+" Environment}] - ["/" synthesis {"+" Synthesis Abstraction}]]]]]]] + [analysis (.only Environment)] + ["/" synthesis (.only Synthesis Abstraction)]]]]]]] ["[0]" //]) (exception: .public (cannot_parse [input (List Synthesis)]) diff --git a/stdlib/source/library/lux/control/parser/text.lux b/stdlib/source/library/lux/control/parser/text.lux index b4f3daa90..524c0d291 100644 --- a/stdlib/source/library/lux/control/parser/text.lux +++ b/stdlib/source/library/lux/control/parser/text.lux @@ -2,13 +2,13 @@ [library [lux {"-" and not local} [abstract - [monad {"+" Monad do}]] + [monad (.only Monad do)]] [control ["[0]" maybe] - ["[0]" try {"+" Try}] - ["[0]" exception {"+" exception:}]] + ["[0]" try (.only Try)] + ["[0]" exception (.only exception:)]] [data - ["/" text {"+" Char} ("[1]#[0]" monoid)] + ["/" text (.only Char) ("[1]#[0]" monoid)] ["[0]" product] [collection ["[0]" list ("[1]#[0]" mix)]]] diff --git a/stdlib/source/library/lux/control/parser/tree.lux b/stdlib/source/library/lux/control/parser/tree.lux index 2db46e2b5..d6926d6de 100644 --- a/stdlib/source/library/lux/control/parser/tree.lux +++ b/stdlib/source/library/lux/control/parser/tree.lux @@ -1,16 +1,16 @@ (.using - [library - [lux {"-" left right} - [abstract - [monad {"+" do}]] - [control - ["[0]" try {"+" Try}] - ["[0]" exception {"+" exception:}]] - [data - [collection - [tree {"+" Tree} - ["[0]" zipper {"+" Zipper}]]]]]] - ["[0]" //]) + [library + [lux {"-" left right} + [abstract + [monad (.only do)]] + [control + ["[0]" try (.only Try)] + ["[0]" exception (.only exception:)]] + [data + [collection + [tree (.only Tree) + ["[0]" zipper (.only Zipper)]]]]]] + ["[0]" //]) (type: .public (Parser t a) (//.Parser (Zipper t) a)) diff --git a/stdlib/source/library/lux/control/parser/type.lux b/stdlib/source/library/lux/control/parser/type.lux index f95894b0b..167e4a020 100644 --- a/stdlib/source/library/lux/control/parser/type.lux +++ b/stdlib/source/library/lux/control/parser/type.lux @@ -2,17 +2,17 @@ [library [lux {"-" function local parameter} [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control - ["[0]" try {"+" Try}] - ["[0]" exception {"+" exception:}] + ["[0]" try (.only Try)] + ["[0]" exception (.only exception:)] ["[0]" function]] [data ["[0]" text ("[1]#[0]" monoid) - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" functor)] - ["[0]" dictionary {"+" Dictionary}]]] + ["[0]" dictionary (.only Dictionary)]]] [macro ["^" pattern] ["[0]" code]] diff --git a/stdlib/source/library/lux/control/parser/xml.lux b/stdlib/source/library/lux/control/parser/xml.lux index 45c6cf178..771c8c97f 100644 --- a/stdlib/source/library/lux/control/parser/xml.lux +++ b/stdlib/source/library/lux/control/parser/xml.lux @@ -2,18 +2,18 @@ [library [lux "*" [abstract - [monad {"+" do}]] + [monad (.only do)]] [control - ["[0]" try {"+" Try} ("[1]#[0]" functor)] - ["[0]" exception {"+" exception:}]] + ["[0]" try (.only Try) ("[1]#[0]" functor)] + ["[0]" exception (.only exception:)]] [data ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list] ["[0]" dictionary]] [format - ["/" xml {"+" Attribute Attrs Tag XML}]]] + ["/" xml (.only Attribute Attrs Tag XML)]]] [meta ["[0]" symbol ("[1]#[0]" equivalence codec)]]]] ["[0]" //]) diff --git a/stdlib/source/library/lux/control/pipe.lux b/stdlib/source/library/lux/control/pipe.lux index 476664344..dc75e17b0 100644 --- a/stdlib/source/library/lux/control/pipe.lux +++ b/stdlib/source/library/lux/control/pipe.lux @@ -6,13 +6,13 @@ [control ["[0]" try] ["<>" parser - ["<[0]>" code {"+" Parser}]]] + ["<[0]>" code (.only Parser)]]] [data ["[0]" identity] [collection ["[0]" list ("[1]#[0]" monad)]]] - [macro {"+" with_symbols} - [syntax {"+" syntax:}] + [macro (.only with_symbols) + [syntax (.only syntax:)] ["[0]" code]] [math [number diff --git a/stdlib/source/library/lux/control/reader.lux b/stdlib/source/library/lux/control/reader.lux index 95cbe91b9..4d5966fed 100644 --- a/stdlib/source/library/lux/control/reader.lux +++ b/stdlib/source/library/lux/control/reader.lux @@ -3,9 +3,9 @@ [lux {"-" local} ["@" target] [abstract - [apply {"+" Apply}] - ["[0]" functor {"+" Functor}] - ["[0]" monad {"+" Monad do}]]]]) + [apply (.only Apply)] + ["[0]" functor (.only Functor)] + ["[0]" monad (.only Monad do)]]]]) (type: .public (Reader r a) (-> r a)) diff --git a/stdlib/source/library/lux/control/region.lux b/stdlib/source/library/lux/control/region.lux index 2296de83f..934c923d0 100644 --- a/stdlib/source/library/lux/control/region.lux +++ b/stdlib/source/library/lux/control/region.lux @@ -2,18 +2,18 @@ [library [lux "*" [abstract - [functor {"+" Functor}] - [apply {"+" Apply}] - ["[0]" monad {"+" Monad do}]] + [functor (.only Functor)] + [apply (.only Apply)] + ["[0]" monad (.only Monad do)]] [control - ["[0]" try {"+" Try}]] + ["[0]" try (.only Try)]] [data ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" mix)]]]]] [// - ["[0]" exception {"+" Exception exception:}]]) + ["[0]" exception (.only Exception exception:)]]) (type: (Cleaner r !) (-> r (! (Try Any)))) diff --git a/stdlib/source/library/lux/control/remember.lux b/stdlib/source/library/lux/control/remember.lux index 672783d02..42addfea5 100644 --- a/stdlib/source/library/lux/control/remember.lux +++ b/stdlib/source/library/lux/control/remember.lux @@ -2,24 +2,24 @@ [library [lux "*" [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" io] ["[0]" try] - ["[0]" exception {"+" exception:}] + ["[0]" exception (.only exception:)] ["<>" parser ("[1]#[0]" functor) - ["<c>" code {"+" Parser}]]] + ["<c>" code (.only Parser)]]] [data ["[0]" text - ["%" format {"+" format}]]] + ["%" format (.only format)]]] [time ["[0]" instant] - ["[0]" date {"+" Date} ("[1]#[0]" order)]] + ["[0]" date (.only Date) ("[1]#[0]" order)]] ["[0]" meta] [macro ["[0]" code] ["[0]" template] - [syntax {"+" syntax:}]]]]) + [syntax (.only syntax:)]]]]) (exception: .public (must_remember [deadline Date today Date diff --git a/stdlib/source/library/lux/control/security/capability.lux b/stdlib/source/library/lux/control/security/capability.lux index 84f146614..b46765f78 100644 --- a/stdlib/source/library/lux/control/security/capability.lux +++ b/stdlib/source/library/lux/control/security/capability.lux @@ -2,16 +2,16 @@ [library [lux "*" [abstract - [monad {"+" do}]] + [monad (.only do)]] [control - ["[0]" io {"+" IO}] + ["[0]" io (.only IO)] ["<>" parser ["<c>" code]] [concurrency - ["[0]" async {"+" Async}]]] + ["[0]" async (.only Async)]]] [data [text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" functor)]]] [type @@ -19,7 +19,7 @@ ["[0]" meta] ["[0]" macro ["[0]" code] - [syntax {"+" syntax:} + [syntax (.only syntax:) ["|[0]|" export] ["|[0]|" declaration]]]]]) diff --git a/stdlib/source/library/lux/control/security/policy.lux b/stdlib/source/library/lux/control/security/policy.lux index a05faeae2..1482581e4 100644 --- a/stdlib/source/library/lux/control/security/policy.lux +++ b/stdlib/source/library/lux/control/security/policy.lux @@ -2,9 +2,9 @@ [library [lux "*" [abstract - [functor {"+" Functor}] - [apply {"+" Apply}] - [monad {"+" Monad}]] + [functor (.only Functor)] + [apply (.only Apply)] + [monad (.only Monad)]] [type [primitive "*"]]]]) diff --git a/stdlib/source/library/lux/control/state.lux b/stdlib/source/library/lux/control/state.lux index d1d587861..66d3c2359 100644 --- a/stdlib/source/library/lux/control/state.lux +++ b/stdlib/source/library/lux/control/state.lux @@ -2,9 +2,9 @@ [library [lux {"-" local} [abstract - [functor {"+" Functor}] - [apply {"+" Apply}] - [monad {"+" Monad do}]]]]) + [functor (.only Functor)] + [apply (.only Apply)] + [monad (.only Monad do)]]]]) (type: .public (State s a) (-> s [s a])) diff --git a/stdlib/source/library/lux/control/thread.lux b/stdlib/source/library/lux/control/thread.lux index cc65e598d..99a405024 100644 --- a/stdlib/source/library/lux/control/thread.lux +++ b/stdlib/source/library/lux/control/thread.lux @@ -3,18 +3,18 @@ [lux "*" ["@" target] [abstract - [functor {"+" Functor}] - [apply {"+" Apply}] - [monad {"+" Monad do}]] + [functor (.only Functor)] + [apply (.only Apply)] + [monad (.only Monad do)]] [control - ["[0]" io {"+" IO}]] + ["[0]" io (.only IO)]] [data [collection ["[0]" array "_" - ["[1]" \\unsafe {"+" Array}]]]] + ["[1]" \\unsafe (.only Array)]]]] [type [primitive "*"] - ["[0]" variance {"+" Mutable}]]]]) + ["[0]" variance (.only Mutable)]]]]) (type: .public (Thread ! a) (-> ! a)) diff --git a/stdlib/source/library/lux/control/try.lux b/stdlib/source/library/lux/control/try.lux index 1fd3037b9..24c104b17 100644 --- a/stdlib/source/library/lux/control/try.lux +++ b/stdlib/source/library/lux/control/try.lux @@ -3,10 +3,10 @@ [lux "*" ["@" target] [abstract - [apply {"+" Apply}] - [equivalence {"+" Equivalence}] - ["[0]" functor {"+" Functor}] - ["[0]" monad {"+" Monad do}]] + [apply (.only Apply)] + [equivalence (.only Equivalence)] + ["[0]" functor (.only Functor)] + ["[0]" monad (.only Monad do)]] [meta ["[0]" location]]]]) diff --git a/stdlib/source/library/lux/control/writer.lux b/stdlib/source/library/lux/control/writer.lux index b8326b542..3e3cb9714 100644 --- a/stdlib/source/library/lux/control/writer.lux +++ b/stdlib/source/library/lux/control/writer.lux @@ -3,10 +3,10 @@ [lux "*" ["@" target] [abstract - [monoid {"+" Monoid}] - [apply {"+" Apply}] - ["[0]" functor {"+" Functor}] - ["[0]" monad {"+" Monad do}]]]]) + [monoid (.only Monoid)] + [apply (.only Apply)] + ["[0]" functor (.only Functor)] + ["[0]" monad (.only Monad do)]]]]) (type: .public (Writer log value) (Record diff --git a/stdlib/source/library/lux/data/binary.lux b/stdlib/source/library/lux/data/binary.lux index 6ccbb0442..76d1801a2 100644 --- a/stdlib/source/library/lux/data/binary.lux +++ b/stdlib/source/library/lux/data/binary.lux @@ -3,17 +3,17 @@ [lux "*" ["[0]" ffi] [abstract - [equivalence {"+" Equivalence}] - [monoid {"+" Monoid}]] + [equivalence (.only Equivalence)] + [monoid (.only Monoid)]] [control - ["[0]" try {"+" Try}] - ["[0]" exception {"+" exception:}]] + ["[0]" try (.only Try)] + ["[0]" exception (.only exception:)]] [data [text ["%" format]] [collection ["[0]" array - [\\unsafe {"+"}]]]] + [\\unsafe (.only)]]]] [math [number ["n" nat]]]]] diff --git a/stdlib/source/library/lux/data/bit.lux b/stdlib/source/library/lux/data/bit.lux index 266d8b8b0..6ef201146 100644 --- a/stdlib/source/library/lux/data/bit.lux +++ b/stdlib/source/library/lux/data/bit.lux @@ -2,10 +2,10 @@ [library [lux "*" [abstract - [monoid {"+" Monoid}] - [equivalence {"+" Equivalence}] - [hash {"+" Hash}] - [codec {"+" Codec}]] + [monoid (.only Monoid)] + [equivalence (.only Equivalence)] + [hash (.only Hash)] + [codec (.only Codec)]] [control ["[0]" function]]]]) diff --git a/stdlib/source/library/lux/data/collection/array.lux b/stdlib/source/library/lux/data/collection/array.lux index eb0cf93b0..69f701e82 100644 --- a/stdlib/source/library/lux/data/collection/array.lux +++ b/stdlib/source/library/lux/data/collection/array.lux @@ -2,16 +2,16 @@ [library [lux {"-" list} [abstract - [monoid {"+" Monoid}] - [functor {"+" Functor}] - [equivalence {"+" Equivalence}] - [mix {"+" Mix}] - [predicate {"+" Predicate}]] + [monoid (.only Monoid)] + [functor (.only Functor)] + [equivalence (.only Equivalence)] + [mix (.only Mix)] + [predicate (.only Predicate)]] [data [collection ["[0]" list]]] [type - [variance {"+"}]]]] + [variance (.only)]]]] ["!" \\unsafe]) (def: .public type_name diff --git a/stdlib/source/library/lux/data/collection/bits.lux b/stdlib/source/library/lux/data/collection/bits.lux index 45d3e154e..303da37fa 100644 --- a/stdlib/source/library/lux/data/collection/bits.lux +++ b/stdlib/source/library/lux/data/collection/bits.lux @@ -2,13 +2,13 @@ [library [lux {"-" not and or} [abstract - [equivalence {"+" Equivalence}]] + [equivalence (.only Equivalence)]] [control ["[0]" pipe] ["[0]" maybe]] [data [collection - ["[0]" array {"+" Array} ("[1]#[0]" mix)]]] + ["[0]" array (.only Array) ("[1]#[0]" mix)]]] [math [number ["n" nat] diff --git a/stdlib/source/library/lux/data/collection/dictionary.lux b/stdlib/source/library/lux/data/collection/dictionary.lux index 9c5469265..72e3ba8fc 100644 --- a/stdlib/source/library/lux/data/collection/dictionary.lux +++ b/stdlib/source/library/lux/data/collection/dictionary.lux @@ -2,20 +2,20 @@ [library [lux {"-" has revised} [abstract - [hash {"+" Hash}] - [equivalence {"+" Equivalence}] - [monoid {"+" Monoid}] - [functor {"+" Functor}]] + [hash (.only Hash)] + [equivalence (.only Equivalence)] + [monoid (.only Monoid)] + [functor (.only Functor)]] [control ["[0]" maybe] - ["[0]" try {"+" Try}] - ["[0]" exception {"+" exception:}]] + ["[0]" try (.only Try)] + ["[0]" exception (.only exception:)]] [data ["[0]" product] [collection ["[0]" list ("[1]#[0]" mix functor monoid)] ["[0]" array "_" - ["[1]" \\unsafe {"+" Array}]]]] + ["[1]" \\unsafe (.only Array)]]]] [macro ["^" pattern]] [math diff --git a/stdlib/source/library/lux/data/collection/dictionary/ordered.lux b/stdlib/source/library/lux/data/collection/dictionary/ordered.lux index 3c95f2544..3c6f1a2e9 100644 --- a/stdlib/source/library/lux/data/collection/dictionary/ordered.lux +++ b/stdlib/source/library/lux/data/collection/dictionary/ordered.lux @@ -3,8 +3,8 @@ [lux {"-" has revised} [abstract equivalence - [monad {"+" Monad do}] - ["[0]" order {"+" Order}]] + [monad (.only Monad do)] + ["[0]" order (.only Order)]] [control ["[0]" maybe]] [data diff --git a/stdlib/source/library/lux/data/collection/dictionary/plist.lux b/stdlib/source/library/lux/data/collection/dictionary/plist.lux index 03227f727..379b4f947 100644 --- a/stdlib/source/library/lux/data/collection/dictionary/plist.lux +++ b/stdlib/source/library/lux/data/collection/dictionary/plist.lux @@ -2,8 +2,8 @@ [library [lux {"-" has revised} [abstract - [equivalence {"+" Equivalence}] - [monoid {"+" Monoid}]] + [equivalence (.only Equivalence)] + [monoid (.only Monoid)]] [control ["[0]" maybe ("[1]#[0]" functor)]] [data diff --git a/stdlib/source/library/lux/data/collection/list.lux b/stdlib/source/library/lux/data/collection/list.lux index 19ac281fc..180c963cd 100644 --- a/stdlib/source/library/lux/data/collection/list.lux +++ b/stdlib/source/library/lux/data/collection/list.lux @@ -1,16 +1,16 @@ (.using [library - [lux {"-" revised all} + [lux {"-" revised all only} ["@" target] [abstract - [monoid {"+" Monoid}] - [apply {"+" Apply}] - [equivalence {"+" Equivalence}] - [hash {"+" Hash}] - [mix {"+" Mix}] - [predicate {"+" Predicate}] - ["[0]" functor {"+" Functor}] - ["[0]" monad {"+" Monad do}] + [monoid (.only Monoid)] + [apply (.only Apply)] + [equivalence (.only Equivalence)] + [hash (.only Hash)] + [mix (.only Mix)] + [predicate (.only Predicate)] + ["[0]" functor (.only Functor)] + ["[0]" monad (.only Monad do)] ["[0]" enum]] [data ["[0]" bit] diff --git a/stdlib/source/library/lux/data/collection/queue.lux b/stdlib/source/library/lux/data/collection/queue.lux index f5f35402c..767b49118 100644 --- a/stdlib/source/library/lux/data/collection/queue.lux +++ b/stdlib/source/library/lux/data/collection/queue.lux @@ -2,8 +2,8 @@ [library [lux {"-" list} [abstract - [equivalence {"+" Equivalence}] - [functor {"+" Functor}]] + [equivalence (.only Equivalence)] + [functor (.only Functor)]] [data [collection ["[0]" list ("[1]#[0]" monoid functor)]]] diff --git a/stdlib/source/library/lux/data/collection/queue/priority.lux b/stdlib/source/library/lux/data/collection/queue/priority.lux index b399fc342..7e2cf3c0b 100644 --- a/stdlib/source/library/lux/data/collection/queue/priority.lux +++ b/stdlib/source/library/lux/data/collection/queue/priority.lux @@ -2,19 +2,19 @@ [library [lux "*" [abstract - [equivalence {"+" Equivalence}] - [monad {"+" do}]] + [equivalence (.only Equivalence)] + [monad (.only do)]] [control ["[0]" maybe]] [data [collection ["[0]" tree "_" - ["[1]" finger {"+" Tree}]]]] + ["[1]" finger (.only Tree)]]]] [math [number ["n" nat ("[1]#[0]" interval)]]] - [type {"+" by_example} - [primitive {"+" primitive: abstraction representation}]]]]) + [type (.only by_example) + [primitive (.only primitive: abstraction representation)]]]]) (type: .public Priority Nat) diff --git a/stdlib/source/library/lux/data/collection/sequence.lux b/stdlib/source/library/lux/data/collection/sequence.lux index 20748c069..6ddf4bb6b 100644 --- a/stdlib/source/library/lux/data/collection/sequence.lux +++ b/stdlib/source/library/lux/data/collection/sequence.lux @@ -3,30 +3,30 @@ ... https://hypirion.com/musings/understanding-persistent-vector-pt-3 (.using [library - [lux {"-" list has revised} + [lux {"-" list has revised only} ["@" target] [abstract - [functor {"+" Functor}] - [apply {"+" Apply}] - [monad {"+" Monad do}] - [equivalence {"+" Equivalence}] - [monoid {"+" Monoid}] - [mix {"+" Mix}] - [predicate {"+" Predicate}]] + [functor (.only Functor)] + [apply (.only Apply)] + [monad (.only Monad do)] + [equivalence (.only Equivalence)] + [monoid (.only Monoid)] + [mix (.only Mix)] + [predicate (.only Predicate)]] [control ["[0]" maybe ("[1]#[0]" functor)] - ["[0]" try {"+" Try}] - ["[0]" exception {"+" exception:}] + ["[0]" try (.only Try)] + ["[0]" exception (.only exception:)] ["<>" parser - ["<[0]>" code {"+" Parser}]]] + ["<[0]>" code (.only Parser)]]] [data ["[0]" product] [collection ["[0]" list ("[1]#[0]" mix functor monoid)] ["[0]" array "_" - ["[1]" \\unsafe {"+" Array}]]]] + ["[1]" \\unsafe (.only Array)]]]] [macro - [syntax {"+" syntax:}] + [syntax (.only syntax:)] ["^" pattern] ["[0]" code]] [math diff --git a/stdlib/source/library/lux/data/collection/set.lux b/stdlib/source/library/lux/data/collection/set.lux index fa4604ccc..f79b996ce 100644 --- a/stdlib/source/library/lux/data/collection/set.lux +++ b/stdlib/source/library/lux/data/collection/set.lux @@ -2,10 +2,10 @@ [library [lux {"-" has list} [abstract - [equivalence {"+" Equivalence}] - [hash {"+" Hash}] - [predicate {"+" Predicate}] - [monoid {"+" Monoid}]] + [equivalence (.only Equivalence)] + [hash (.only Hash)] + [predicate (.only Predicate)] + [monoid (.only Monoid)]] [data [collection ["[0]" list ("[1]#[0]" mix)]]] @@ -15,7 +15,7 @@ [number ["n" nat]]]]] ["[0]" // "_" - ["[1]" dictionary {"+" Dictionary}]]) + ["[1]" dictionary (.only Dictionary)]]) (type: .public (Set a) (Dictionary a Any)) diff --git a/stdlib/source/library/lux/data/collection/set/multi.lux b/stdlib/source/library/lux/data/collection/set/multi.lux index 7c741594e..3500e756e 100644 --- a/stdlib/source/library/lux/data/collection/set/multi.lux +++ b/stdlib/source/library/lux/data/collection/set/multi.lux @@ -3,8 +3,8 @@ [library [lux {"-" has list} [abstract - [equivalence {"+" Equivalence}] - [hash {"+" Hash}]] + [equivalence (.only Equivalence)] + [hash (.only Hash)]] [control ["[0]" function] ["[0]" maybe]] @@ -14,11 +14,11 @@ [number ["n" nat]]] [type - ["[0]" primitive {"+" primitive: abstraction representation}]]]] + ["[0]" primitive (.only primitive: abstraction representation)]]]] ["[0]" // [// ["[0]" list ("[1]#[0]" mix monoid)] - ["[0]" dictionary {"+" Dictionary}]]]) + ["[0]" dictionary (.only Dictionary)]]]) (primitive: .public (Set a) (Dictionary a Nat) diff --git a/stdlib/source/library/lux/data/collection/set/ordered.lux b/stdlib/source/library/lux/data/collection/set/ordered.lux index 2852070ae..a8bee8098 100644 --- a/stdlib/source/library/lux/data/collection/set/ordered.lux +++ b/stdlib/source/library/lux/data/collection/set/ordered.lux @@ -2,8 +2,8 @@ [library [lux {"-" has list} [abstract - [equivalence {"+" Equivalence}] - [order {"+" Order}]] + [equivalence (.only Equivalence)] + [order (.only Order)]] [data [collection ["[0]" list ("[1]#[0]" mix)] diff --git a/stdlib/source/library/lux/data/collection/stack.lux b/stdlib/source/library/lux/data/collection/stack.lux index 1dc7266ad..f6905d632 100644 --- a/stdlib/source/library/lux/data/collection/stack.lux +++ b/stdlib/source/library/lux/data/collection/stack.lux @@ -2,8 +2,8 @@ [library [lux "*" [abstract - [equivalence {"+" Equivalence}] - [functor {"+" Functor}]] + [equivalence (.only Equivalence)] + [functor (.only Functor)]] [data [collection ["//" list]]] diff --git a/stdlib/source/library/lux/data/collection/stream.lux b/stdlib/source/library/lux/data/collection/stream.lux index 495b26afa..f764ff369 100644 --- a/stdlib/source/library/lux/data/collection/stream.lux +++ b/stdlib/source/library/lux/data/collection/stream.lux @@ -1,19 +1,19 @@ (.using [library - [lux {"-" pattern} + [lux {"-" pattern only} [abstract - [functor {"+" Functor}] - [comonad {"+" CoMonad}]] + [functor (.only Functor)] + [comonad (.only CoMonad)]] [control - ["//" continuation {"+" Cont}] + ["//" continuation (.only Cont)] ["<>" parser - ["<[0]>" code {"+" Parser}]]] + ["<[0]>" code (.only Parser)]]] [data ["[0]" bit] [collection ["[0]" list ("[1]#[0]" monad)]]] - [macro {"+" with_symbols} - [syntax {"+" syntax:}] + [macro (.only with_symbols) + [syntax (.only syntax:)] ["[0]" code]] [math [number diff --git a/stdlib/source/library/lux/data/collection/tree.lux b/stdlib/source/library/lux/data/collection/tree.lux index 58694df25..f1c5ac967 100644 --- a/stdlib/source/library/lux/data/collection/tree.lux +++ b/stdlib/source/library/lux/data/collection/tree.lux @@ -2,18 +2,18 @@ [library [lux "*" [abstract - [functor {"+" Functor}] - [equivalence {"+" Equivalence}] - [mix {"+" Mix}] - [monad {"+" do}]] + [functor (.only Functor)] + [equivalence (.only Equivalence)] + [mix (.only Mix)] + [monad (.only do)]] [control ["<>" parser - ["<[0]>" code {"+" Parser}]]] + ["<[0]>" code (.only Parser)]]] [data [collection ["[0]" list ("[1]#[0]" monad mix)]]] [macro - [syntax {"+" syntax:}] + [syntax (.only syntax:)] ["[0]" code]]]]) (type: .public (Tree a) diff --git a/stdlib/source/library/lux/data/collection/tree/finger.lux b/stdlib/source/library/lux/data/collection/tree/finger.lux index 19e3dae15..3939f2d38 100644 --- a/stdlib/source/library/lux/data/collection/tree/finger.lux +++ b/stdlib/source/library/lux/data/collection/tree/finger.lux @@ -2,13 +2,13 @@ [library [lux "*" [abstract - [predicate {"+" Predicate}] - ["[0]" monoid {"+" Monoid}]] + [predicate (.only Predicate)] + ["[0]" monoid (.only Monoid)]] [data [collection ["[0]" list ("[1]#[0]" monoid)]]] [type - [primitive {"+" primitive: abstraction representation}]]]]) + [primitive (.only primitive: abstraction representation)]]]]) ... https://en.wikipedia.org/wiki/Finger_tree (primitive: .public (Tree @ t v) diff --git a/stdlib/source/library/lux/data/collection/tree/zipper.lux b/stdlib/source/library/lux/data/collection/tree/zipper.lux index d0790fa4f..0111a1990 100644 --- a/stdlib/source/library/lux/data/collection/tree/zipper.lux +++ b/stdlib/source/library/lux/data/collection/tree/zipper.lux @@ -3,19 +3,19 @@ [lux {"-" left right} ["@" target] [abstract - [functor {"+" Functor}] - [comonad {"+" CoMonad}] - [monad {"+" do}] - [equivalence {"+" Equivalence}]] + [functor (.only Functor)] + [comonad (.only CoMonad)] + [monad (.only do)] + [equivalence (.only Equivalence)]] [control ["[0]" maybe ("[1]#[0]" monad)]] [data ["[0]" product] [text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" functor monoid)]]]]] - ["[0]" // {"+" Tree} ("[1]#[0]" functor)]) + ["[0]" // (.only Tree) ("[1]#[0]" functor)]) (type: (Family Zipper a) (Record diff --git a/stdlib/source/library/lux/data/color.lux b/stdlib/source/library/lux/data/color.lux index e29a9260d..4b1a2a9da 100644 --- a/stdlib/source/library/lux/data/color.lux +++ b/stdlib/source/library/lux/data/color.lux @@ -2,9 +2,9 @@ [library [lux "*" [abstract - [equivalence {"+" Equivalence}] - [monoid {"+" Monoid}] - ["[0]" hash {"+" Hash}]] + [equivalence (.only Equivalence)] + [monoid (.only Monoid)] + ["[0]" hash (.only Hash)]] [data [collection ["[0]" list ("[1]#[0]" functor)]]] diff --git a/stdlib/source/library/lux/data/color/named.lux b/stdlib/source/library/lux/data/color/named.lux index c25c5fb16..8caf8efc2 100644 --- a/stdlib/source/library/lux/data/color/named.lux +++ b/stdlib/source/library/lux/data/color/named.lux @@ -1,9 +1,9 @@ (.using - [library - [lux "*" - [math - [number {"+" hex}]]]] - ["[0]" // {"+" Color}]) + [library + [lux "*" + [math + [number (.only hex)]]]] + ["[0]" // (.only Color)]) ... https://developer.mozilla.org/en-US/docs/Web/CSS/color_value (template [<red> <green> <blue> <name>] diff --git a/stdlib/source/library/lux/data/format/binary.lux b/stdlib/source/library/lux/data/format/binary.lux index 88ee81c34..3d95706af 100644 --- a/stdlib/source/library/lux/data/format/binary.lux +++ b/stdlib/source/library/lux/data/format/binary.lux @@ -1,30 +1,30 @@ (.using [library [lux {"-" and or nat int rev list type symbol} - [ffi {"+"}] + [ffi (.only)] [abstract - [monoid {"+" Monoid}] - [monad {"+" Monad do}] - [equivalence {"+" Equivalence}]] + [monoid (.only Monoid)] + [monad (.only Monad do)] + [equivalence (.only Equivalence)]] [control ["[0]" pipe] ["[0]" function] ["<>" parser ("[1]#[0]" monad) - ["</>" binary {"+" Offset Size Parser}]]] + ["</>" binary (.only Offset Size Parser)]]] [data ["/" binary "_" - ["[1]" \\unsafe {"+" Binary}]] + ["[1]" \\unsafe (.only Binary)]] ["[0]" product] [text - ["%" format {"+" format}] + ["%" format (.only format)] [encoding ["[0]" utf8]]] [collection ["[0]" list] - ["[0]" sequence {"+" Sequence} ("[1]#[0]" functor)] - ["[0]" set {"+" Set}] + ["[0]" sequence (.only Sequence) ("[1]#[0]" functor)] + ["[0]" set (.only Set)] [array - [\\unsafe {"+"}]]]] + [\\unsafe (.only)]]]] [macro ["^" pattern]] [math diff --git a/stdlib/source/library/lux/data/format/css.lux b/stdlib/source/library/lux/data/format/css.lux index f3f5c445f..ca05ccc98 100644 --- a/stdlib/source/library/lux/data/format/css.lux +++ b/stdlib/source/library/lux/data/format/css.lux @@ -5,8 +5,8 @@ ["[0]" maybe]] [data ["[0]" text - ["%" format {"+" format}] - ["[0]" encoding {"+" Encoding}]] + ["%" format (.only format)] + ["[0]" encoding (.only Encoding)]] [collection ["[0]" list ("[1]#[0]" functor)]]] [math @@ -15,14 +15,14 @@ [type [primitive {"-" Frame pattern}]] [world - [net {"+" URL}]]]] + [net (.only URL)]]]] ["[0]" / "_" - ["[1][0]" selector {"+" Selector Combinator Specializer Generic}] - ["[1][0]" value {"+" Value Animation Percentage}] - ["[1][0]" property {"+" Property}] - ["[1][0]" font {"+" Font}] + ["[1][0]" selector (.only Selector Combinator Specializer Generic)] + ["[1][0]" value (.only Value Animation Percentage)] + ["[1][0]" property (.only Property)] + ["[1][0]" font (.only Font)] ["[1][0]" style] - ["[1][0]" query {"+" Query}]]) + ["[1][0]" query (.only Query)]]) (primitive: .public Common Any) (primitive: .public Special Any) diff --git a/stdlib/source/library/lux/data/format/css/class.lux b/stdlib/source/library/lux/data/format/css/class.lux index 4c9018688..036a5a8ed 100644 --- a/stdlib/source/library/lux/data/format/css/class.lux +++ b/stdlib/source/library/lux/data/format/css/class.lux @@ -3,12 +3,12 @@ [lux "*" ["[0]" meta] [abstract - [monad {"+" do}]] + [monad (.only do)]] [data ["[0]" text ("[1]#[0]" hash) - ["%" format {"+" format}]]] + ["%" format (.only format)]]] [macro - [syntax {"+" syntax:}] + [syntax (.only syntax:)] ["[0]" code]] [type [primitive "*"]]]]) diff --git a/stdlib/source/library/lux/data/format/css/font.lux b/stdlib/source/library/lux/data/format/css/font.lux index 8f199f020..7eaf89726 100644 --- a/stdlib/source/library/lux/data/format/css/font.lux +++ b/stdlib/source/library/lux/data/format/css/font.lux @@ -1,17 +1,17 @@ (.using - [library - [lux "*" - [type - abstract] - [control - [parser - ["s" code]]] - ["[0]" macro - [syntax {"+" syntax:}]] - [world - [net {"+" URL}]]]] - ["[0]" // "_" - ["[1][0]" value {"+" Value Font_Stretch Font_Style Font_Weight}]]) + [library + [lux "*" + [type + abstract] + [control + [parser + ["s" code]]] + ["[0]" macro + [syntax (.only syntax:)]] + [world + [net (.only URL)]]]] + ["[0]" // "_" + ["[1][0]" value (.only Value Font_Stretch Font_Style Font_Weight)]]) (type: .public Unicode_Range (Record diff --git a/stdlib/source/library/lux/data/format/css/id.lux b/stdlib/source/library/lux/data/format/css/id.lux index 8eb73d0e7..4af192d61 100644 --- a/stdlib/source/library/lux/data/format/css/id.lux +++ b/stdlib/source/library/lux/data/format/css/id.lux @@ -3,12 +3,12 @@ [lux "*" ["[0]" meta] [abstract - [monad {"+" do}]] + [monad (.only do)]] [data ["[0]" text ("[1]#[0]" hash) - ["%" format {"+" format}]]] + ["%" format (.only format)]]] [macro - [syntax {"+" syntax:}] + [syntax (.only syntax:)] ["[0]" code]] [type [primitive "*"]]]]) diff --git a/stdlib/source/library/lux/data/format/css/property.lux b/stdlib/source/library/lux/data/format/css/property.lux index 821b4b03f..685b6d312 100644 --- a/stdlib/source/library/lux/data/format/css/property.lux +++ b/stdlib/source/library/lux/data/format/css/property.lux @@ -11,48 +11,48 @@ [macro ["[0]" template] ["[0]" code] - [syntax {"+" syntax:}]]]] + [syntax (.only syntax:)]]]] [// - [value {"+" All - Number - Length Thickness Time - Color - Location Fit - Slice - Alignment Animation_Direction - Animation Animation_Fill - Column_Fill Column_Span - Iteration Count - Play - Timing Visibility Attachment - Blend Span Image - Angle Repeat Border - Collapse Box_Decoration_Break Caption - Float Clear - Content - Cursor - Shadow Clip - Text_Direction - Display Empty - Filter - Flex_Direction Flex_Wrap - Font Font_Kerning Font_Size Font_Stretch Font_Style Font_Weight Font_Variant - Grid Grid_Content Grid_Flow Grid_Span Grid_Template - Hanging_Punctuation Hyphens Isolation - List_Style_Position List_Style_Type - Overflow Page_Break Pointer_Events - Position - Quotes - Resize Scroll_Behavior Table_Layout - Text_Align Text_Align_Last - Text_Decoration_Line Text_Decoration_Style - Text_Justification Text_Overflow Text_Transform - Transform Transform_Origin Transform_Style - Transition - Bidi User_Select - Vertical_Align - White_Space Word_Break Word_Wrap Writing_Mode - Z_Index}]]) + [value (.only All + Number + Length Thickness Time + Color + Location Fit + Slice + Alignment Animation_Direction + Animation Animation_Fill + Column_Fill Column_Span + Iteration Count + Play + Timing Visibility Attachment + Blend Span Image + Angle Repeat Border + Collapse Box_Decoration_Break Caption + Float Clear + Content + Cursor + Shadow Clip + Text_Direction + Display Empty + Filter + Flex_Direction Flex_Wrap + Font Font_Kerning Font_Size Font_Stretch Font_Style Font_Weight Font_Variant + Grid Grid_Content Grid_Flow Grid_Span Grid_Template + Hanging_Punctuation Hyphens Isolation + List_Style_Position List_Style_Type + Overflow Page_Break Pointer_Events + Position + Quotes + Resize Scroll_Behavior Table_Layout + Text_Align Text_Align_Last + Text_Decoration_Line Text_Decoration_Style + Text_Justification Text_Overflow Text_Transform + Transform Transform_Origin Transform_Style + Transition + Bidi User_Select + Vertical_Align + White_Space Word_Break Word_Wrap Writing_Mode + Z_Index)]]) (syntax: (text_symbol [symbol s.text]) (in (list (code.local (text.replaced "-" "_" symbol))))) diff --git a/stdlib/source/library/lux/data/format/css/query.lux b/stdlib/source/library/lux/data/format/css/query.lux index 697529704..86f72255a 100644 --- a/stdlib/source/library/lux/data/format/css/query.lux +++ b/stdlib/source/library/lux/data/format/css/query.lux @@ -6,20 +6,20 @@ ["s" code]]] [data ["[0]" text - ["%" format {"+" format}]]] + ["%" format (.only format)]]] [macro ["[0]" template] ["[0]" code] - [syntax {"+" syntax:}]] + [syntax (.only syntax:)]] [type [primitive "*"]]]] ["[0]" // "_" - ["[1][0]" value {"+" Value Length Count Resolution Ratio - Orientation Scan Boolean Update - Block_Overflow Inline_Overflow - Display_Mode Color_Gamut Inverted_Colors - Pointer Hover - Light Scripting Motion Color_Scheme}]]) + ["[1][0]" value (.only Value Length Count Resolution Ratio + Orientation Scan Boolean Update + Block_Overflow Inline_Overflow + Display_Mode Color_Gamut Inverted_Colors + Pointer Hover + Light Scripting Motion Color_Scheme)]]) (syntax: (text_symbol [symbol s.text]) (in (list (code.local (text.replaced "-" "_" symbol))))) diff --git a/stdlib/source/library/lux/data/format/css/selector.lux b/stdlib/source/library/lux/data/format/css/selector.lux index c1fece6e7..8114f358f 100644 --- a/stdlib/source/library/lux/data/format/css/selector.lux +++ b/stdlib/source/library/lux/data/format/css/selector.lux @@ -1,10 +1,10 @@ (.using [library [lux {"-" Label or and for same? not} - ["[0]" locale {"+" Locale}] + ["[0]" locale (.only Locale)] [data ["[0]" text - ["%" format {"+" format}]]] + ["%" format (.only format)]]] [math [number ["i" int]]] @@ -13,8 +13,8 @@ [macro ["[0]" template]]]] ["[0]" // "_" - ["[1][0]" id {"+" ID}] - ["[1][0]" class {"+" Class}]]) + ["[1][0]" id (.only ID)] + ["[1][0]" class (.only Class)]]) (type: .public Label Text) diff --git a/stdlib/source/library/lux/data/format/css/style.lux b/stdlib/source/library/lux/data/format/css/style.lux index 424a16d66..015453599 100644 --- a/stdlib/source/library/lux/data/format/css/style.lux +++ b/stdlib/source/library/lux/data/format/css/style.lux @@ -3,14 +3,14 @@ [lux "*" [data [text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" mix)]]] [type [primitive "*"]]]] ["[0]" // "_" - ["[1][0]" value {"+" Value}] - ["[1][0]" property {"+" Property}]]) + ["[1][0]" value (.only Value)] + ["[1][0]" property (.only Property)]]) (primitive: .public Style Text diff --git a/stdlib/source/library/lux/data/format/css/value.lux b/stdlib/source/library/lux/data/format/css/value.lux index 01c011ac3..5d50d5290 100644 --- a/stdlib/source/library/lux/data/format/css/value.lux +++ b/stdlib/source/library/lux/data/format/css/value.lux @@ -9,11 +9,11 @@ ["[0]" color] ["[0]" product] ["[0]" text - ["%" format {"+" Format format}]] + ["%" format (.only Format format)]] [collection ["[0]" list ("[1]#[0]" functor)]]] [macro - [syntax {"+" syntax:}] + [syntax (.only syntax:)] ["[0]" template] ["[0]" code]] [math @@ -25,9 +25,9 @@ [type [primitive "*"]] [world - [net {"+" URL}]]]] + [net (.only URL)]]]] [// - [selector {"+" Label}]]) + [selector (.only Label)]]) (syntax: (text_symbol [symbol <code>.text]) (in (list (code.local (text.replaced "-" "_" symbol))))) diff --git a/stdlib/source/library/lux/data/format/html.lux b/stdlib/source/library/lux/data/format/html.lux index b1ebb9a65..7cff8990b 100644 --- a/stdlib/source/library/lux/data/format/html.lux +++ b/stdlib/source/library/lux/data/format/html.lux @@ -7,7 +7,7 @@ [data ["[0]" product] ["[0]" text - ["%" format {"+" Format format}]] + ["%" format (.only Format format)]] [collection ["[0]" list ("[1]#[0]" functor mix)]]] [macro @@ -17,12 +17,12 @@ [type [primitive "*"]] [world - [net {"+" URL}]]]] + [net (.only URL)]]]] [// - ["[0]" xml {"+" XML}] + ["[0]" xml (.only XML)] [css ["[0]" selector] - ["[0]" style {"+" Style}]]]) + ["[0]" style (.only Style)]]]) (type: .public Tag selector.Tag) (type: .public ID selector.ID) diff --git a/stdlib/source/library/lux/data/format/json.lux b/stdlib/source/library/lux/data/format/json.lux index 1eb7c31fb..06babedb6 100644 --- a/stdlib/source/library/lux/data/format/json.lux +++ b/stdlib/source/library/lux/data/format/json.lux @@ -1,18 +1,18 @@ (.using [library [lux {"-" has} - ["[0]" meta {"+" monad}] + ["[0]" meta (.only monad)] [abstract - [equivalence {"+" Equivalence}] - [codec {"+" Codec}] - [predicate {"+" Predicate}] - ["[0]" monad {"+" do}]] + [equivalence (.only Equivalence)] + [codec (.only Codec)] + [predicate (.only Predicate)] + ["[0]" monad (.only do)]] [control ["[0]" pipe] ["[0]" maybe] - ["[0]" try {"+" Try}] + ["[0]" try (.only Try)] ["<>" parser ("[1]#[0]" monad) - ["<[0]>" text {"+" Parser}] + ["<[0]>" text (.only Parser)] ["<[0]>" code]]] [data ["[0]" bit] @@ -20,10 +20,10 @@ ["[0]" text ("[1]#[0]" equivalence monoid)] [collection ["[0]" list ("[1]#[0]" mix functor)] - ["[0]" sequence {"+" Sequence sequence} ("[1]#[0]" monad)] - ["[0]" dictionary {"+" Dictionary}]]] + ["[0]" sequence (.only Sequence sequence) ("[1]#[0]" monad)] + ["[0]" dictionary (.only Dictionary)]]] [macro - [syntax {"+" syntax:}] + [syntax (.only syntax:)] ["^" pattern] ["[0]" code]] [math diff --git a/stdlib/source/library/lux/data/format/markdown.lux b/stdlib/source/library/lux/data/format/markdown.lux index ed56b0853..eb71f7935 100644 --- a/stdlib/source/library/lux/data/format/markdown.lux +++ b/stdlib/source/library/lux/data/format/markdown.lux @@ -3,13 +3,13 @@ [lux {"-" and} [data ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" functor)]]] [type [primitive "*"]] [world - [net {"+" URL}]]]]) + [net (.only URL)]]]]) ... https://www.markdownguide.org/basic-syntax/ diff --git a/stdlib/source/library/lux/data/format/tar.lux b/stdlib/source/library/lux/data/format/tar.lux index 7cdd1cf58..ea8a1f5ad 100644 --- a/stdlib/source/library/lux/data/format/tar.lux +++ b/stdlib/source/library/lux/data/format/tar.lux @@ -1,30 +1,30 @@ (.using [library [lux {"-" Mode and} - [ffi {"+"}] + [ffi (.only)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" pipe] - ["[0]" try {"+" Try}] - ["[0]" exception {"+" exception:}] + ["[0]" try (.only Try)] + ["[0]" exception (.only exception:)] ["<>" parser - ["<[0]>" binary {"+" Parser}]]] + ["<[0]>" binary (.only Parser)]]] [data ["[0]" product] - ["[0]" binary {"+" Binary} + ["[0]" binary (.only Binary) ["[1]!" \\unsafe]] - ["[0]" text {"+" Char} - ["%" format {"+" format}] + ["[0]" text (.only Char) + ["%" format (.only format)] [encoding ["[0]" utf8]]] ["[0]" format "_" - ["[1]" binary {"+" Writer} ("[1]#[0]" monoid)]] + ["[1]" binary (.only Writer) ("[1]#[0]" monoid)]] [collection ["[0]" list ("[1]#[0]" mix)] - ["[0]" sequence {"+" Sequence} ("[1]#[0]" mix)] + ["[0]" sequence (.only Sequence) ("[1]#[0]" mix)] [array - [\\unsafe {"+"}]]]] + [\\unsafe (.only)]]]] [macro ["^" pattern]] [math @@ -32,7 +32,7 @@ ["n" nat] ["[0]" i64]]] [time - ["[0]" instant {"+" Instant}] + ["[0]" instant (.only Instant)] ["[0]" duration]] [world ["[0]" file]] diff --git a/stdlib/source/library/lux/data/format/xml.lux b/stdlib/source/library/lux/data/format/xml.lux index d30f2aeee..2973caf9a 100644 --- a/stdlib/source/library/lux/data/format/xml.lux +++ b/stdlib/source/library/lux/data/format/xml.lux @@ -2,19 +2,19 @@ [library [lux {"-" symbol} [abstract - [monad {"+" do}] - [equivalence {"+" Equivalence}] - [codec {"+" Codec}]] + [monad (.only do)] + [equivalence (.only Equivalence)] + [codec (.only Codec)]] [control - [try {"+" Try}] + [try (.only Try)] ["<>" parser ("[1]#[0]" monad) - ["<[0]>" text {"+" Parser Slice}]]] + ["<[0]>" text (.only Parser Slice)]]] [data ["[0]" product] - ["[0]" text {"+" \n} ("[1]#[0]" equivalence monoid)] + ["[0]" text (.only \n) ("[1]#[0]" equivalence monoid)] [collection ["[0]" list ("[1]#[0]" functor)] - ["[0]" dictionary {"+" Dictionary}]]] + ["[0]" dictionary (.only Dictionary)]]] [math [number ["n" nat] diff --git a/stdlib/source/library/lux/data/identity.lux b/stdlib/source/library/lux/data/identity.lux index 64f124f02..5f805450f 100644 --- a/stdlib/source/library/lux/data/identity.lux +++ b/stdlib/source/library/lux/data/identity.lux @@ -2,10 +2,10 @@ [library [lux "*" [abstract - [functor {"+" Functor}] - [apply {"+" Apply}] - [monad {"+" Monad}] - [comonad {"+" CoMonad}]] + [functor (.only Functor)] + [apply (.only Apply)] + [monad (.only Monad)] + [comonad (.only CoMonad)]] [control ["[0]" function]]]]) diff --git a/stdlib/source/library/lux/data/product.lux b/stdlib/source/library/lux/data/product.lux index f516c7d97..05786b260 100644 --- a/stdlib/source/library/lux/data/product.lux +++ b/stdlib/source/library/lux/data/product.lux @@ -2,8 +2,8 @@ [library [lux {"-" left right} [abstract - [equivalence {"+" Equivalence}] - [hash {"+" Hash}]]]]) + [equivalence (.only Equivalence)] + [hash (.only Hash)]]]]) (template [<name>] [(def: .public (<name> [left right]) diff --git a/stdlib/source/library/lux/data/store.lux b/stdlib/source/library/lux/data/store.lux index 6c0291c2a..8b6453550 100644 --- a/stdlib/source/library/lux/data/store.lux +++ b/stdlib/source/library/lux/data/store.lux @@ -2,7 +2,7 @@ [library [lux "*" [abstract - [functor {"+" Functor}] + [functor (.only Functor)] comonad] [type implicit]]]) diff --git a/stdlib/source/library/lux/data/sum.lux b/stdlib/source/library/lux/data/sum.lux index 5d1fe365b..4c6a37dd9 100644 --- a/stdlib/source/library/lux/data/sum.lux +++ b/stdlib/source/library/lux/data/sum.lux @@ -2,8 +2,8 @@ [library [lux {"-" left right} [abstract - [equivalence {"+" Equivalence}] - [hash {"+" Hash}]]]]) + [equivalence (.only Equivalence)] + [hash (.only Hash)]]]]) (template [<right?> <name>] [(def: .public (<name> value) diff --git a/stdlib/source/library/lux/data/text.lux b/stdlib/source/library/lux/data/text.lux index 22ee37a50..25390d767 100644 --- a/stdlib/source/library/lux/data/text.lux +++ b/stdlib/source/library/lux/data/text.lux @@ -3,12 +3,12 @@ [lux {"-" char} ["@" target] [abstract - [hash {"+" Hash}] - [monoid {"+" Monoid}] - [equivalence {"+" Equivalence}] - [order {"+" Order}] - [monad {"+" do}] - [codec {"+" Codec}]] + [hash (.only Hash)] + [monoid (.only Monoid)] + [equivalence (.only Equivalence)] + [order (.only Order)] + [monad (.only do)] + [codec (.only Codec)]] [control ["[0]" maybe]] [data diff --git a/stdlib/source/library/lux/data/text/buffer.lux b/stdlib/source/library/lux/data/text/buffer.lux index 4e51b721c..c9cefbb48 100644 --- a/stdlib/source/library/lux/data/text/buffer.lux +++ b/stdlib/source/library/lux/data/text/buffer.lux @@ -2,16 +2,16 @@ [library [lux "*" ["@" target] - ["[0]" ffi {"+" import:}] + ["[0]" ffi (.only import:)] [control ["[0]" function]] [data ["[0]" product] [text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" array] - ["[0]" sequence {"+" Sequence} ("[1]#[0]" mix)]]] + ["[0]" sequence (.only Sequence) ("[1]#[0]" mix)]]] [math [number ["n" nat]]] diff --git a/stdlib/source/library/lux/data/text/encoding/utf8.lux b/stdlib/source/library/lux/data/text/encoding/utf8.lux index 21bbe8e81..1ad9c51b1 100644 --- a/stdlib/source/library/lux/data/text/encoding/utf8.lux +++ b/stdlib/source/library/lux/data/text/encoding/utf8.lux @@ -4,11 +4,11 @@ ["@" target] ["[0]" ffi] [abstract - [codec {"+" Codec}]] + [codec (.only Codec)]] [control - ["[0]" try {"+" Try}]] + ["[0]" try (.only Try)]] [data - ["[0]" binary {"+" Binary}]]]] + ["[0]" binary (.only Binary)]]]] ["[0]" //]) (with_expansions [<jvm> (these (ffi.import: java/lang/String diff --git a/stdlib/source/library/lux/data/text/escape.lux b/stdlib/source/library/lux/data/text/escape.lux index a3b549273..63bd9adf9 100644 --- a/stdlib/source/library/lux/data/text/escape.lux +++ b/stdlib/source/library/lux/data/text/escape.lux @@ -3,22 +3,22 @@ [lux "*" ["[0]" meta] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" maybe] - ["[0]" try {"+" Try}] - ["[0]" exception {"+" exception:}] + ["[0]" try (.only Try)] + ["[0]" exception (.only exception:)] ["<>" parser ["<[0]>" code]]] [math - [number {"+" hex} + [number (.only hex) ["n" nat]]] [macro - [syntax {"+" syntax:}] + [syntax (.only syntax:)] ["^" pattern] ["[0]" code]]]] - ["[0]" // {"+" Char} - ["%" format {"+" format}]]) + ["[0]" // (.only Char) + ["%" format (.only format)]]) (def: sigil "\") diff --git a/stdlib/source/library/lux/data/text/format.lux b/stdlib/source/library/lux/data/text/format.lux index 5b719d954..1785765de 100644 --- a/stdlib/source/library/lux/data/text/format.lux +++ b/stdlib/source/library/lux/data/text/format.lux @@ -2,12 +2,12 @@ [library [lux {"-" list nat int rev type symbol} [abstract - [monad {"+" do}] + [monad (.only do)] [functor ["[0]" contravariant]]] [control ["<>" parser - ["<[0]>" code {"+" Parser}]]] + ["<[0]>" code (.only Parser)]]] [data ["[0]" bit] ["[0]" text] @@ -31,7 +31,7 @@ ["[0]" frac] ["[0]" ratio]]] [macro - [syntax {"+" syntax:}] + [syntax (.only syntax:)] ["[0]" code] ["[0]" template]] [meta diff --git a/stdlib/source/library/lux/data/text/regex.lux b/stdlib/source/library/lux/data/text/regex.lux index 1b784bebe..d5d6697eb 100644 --- a/stdlib/source/library/lux/data/text/regex.lux +++ b/stdlib/source/library/lux/data/text/regex.lux @@ -3,27 +3,27 @@ [lux {"-" pattern} ["[0]" meta] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" maybe] ["[0]" try] - ["[0]" exception {"+" exception:}] + ["[0]" exception (.only exception:)] ["<>" parser ("[1]#[0]" monad) - ["<[0]>" text {"+" Parser}] + ["<[0]>" text (.only Parser)] ["<[0]>" code]]] [data ["[0]" product] [collection ["[0]" list ("[1]#[0]" mix monad)]]] - [macro {"+" with_symbols} - [syntax {"+" syntax:}] + [macro (.only with_symbols) + [syntax (.only syntax:)] ["^" pattern] ["[0]" code]] [math - [number {"+" hex} + [number (.only hex) ["n" nat ("[1]#[0]" decimal)]]]]] ["[0]" // - ["%" format {"+" format}]]) + ["%" format (.only format)]]) (def: regex_char^ (Parser Text) diff --git a/stdlib/source/library/lux/data/text/unicode/block.lux b/stdlib/source/library/lux/data/text/unicode/block.lux index af1825a48..39d51af79 100644 --- a/stdlib/source/library/lux/data/text/unicode/block.lux +++ b/stdlib/source/library/lux/data/text/unicode/block.lux @@ -2,17 +2,17 @@ [library [lux "*" [abstract - [equivalence {"+" Equivalence}] - [hash {"+" Hash}] - [monoid {"+" Monoid}] - ["[0]" interval {"+" Interval}]] + [equivalence (.only Equivalence)] + [hash (.only Hash)] + [monoid (.only Monoid)] + ["[0]" interval (.only Interval)]] [math - [number {"+" hex} + [number (.only hex) ["n" nat ("[1]#[0]" interval)] ["[0]" i64]]] [type [primitive "*"]]]] - [/// {"+" Char}]) + [/// (.only Char)]) (primitive: .public Block (Interval Char) diff --git a/stdlib/source/library/lux/data/text/unicode/set.lux b/stdlib/source/library/lux/data/text/unicode/set.lux index 1bd7ca2af..238eb0895 100644 --- a/stdlib/source/library/lux/data/text/unicode/set.lux +++ b/stdlib/source/library/lux/data/text/unicode/set.lux @@ -2,19 +2,19 @@ [library [lux "*" [abstract - [equivalence {"+" Equivalence}]] + [equivalence (.only Equivalence)]] [data [collection ["[0]" list ("[1]#[0]" mix functor)] ["[0]" set ("[1]#[0]" equivalence)] ["[0]" tree "_" - ["[1]" finger {"+" Tree}]]]] - [type {"+" by_example} + ["[1]" finger (.only Tree)]]]] + [type (.only by_example) [primitive "*"]]]] ["[0]" / "_" ["/[1]" // "_" - [// {"+" Char}] - ["[1][0]" block {"+" Block}]]]) + [// (.only Char)] + ["[1][0]" block (.only Block)]]]) (def: builder (tree.builder //block.monoid)) diff --git a/stdlib/source/library/lux/data/trace.lux b/stdlib/source/library/lux/data/trace.lux index 73f8dc5aa..72a6eb4d3 100644 --- a/stdlib/source/library/lux/data/trace.lux +++ b/stdlib/source/library/lux/data/trace.lux @@ -2,8 +2,8 @@ [library [lux "*" [abstract - ["[0]" monoid {"+" Monoid}] - [functor {"+" Functor}] + ["[0]" monoid (.only Monoid)] + [functor (.only Functor)] comonad] function]]) diff --git a/stdlib/source/library/lux/debug.lux b/stdlib/source/library/lux/debug.lux index e1729e2ad..132038ab1 100644 --- a/stdlib/source/library/lux/debug.lux +++ b/stdlib/source/library/lux/debug.lux @@ -3,23 +3,23 @@ [lux {"-" type private} ["@" target] ["[0]" type] - ["[0]" ffi {"+" import:}] + ["[0]" ffi (.only import:)] ["[0]" meta] [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["[0]" pipe] ["[0]" function] - ["[0]" try {"+" Try}] - ["[0]" exception {"+" exception:}] + ["[0]" try (.only Try)] + ["[0]" exception (.only exception:)] ["<>" parser - ["<[0]>" type {"+" Parser}] + ["<[0]>" type (.only Parser)] ["<[0]>" code]]] [data ["[0]" text - ["%" format {"+" Format}]] + ["%" format (.only Format)]] [format - [xml {"+" XML}] + [xml (.only XML)] ["[0]" json]] [collection ["[0]" array] @@ -28,19 +28,19 @@ [macro ["^" pattern] ["[0]" template] - ["[0]" syntax {"+" syntax:}] + ["[0]" syntax (.only syntax:)] ["[0]" code]] [math [number - [ratio {"+" Ratio}] + [ratio (.only Ratio)] ["n" nat] ["i" int]]] - [time {"+" Time} - [instant {"+" Instant}] - [duration {"+" Duration}] - [date {"+" Date}] - [month {"+" Month}] - [day {"+" Day}]]]]) + [time (.only Time) + [instant (.only Instant)] + [duration (.only Duration)] + [date (.only Date)] + [month (.only Month)] + [day (.only Day)]]]]) (with_expansions [<jvm> (these (import: java/lang/String "[1]::[0]") diff --git a/stdlib/source/library/lux/documentation.lux b/stdlib/source/library/lux/documentation.lux index c50a1070a..4770ef1f1 100644 --- a/stdlib/source/library/lux/documentation.lux +++ b/stdlib/source/library/lux/documentation.lux @@ -4,25 +4,25 @@ ["[0]" meta] ["[0]" type ("[1]#[0]" equivalence)] [abstract - [monad {"+" do}] + [monad (.only do)] ["[0]" enum]] [control ["[0]" maybe ("[1]#[0]" functor)] - ["[0]" exception {"+" exception:}] + ["[0]" exception (.only exception:)] ["<>" parser ("[1]#[0]" monad) - ["<[0]>" code {"+" Parser}]]] + ["<[0]>" code (.only Parser)]]] [data ["[0]" product] - ["[0]" text {"+" \n} ("[1]#[0]" order) - ["%" format {"+" format}]] + ["[0]" text (.only \n) ("[1]#[0]" order) + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" monad mix monoid)] - ["[0]" set {"+" Set}] - ["[0]" stream {"+" Stream}]] + ["[0]" set (.only Set)] + ["[0]" stream (.only Stream)]] [format - ["md" markdown {"+" Markdown Block}]]] + ["md" markdown (.only Markdown Block)]]] ["[0]" macro - [syntax {"+" syntax:}] + [syntax (.only syntax:)] ["^" pattern] ["[0]" code] ["[0]" template]] diff --git a/stdlib/source/library/lux/extension.lux b/stdlib/source/library/lux/extension.lux index bca5494f8..a0cde2191 100644 --- a/stdlib/source/library/lux/extension.lux +++ b/stdlib/source/library/lux/extension.lux @@ -5,15 +5,15 @@ ["[0]" monad]] [control ["<>" parser ("[1]#[0]" monad) - ["<c>" code {"+" Parser}] + ["<c>" code (.only Parser)] ["<a>" analysis] ["<s>" synthesis]]] [data ["[0]" product] [collection ["[0]" list ("[1]#[0]" functor)]]] - [macro {"+" with_symbols} - [syntax {"+" syntax:}] + [macro (.only with_symbols) + [syntax (.only syntax:)] ["[0]" code]] [tool [compiler diff --git a/stdlib/source/library/lux/ffi.jvm.lux b/stdlib/source/library/lux/ffi.jvm.lux index 000d80023..344d6749b 100644 --- a/stdlib/source/library/lux/ffi.jvm.lux +++ b/stdlib/source/library/lux/ffi.jvm.lux @@ -3,33 +3,33 @@ [lux {"-" Primitive Type type int char is as} ["[0]" meta] [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["[0]" io] ["[0]" maybe] - ["[0]" try {"+" Try}] - ["[0]" exception {"+" Exception exception:}] + ["[0]" try (.only Try)] + ["[0]" exception (.only Exception exception:)] ["<>" parser ("[1]#[0]" monad) - ["<[0]>" code {"+" Parser}]]] + ["<[0]>" code (.only Parser)]]] [data ["[0]" product] ["[0]" text ("[1]#[0]" equivalence) - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" array] ["[0]" list ("[1]#[0]" monad mix monoid)] - ["[0]" dictionary {"+" Dictionary}]]] - [macro {"+" with_symbols} - [syntax {"+" syntax:}] + ["[0]" dictionary (.only Dictionary)]]] + [macro (.only with_symbols) + [syntax (.only syntax:)] ["^" pattern] ["[0]" code] ["[0]" template]] [target ["[0]" jvm "_" [encoding - ["[0]" name {"+" External}]] - ["[1]" type {"+" Type Argument Typed} - ["[0]" category {"+" Void Value' Value Return' Return Method Primitive Object Class Array Var Parameter Declaration}] + ["[0]" name (.only External)]] + ["[1]" type (.only Type Argument Typed) + ["[0]" category (.only Void Value' Value Return' Return Method Primitive Object Class Array Var Parameter Declaration)] ["[0]" box] ["[0]" descriptor] ["[0]" signature] diff --git a/stdlib/source/library/lux/ffi.lux b/stdlib/source/library/lux/ffi.lux index 577eaec98..a18793de8 100644 --- a/stdlib/source/library/lux/ffi.lux +++ b/stdlib/source/library/lux/ffi.lux @@ -4,20 +4,20 @@ ["@" target] ["[0]" meta] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" io] ["[0]" maybe ("[1]#[0]" functor)] ["<>" parser ("[1]#[0]" monad) - ["<[0]>" code {"+" Parser}]]] + ["<[0]>" code (.only Parser)]]] [data ["[0]" product] ["[0]" text ("[1]#[0]" equivalence) ["%" format]] [collection ["[0]" list ("[1]#[0]" monad mix)]]] - ["[0]" macro {"+" with_symbols} - [syntax {"+" syntax:}] + ["[0]" macro (.only with_symbols) + [syntax (.only syntax:)] ["[0]" code] ["[0]" template]] [type diff --git a/stdlib/source/library/lux/ffi.old.lux b/stdlib/source/library/lux/ffi.old.lux index e79861b38..748e8e00c 100644 --- a/stdlib/source/library/lux/ffi.old.lux +++ b/stdlib/source/library/lux/ffi.old.lux @@ -3,25 +3,25 @@ [lux {"-" is as type} ["[0]" type ("[1]#[0]" equivalence)] [abstract - ["[0]" monad {"+" Monad do}] + ["[0]" monad (.only Monad do)] ["[0]" enum]] [control ["[0]" function] ["[0]" io] ["[0]" maybe] - ["[0]" try {"+" Try}] + ["[0]" try (.only Try)] ["<>" parser - ["<[0]>" code {"+" Parser}]]] + ["<[0]>" code (.only Parser)]]] [data ["[0]" product] ["[0]" bit ("[1]#[0]" codec)] ["[0]" text ("[1]#[0]" equivalence monoid) - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection - ["[0]" array {"+" Array}] + ["[0]" array (.only Array)] ["[0]" list ("[1]#[0]" monad mix monoid)]]] - ["[0]" macro {"+" with_symbols} - [syntax {"+" syntax:}] + ["[0]" macro (.only with_symbols) + [syntax (.only syntax:)] ["^" pattern] ["[0]" code] ["[0]" template]] diff --git a/stdlib/source/library/lux/ffi.php.lux b/stdlib/source/library/lux/ffi.php.lux index bd2176adb..cb36e50e1 100644 --- a/stdlib/source/library/lux/ffi.php.lux +++ b/stdlib/source/library/lux/ffi.php.lux @@ -4,12 +4,12 @@ ["@" target] ["[0]" meta] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" io] ["[0]" maybe] ["<>" parser ("[1]#[0]" monad) - ["<[0]>" code {"+" Parser}]]] + ["<[0]>" code (.only Parser)]]] [data ["[0]" product] ["[0]" text @@ -18,8 +18,8 @@ ["[0]" list ("[1]#[0]" functor)]]] [type abstract] - [macro {"+" with_symbols} - [syntax {"+" syntax:}] + [macro (.only with_symbols) + [syntax (.only syntax:)] ["[0]" code] ["[0]" template]]]]) diff --git a/stdlib/source/library/lux/ffi.scm.lux b/stdlib/source/library/lux/ffi.scm.lux index 79b042679..7cbbc2836 100644 --- a/stdlib/source/library/lux/ffi.scm.lux +++ b/stdlib/source/library/lux/ffi.scm.lux @@ -4,22 +4,22 @@ ["@" target] ["[0]" meta] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" io] ["[0]" maybe] ["<>" parser ("[1]#[0]" monad) - ["<[0]>" code {"+" Parser}]]] + ["<[0]>" code (.only Parser)]]] [data ["[0]" product] ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" functor)]]] [type abstract] - [macro {"+" with_symbols} - [syntax {"+" syntax:}] + [macro (.only with_symbols) + [syntax (.only syntax:)] ["[0]" code] ["[0]" template]]]]) diff --git a/stdlib/source/library/lux/ffi/export.js.lux b/stdlib/source/library/lux/ffi/export.js.lux index e889ad68f..96230b5e0 100644 --- a/stdlib/source/library/lux/ffi/export.js.lux +++ b/stdlib/source/library/lux/ffi/export.js.lux @@ -1,11 +1,11 @@ (.using [library [lux "*" - [extension {"+" directive:}] + [extension (.only directive:)] ["[0]" meta] ["[0]" static] [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["<>" parser ["<[0]>" code]]] @@ -16,7 +16,7 @@ ["[0]" list ("[1]#[0]" monad mix)] ["[0]" set]]] ["[0]" macro - [syntax {"+" syntax:}] + [syntax (.only syntax:)] ["[0]" code]] [math ["[0]" random]] diff --git a/stdlib/source/library/lux/ffi/export.jvm.lux b/stdlib/source/library/lux/ffi/export.jvm.lux index ec79f469f..afafe1313 100644 --- a/stdlib/source/library/lux/ffi/export.jvm.lux +++ b/stdlib/source/library/lux/ffi/export.jvm.lux @@ -3,12 +3,12 @@ [lux {"-" function} [control ["<>" parser - ["<[0]>" code {"+" Parser}]]] + ["<[0]>" code (.only Parser)]]] [data [collection ["[0]" list ("[1]#[0]" monad)]]] [macro - [syntax {"+" syntax:}] + [syntax (.only syntax:)] ["[0]" code]]]] ["[0]" //]) diff --git a/stdlib/source/library/lux/ffi/export.lua.lux b/stdlib/source/library/lux/ffi/export.lua.lux index 86365d524..80ab44518 100644 --- a/stdlib/source/library/lux/ffi/export.lua.lux +++ b/stdlib/source/library/lux/ffi/export.lua.lux @@ -1,11 +1,11 @@ (.using [library [lux "*" - [extension {"+" directive:}] + [extension (.only directive:)] ["[0]" meta] ["[0]" static] [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["<>" parser ["<[0]>" code]]] @@ -16,7 +16,7 @@ ["[0]" list ("[1]#[0]" monad mix)] ["[0]" set]]] ["[0]" macro - [syntax {"+" syntax:}] + [syntax (.only syntax:)] ["[0]" code]] [math ["[0]" random]] diff --git a/stdlib/source/library/lux/ffi/export.py.lux b/stdlib/source/library/lux/ffi/export.py.lux index 08ef62188..fb3b6a503 100644 --- a/stdlib/source/library/lux/ffi/export.py.lux +++ b/stdlib/source/library/lux/ffi/export.py.lux @@ -1,11 +1,11 @@ (.using [library [lux "*" - [extension {"+" directive:}] + [extension (.only directive:)] ["[0]" meta] ["[0]" static] [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["<>" parser ["<[0]>" code]]] @@ -16,7 +16,7 @@ ["[0]" list ("[1]#[0]" monad mix)] ["[0]" set]]] ["[0]" macro - [syntax {"+" syntax:}] + [syntax (.only syntax:)] ["[0]" code]] [math ["[0]" random]] diff --git a/stdlib/source/library/lux/ffi/export.rb.lux b/stdlib/source/library/lux/ffi/export.rb.lux index 08f765b25..32392affe 100644 --- a/stdlib/source/library/lux/ffi/export.rb.lux +++ b/stdlib/source/library/lux/ffi/export.rb.lux @@ -1,16 +1,16 @@ (.using [library [lux {"-" global} - [extension {"+" directive:}] + [extension (.only directive:)] ["[0]" meta] ["[0]" static] ["[0]" type] [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["<>" parser ["<[0]>" code] - ["<[0]>" text {"+" Parser}]]] + ["<[0]>" text (.only Parser)]]] [data [text ["%" format]] @@ -18,7 +18,7 @@ ["[0]" list ("[1]#[0]" monad mix)] ["[0]" set]]] ["[0]" macro - [syntax {"+" syntax:}] + [syntax (.only syntax:)] ["[0]" code]] [math ["[0]" random]] diff --git a/stdlib/source/library/lux/locale.lux b/stdlib/source/library/lux/locale.lux index 6500deb55..92834611d 100644 --- a/stdlib/source/library/lux/locale.lux +++ b/stdlib/source/library/lux/locale.lux @@ -2,19 +2,19 @@ [library [lux "*" [abstract - [equivalence {"+" Equivalence}] - ["[0]" hash {"+" Hash}]] + [equivalence (.only Equivalence)] + ["[0]" hash (.only Hash)]] [control ["[0]" maybe ("[1]#[0]" functor)]] [data ["[0]" text - ["%" format {"+" format}] - ["[0]" encoding {"+" Encoding}]]] + ["%" format (.only format)] + ["[0]" encoding (.only Encoding)]]] [type [primitive "*"]]]] [/ - ["[0]" language {"+" Language}] - ["[0]" territory {"+" Territory}]]) + ["[0]" language (.only Language)] + ["[0]" territory (.only Territory)]]) (primitive: .public Locale Text diff --git a/stdlib/source/library/lux/locale/language.lux b/stdlib/source/library/lux/locale/language.lux index 3a56db5cf..8040bd560 100644 --- a/stdlib/source/library/lux/locale/language.lux +++ b/stdlib/source/library/lux/locale/language.lux @@ -2,8 +2,8 @@ [library [lux "*" [abstract - [equivalence {"+" Equivalence}] - [hash {"+" Hash}]] + [equivalence (.only Equivalence)] + [hash (.only Hash)]] [data ["[0]" text]] [type diff --git a/stdlib/source/library/lux/locale/territory.lux b/stdlib/source/library/lux/locale/territory.lux index c654d8650..64a7f4b82 100644 --- a/stdlib/source/library/lux/locale/territory.lux +++ b/stdlib/source/library/lux/locale/territory.lux @@ -2,8 +2,8 @@ [library [lux "*" [abstract - [equivalence {"+" Equivalence}] - [hash {"+" Hash}]] + [equivalence (.only Equivalence)] + [hash (.only Hash)]] [data ["[0]" text]] [type diff --git a/stdlib/source/library/lux/macro.lux b/stdlib/source/library/lux/macro.lux index f4b582ef6..0036a9256 100644 --- a/stdlib/source/library/lux/macro.lux +++ b/stdlib/source/library/lux/macro.lux @@ -2,7 +2,7 @@ [library [lux {"-" local symbol} [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [data ["[0]" text ("[1]#[0]" monoid)] [collection diff --git a/stdlib/source/library/lux/macro/code.lux b/stdlib/source/library/lux/macro/code.lux index e86024d13..9a04ecdf7 100644 --- a/stdlib/source/library/lux/macro/code.lux +++ b/stdlib/source/library/lux/macro/code.lux @@ -2,7 +2,7 @@ [library [lux {"-" nat int rev local global symbol} [abstract - [equivalence {"+" Equivalence}]] + [equivalence (.only Equivalence)]] [data ["[0]" product] ["[0]" bit] diff --git a/stdlib/source/library/lux/macro/local.lux b/stdlib/source/library/lux/macro/local.lux index f1060fed1..7a04c47f9 100644 --- a/stdlib/source/library/lux/macro/local.lux +++ b/stdlib/source/library/lux/macro/local.lux @@ -3,17 +3,17 @@ [lux "*" ["[0]" meta] [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control - ["[0]" try {"+" Try}] - ["[0]" exception {"+" exception:}]] + ["[0]" try (.only Try)] + ["[0]" exception (.only exception:)]] [data ["[0]" product] ["[0]" text] [collection ["[0]" list ("[1]#[0]" functor)] [dictionary - ["[0]" plist {"+" PList}]]]]]] + ["[0]" plist (.only PList)]]]]]] ["[0]" // ["[1][0]" code]]) diff --git a/stdlib/source/library/lux/macro/syntax.lux b/stdlib/source/library/lux/macro/syntax.lux index 2d092eaa6..50fa88376 100644 --- a/stdlib/source/library/lux/macro/syntax.lux +++ b/stdlib/source/library/lux/macro/syntax.lux @@ -3,12 +3,12 @@ [lux "*" ["[0]" meta] [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["[0]" maybe] ["[0]" try] ["<>" parser - ["</>" code {"+" Parser}]]] + ["</>" code (.only Parser)]]] [data ["[0]" text ("[1]#[0]" monoid)] [collection @@ -19,7 +19,7 @@ ["[0]" int] ["[0]" rev] ["[0]" frac]]]]] - ["[0]" // {"+" with_symbols} + ["[0]" // (.only with_symbols) ["[0]" code]] ["[0]" / "_" ["[1][0]" export]]) diff --git a/stdlib/source/library/lux/macro/syntax/check.lux b/stdlib/source/library/lux/macro/syntax/check.lux index da68a8f25..f76685bb9 100644 --- a/stdlib/source/library/lux/macro/syntax/check.lux +++ b/stdlib/source/library/lux/macro/syntax/check.lux @@ -3,12 +3,12 @@ [lux "*" ["[0]" meta] [abstract - [equivalence {"+" Equivalence}] - [monad {"+" do}]] + [equivalence (.only Equivalence)] + [monad (.only do)]] [control - ["[0]" exception {"+" exception:}] + ["[0]" exception (.only exception:)] ["<>" parser - ["<[0]>" code {"+" Parser}]]] + ["<[0]>" code (.only Parser)]]] [data ["[0]" product]] [macro diff --git a/stdlib/source/library/lux/macro/syntax/declaration.lux b/stdlib/source/library/lux/macro/syntax/declaration.lux index be174fdd5..dfc46c5d9 100644 --- a/stdlib/source/library/lux/macro/syntax/declaration.lux +++ b/stdlib/source/library/lux/macro/syntax/declaration.lux @@ -2,10 +2,10 @@ [library [lux "*" [abstract - [equivalence {"+" Equivalence}]] + [equivalence (.only Equivalence)]] [control ["<>" parser ("[1]#[0]" monad) - ["<[0]>" code {"+" Parser}]]] + ["<[0]>" code (.only Parser)]]] [data ["[0]" product] ["[0]" text] diff --git a/stdlib/source/library/lux/macro/syntax/definition.lux b/stdlib/source/library/lux/macro/syntax/definition.lux index 47b419339..99ef6b848 100644 --- a/stdlib/source/library/lux/macro/syntax/definition.lux +++ b/stdlib/source/library/lux/macro/syntax/definition.lux @@ -2,12 +2,12 @@ [library [lux {"-" Definition} [abstract - [equivalence {"+" Equivalence}] - [monad {"+" do}]] + [equivalence (.only Equivalence)] + [monad (.only do)]] [control - ["[0]" exception {"+" exception:}] + ["[0]" exception (.only exception:)] ["<>" parser - ["<[0]>" code {"+" Parser}]]] + ["<[0]>" code (.only Parser)]]] [data ["[0]" sum] ["[0]" product] @@ -21,7 +21,7 @@ ["[0]" meta ["[0]" location]]]] ["[0]" // - ["[1][0]" check {"+" Check}]]) + ["[1][0]" check (.only Check)]]) (type: .public Definition (Record diff --git a/stdlib/source/library/lux/macro/syntax/export.lux b/stdlib/source/library/lux/macro/syntax/export.lux index 5a75b096c..bd0608085 100644 --- a/stdlib/source/library/lux/macro/syntax/export.lux +++ b/stdlib/source/library/lux/macro/syntax/export.lux @@ -2,10 +2,10 @@ [library [lux "*" [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["<>" parser - ["<[0]>" code {"+" Parser}]]] + ["<[0]>" code (.only Parser)]]] [macro ["^" pattern]]]]) diff --git a/stdlib/source/library/lux/macro/syntax/input.lux b/stdlib/source/library/lux/macro/syntax/input.lux index 9e66ad43e..e8b9269e8 100644 --- a/stdlib/source/library/lux/macro/syntax/input.lux +++ b/stdlib/source/library/lux/macro/syntax/input.lux @@ -2,10 +2,10 @@ [library [lux "*" [abstract - [equivalence {"+" Equivalence}]] + [equivalence (.only Equivalence)]] [control ["<>" parser - ["<[0]>" code {"+" Parser}]]] + ["<[0]>" code (.only Parser)]]] [data ["[0]" product] [collection diff --git a/stdlib/source/library/lux/macro/syntax/type/variable.lux b/stdlib/source/library/lux/macro/syntax/type/variable.lux index 88dbd1be4..7036912b2 100644 --- a/stdlib/source/library/lux/macro/syntax/type/variable.lux +++ b/stdlib/source/library/lux/macro/syntax/type/variable.lux @@ -1,15 +1,15 @@ (.using - [library - [lux "*" - [abstract - [equivalence {"+" Equivalence}]] - [control - [parser - ["<[0]>" code {"+" Parser}]]] - [data - ["[0]" text]] - [macro - ["[0]" code]]]]) + [library + [lux "*" + [abstract + [equivalence (.only Equivalence)]] + [control + [parser + ["<[0]>" code (.only Parser)]]] + [data + ["[0]" text]] + [macro + ["[0]" code]]]]) (type: .public Variable Text) diff --git a/stdlib/source/library/lux/macro/template.lux b/stdlib/source/library/lux/macro/template.lux index e866798bb..b87db87bf 100644 --- a/stdlib/source/library/lux/macro/template.lux +++ b/stdlib/source/library/lux/macro/template.lux @@ -3,18 +3,18 @@ [lux {"-" let local macro symbol} ["[0]" meta] [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control - ["[0]" try {"+" Try}] - ["[0]" exception {"+" exception:}] + ["[0]" try (.only Try)] + ["[0]" exception (.only exception:)] ["<>" parser ("[1]#[0]" functor) - ["<[0]>" code {"+" Parser}]]] + ["<[0]>" code (.only Parser)]]] [data ["[0]" bit ("[1]#[0]" codec)] ["[0]" text] [collection ["[0]" list ("[1]#[0]" monad)] - ["[0]" dictionary {"+" Dictionary}]]] + ["[0]" dictionary (.only Dictionary)]]] [macro ["^" pattern]] [math @@ -24,7 +24,7 @@ ["[0]" rev ("[1]#[0]" decimal)] ["[0]" frac ("[1]#[0]" decimal)]]]]] ["[0]" // - [syntax {"+" syntax:}] + [syntax (.only syntax:)] ["[0]" code] ["[0]" local]]) diff --git a/stdlib/source/library/lux/math.lux b/stdlib/source/library/lux/math.lux index c7683c120..05d296fca 100644 --- a/stdlib/source/library/lux/math.lux +++ b/stdlib/source/library/lux/math.lux @@ -1,14 +1,14 @@ (.using [library [lux "*" - [extension {"+" analysis:}] + [extension (.only analysis:)] ["@" target] ["[0]" static] [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control - ["[0]" try {"+" Try}] - ["[0]" exception {"+" exception:}] + ["[0]" try (.only Try)] + ["[0]" exception (.only exception:)] ["<>" parser ["<[0]>" code]]] [data @@ -17,17 +17,17 @@ [collection ["[0]" list ("[1]#[0]" mix)]]] [macro - [syntax {"+" syntax:}] + [syntax (.only syntax:)] ["[0]" template]] [tool [compiler ["[0]" phase ("[1]#[0]" monad)] [language [lux - ["[0]" analysis {"+" Analysis Operation Phase} + ["[0]" analysis (.only Analysis Operation Phase) ["[0]" type]]]] [meta - [archive {"+" Archive}]]]] + [archive (.only Archive)]]]] [type ["[0]" check]]]] [/ @@ -37,8 +37,8 @@ ["[0]" int] ["[0]" rev] ["[0]" frac] - ["[0]" ratio {"+" Ratio}] - ["[0]" complex {"+" Complex}]]]) + ["[0]" ratio (.only Ratio)] + ["[0]" complex (.only Complex)]]]) (exception: (no_arithmetic_for [type Type]) (exception.report diff --git a/stdlib/source/library/lux/math/infix.lux b/stdlib/source/library/lux/math/infix.lux index c7dd7efa5..c71f860a3 100644 --- a/stdlib/source/library/lux/math/infix.lux +++ b/stdlib/source/library/lux/math/infix.lux @@ -2,16 +2,16 @@ [library [lux "*" [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["<>" parser ("[1]#[0]" functor) - ["<[0]>" code {"+" Parser}]]] + ["<[0]>" code (.only Parser)]]] [data ["[0]" product] [collection ["[0]" list ("[1]#[0]" mix)]]] [macro - [syntax {"+" syntax:}] + [syntax (.only syntax:)] ["[0]" code]] [math [number diff --git a/stdlib/source/library/lux/math/logic/continuous.lux b/stdlib/source/library/lux/math/logic/continuous.lux index 695e9543e..0237f4226 100644 --- a/stdlib/source/library/lux/math/logic/continuous.lux +++ b/stdlib/source/library/lux/math/logic/continuous.lux @@ -1,12 +1,12 @@ ... https://en.wikipedia.org/wiki/Many-valued_logic (.using - [library - [lux {"-" false true or and not} - [abstract - [monoid {"+" Monoid}]] - [math - [number - ["/" rev ("[1]#[0]" interval)]]]]]) + [library + [lux {"-" false true or and not} + [abstract + [monoid (.only Monoid)]] + [math + [number + ["/" rev ("[1]#[0]" interval)]]]]]) (def: .public false Rev /#bottom) (def: .public true Rev /#top) diff --git a/stdlib/source/library/lux/math/logic/fuzzy.lux b/stdlib/source/library/lux/math/logic/fuzzy.lux index 01f9f02cf..a7cc01305 100644 --- a/stdlib/source/library/lux/math/logic/fuzzy.lux +++ b/stdlib/source/library/lux/math/logic/fuzzy.lux @@ -1,20 +1,20 @@ ... https://en.wikipedia.org/wiki/Fuzzy_logic (.using - [library - [lux "*" - [abstract - [predicate {"+" Predicate}] - [functor - ["[0]" contravariant]]] - [data - [collection - ["[0]" list] - ["[0]" set {"+" Set}]]] - [math - [number - ["/" rev]]]]] - ["[0]" // "_" - ["[1]" continuous]]) + [library + [lux "*" + [abstract + [predicate (.only Predicate)] + [functor + ["[0]" contravariant]]] + [data + [collection + ["[0]" list] + ["[0]" set (.only Set)]]] + [math + [number + ["/" rev]]]]] + ["[0]" // "_" + ["[1]" continuous]]) (type: .public (Fuzzy a) (-> a Rev)) diff --git a/stdlib/source/library/lux/math/modular.lux b/stdlib/source/library/lux/math/modular.lux index 4de567862..4eaeede5a 100644 --- a/stdlib/source/library/lux/math/modular.lux +++ b/stdlib/source/library/lux/math/modular.lux @@ -2,22 +2,22 @@ [library [lux "*" [abstract - [equivalence {"+" Equivalence}] - [order {"+" Order}] - [monoid {"+" Monoid}] - [codec {"+" Codec}] - [monad {"+" do}]] + [equivalence (.only Equivalence)] + [order (.only Order)] + [monoid (.only Monoid)] + [codec (.only Codec)] + [monad (.only do)]] [control - ["[0]" try {"+" Try}] - ["[0]" exception {"+" exception:}] + ["[0]" try (.only Try)] + ["[0]" exception (.only exception:)] ["<>" parser - ["<[0]>" text {"+" Parser}] + ["<[0]>" text (.only Parser)] ["<[0]>" code]]] [data ["[0]" product] ["[0]" text ("[1]#[0]" monoid)]] [macro - [syntax {"+" syntax:}] + [syntax (.only syntax:)] ["[0]" code]] [math [number @@ -25,7 +25,7 @@ [type [primitive "*"]]]] ["[0]" // "_" - ["[1]" modulus {"+" Modulus}]]) + ["[1]" modulus (.only Modulus)]]) (primitive: .public (Mod m) (Record diff --git a/stdlib/source/library/lux/math/modulus.lux b/stdlib/source/library/lux/math/modulus.lux index f7f0ac6c1..74d829dc5 100644 --- a/stdlib/source/library/lux/math/modulus.lux +++ b/stdlib/source/library/lux/math/modulus.lux @@ -3,14 +3,14 @@ [lux "*" ["[0]" meta] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control - ["[0]" try {"+" Try}] - ["[0]" exception {"+" exception:}] + ["[0]" try (.only Try)] + ["[0]" exception (.only exception:)] [parser ["<[0]>" code]]] [macro - [syntax {"+" syntax:}] + [syntax (.only syntax:)] ["[0]" code]] [math [number diff --git a/stdlib/source/library/lux/math/number.lux b/stdlib/source/library/lux/math/number.lux index d28d6a90c..9be5bd456 100644 --- a/stdlib/source/library/lux/math/number.lux +++ b/stdlib/source/library/lux/math/number.lux @@ -2,9 +2,9 @@ [library [lux "*" [abstract - [codec {"+" Codec}]] + [codec (.only Codec)]] [control - ["[0]" try {"+" Try}]] + ["[0]" try (.only Try)]] [data ["[0]" text]] [macro diff --git a/stdlib/source/library/lux/math/number/complex.lux b/stdlib/source/library/lux/math/number/complex.lux index 7f44439d0..ef1774e93 100644 --- a/stdlib/source/library/lux/math/number/complex.lux +++ b/stdlib/source/library/lux/math/number/complex.lux @@ -2,7 +2,7 @@ [library [lux "*" [abstract - [equivalence {"+" Equivalence}]] + [equivalence (.only Equivalence)]] [control ["[0]" maybe] ["<>" parser @@ -11,7 +11,7 @@ [collection ["[0]" list ("[1]#[0]" functor)]]] [macro - [syntax {"+" syntax:}]] + [syntax (.only syntax:)]] [math [number ["f" frac] diff --git a/stdlib/source/library/lux/math/number/frac.lux b/stdlib/source/library/lux/math/number/frac.lux index 14f6c9746..21e67e98b 100644 --- a/stdlib/source/library/lux/math/number/frac.lux +++ b/stdlib/source/library/lux/math/number/frac.lux @@ -3,16 +3,16 @@ [lux {"-" nat int rev} ["@" target] [abstract - [hash {"+" Hash}] - [monoid {"+" Monoid}] - [equivalence {"+" Equivalence}] - [codec {"+" Codec}] - [predicate {"+" Predicate}] - [order {"+" Order}] - [monad {"+" do}]] + [hash (.only Hash)] + [monoid (.only Monoid)] + [equivalence (.only Equivalence)] + [codec (.only Codec)] + [predicate (.only Predicate)] + [order (.only Order)] + [monad (.only do)]] [control ["[0]" maybe] - ["[0]" try {"+" Try}]] + ["[0]" try (.only Try)]] [data ["[0]" text]] [macro diff --git a/stdlib/source/library/lux/math/number/i16.lux b/stdlib/source/library/lux/math/number/i16.lux index a349e58d2..c9e2b4791 100644 --- a/stdlib/source/library/lux/math/number/i16.lux +++ b/stdlib/source/library/lux/math/number/i16.lux @@ -2,12 +2,12 @@ [library [lux {"-" i64} [abstract - [equivalence {"+" Equivalence}]] + [equivalence (.only Equivalence)]] [control ["[0]" maybe]] - [type {"+" by_example}]]] + [type (.only by_example)]]] [// - ["[0]" i64 {"+" Sub}]]) + ["[0]" i64 (.only Sub)]]) (def: sub (maybe.trusted (i64.sub 16))) diff --git a/stdlib/source/library/lux/math/number/i32.lux b/stdlib/source/library/lux/math/number/i32.lux index 5d6d7e915..589174068 100644 --- a/stdlib/source/library/lux/math/number/i32.lux +++ b/stdlib/source/library/lux/math/number/i32.lux @@ -1,13 +1,13 @@ (.using [library [lux {"-" i64} - [type {"+" by_example}] + [type (.only by_example)] [abstract - [equivalence {"+" Equivalence}]] + [equivalence (.only Equivalence)]] [control ["[0]" maybe]]]] [// - ["[0]" i64 {"+" Sub}]]) + ["[0]" i64 (.only Sub)]]) (def: sub ... TODO: Stop needing this coercion. diff --git a/stdlib/source/library/lux/math/number/i64.lux b/stdlib/source/library/lux/math/number/i64.lux index 430127b4b..4bc5c18a6 100644 --- a/stdlib/source/library/lux/math/number/i64.lux +++ b/stdlib/source/library/lux/math/number/i64.lux @@ -2,9 +2,9 @@ [library [lux {"-" and or not false true} [abstract - [equivalence {"+" Equivalence}] - [hash {"+" Hash}] - [monoid {"+" Monoid}]] + [equivalence (.only Equivalence)] + [hash (.only Hash)] + [monoid (.only Monoid)]] [control ["[0]" try]]]] [// diff --git a/stdlib/source/library/lux/math/number/i8.lux b/stdlib/source/library/lux/math/number/i8.lux index 942c1f222..5e51d3d28 100644 --- a/stdlib/source/library/lux/math/number/i8.lux +++ b/stdlib/source/library/lux/math/number/i8.lux @@ -1,13 +1,13 @@ (.using [library [lux {"-" i64} - [type {"+" by_example}] + [type (.only by_example)] [abstract - [equivalence {"+" Equivalence}]] + [equivalence (.only Equivalence)]] [control ["[0]" maybe]]]] [// - ["[0]" i64 {"+" Sub}]]) + ["[0]" i64 (.only Sub)]]) (def: sub (maybe.trusted (i64.sub 8))) diff --git a/stdlib/source/library/lux/math/number/int.lux b/stdlib/source/library/lux/math/number/int.lux index f03646def..aaeda1d5c 100644 --- a/stdlib/source/library/lux/math/number/int.lux +++ b/stdlib/source/library/lux/math/number/int.lux @@ -2,19 +2,19 @@ [library [lux "*" [abstract - [hash {"+" Hash}] - [enum {"+" Enum}] - [interval {"+" Interval}] - [monoid {"+" Monoid}] - [equivalence {"+" Equivalence}] - [codec {"+" Codec}] - [predicate {"+" Predicate}] - ["[0]" order {"+" Order}]] + [hash (.only Hash)] + [enum (.only Enum)] + [interval (.only Interval)] + [monoid (.only Monoid)] + [equivalence (.only Equivalence)] + [codec (.only Codec)] + [predicate (.only Predicate)] + ["[0]" order (.only Order)]] [control ["[0]" maybe] - ["[0]" try {"+" Try}]] + ["[0]" try (.only Try)]] [data - [text {"+" Char}]] + [text (.only Char)]] [macro ["^" pattern]]]] ["[0]" // "_" diff --git a/stdlib/source/library/lux/math/number/nat.lux b/stdlib/source/library/lux/math/number/nat.lux index 2f570c7c2..cf07e87e9 100644 --- a/stdlib/source/library/lux/math/number/nat.lux +++ b/stdlib/source/library/lux/math/number/nat.lux @@ -2,17 +2,17 @@ [library [lux "*" [abstract - [hash {"+" Hash}] - [enum {"+" Enum}] - [interval {"+" Interval}] - [monoid {"+" Monoid}] - [equivalence {"+" Equivalence}] - [codec {"+" Codec}] - ["[0]" order {"+" Order}]] + [hash (.only Hash)] + [enum (.only Enum)] + [interval (.only Interval)] + [monoid (.only Monoid)] + [equivalence (.only Equivalence)] + [codec (.only Codec)] + ["[0]" order (.only Order)]] [control ["[0]" function] ["[0]" maybe] - ["[0]" try {"+" Try}]] + ["[0]" try (.only Try)]] [macro ["^" pattern]]]]) diff --git a/stdlib/source/library/lux/math/number/ratio.lux b/stdlib/source/library/lux/math/number/ratio.lux index 5af8853ad..9b0b30b44 100644 --- a/stdlib/source/library/lux/math/number/ratio.lux +++ b/stdlib/source/library/lux/math/number/ratio.lux @@ -2,22 +2,22 @@ [library [lux {"-" nat} [abstract - [equivalence {"+" Equivalence}] - [order {"+" Order}] - [monoid {"+" Monoid}] - [codec {"+" Codec}] - [monad {"+" do}]] + [equivalence (.only Equivalence)] + [order (.only Order)] + [monoid (.only Monoid)] + [codec (.only Codec)] + [monad (.only do)]] [control ["[0]" function] ["[0]" maybe] ["[0]" try] ["<>" parser - ["<[0]>" code {"+" Parser}]]] + ["<[0]>" code (.only Parser)]]] [data ["[0]" product] ["[0]" text ("[1]#[0]" monoid)]] [macro - [syntax {"+" syntax:}] + [syntax (.only syntax:)] ["[0]" code]]]] [// ["n" nat ("[1]#[0]" decimal)]]) diff --git a/stdlib/source/library/lux/math/number/rev.lux b/stdlib/source/library/lux/math/number/rev.lux index e6154d42f..510f90953 100644 --- a/stdlib/source/library/lux/math/number/rev.lux +++ b/stdlib/source/library/lux/math/number/rev.lux @@ -2,19 +2,19 @@ [library [lux "*" [abstract - [hash {"+" Hash}] - [enum {"+" Enum}] - [interval {"+" Interval}] - [monoid {"+" Monoid}] - [equivalence {"+" Equivalence}] - [codec {"+" Codec}] - [order {"+" Order}]] + [hash (.only Hash)] + [enum (.only Enum)] + [interval (.only Interval)] + [monoid (.only Monoid)] + [equivalence (.only Equivalence)] + [codec (.only Codec)] + [order (.only Order)]] [control ["[0]" maybe] ["[0]" try]] [data [collection - ["[0]" array {"+" Array}]]]]] + ["[0]" array (.only Array)]]]]] ["[0]" // "_" ["[1][0]" i64] ["[1][0]" nat] diff --git a/stdlib/source/library/lux/math/random.lux b/stdlib/source/library/lux/math/random.lux index 09f72d4bf..22eaf64b3 100644 --- a/stdlib/source/library/lux/math/random.lux +++ b/stdlib/source/library/lux/math/random.lux @@ -1,41 +1,41 @@ (.using [library - [lux {"-" or and list i64 nat int rev char} + [lux {"-" or and list i64 nat int rev char only} [abstract - [hash {"+" Hash}] - [functor {"+" Functor}] - [apply {"+" Apply}] - ["[0]" monad {"+" Monad do}]] + [hash (.only Hash)] + [functor (.only Functor)] + [apply (.only Apply)] + ["[0]" monad (.only Monad do)]] [data - ["[0]" text {"+" Char} ("[1]#[0]" monoid) + ["[0]" text (.only Char) ("[1]#[0]" monoid) ["[0]" unicode "_" ["[1]" set]]] [collection ["[0]" list ("[1]#[0]" mix)] - ["[0]" array {"+" Array}] - ["[0]" dictionary {"+" Dictionary}] - ["[0]" queue {"+" Queue}] - ["[0]" set {"+" Set}] - ["[0]" stack {"+" Stack}] - ["[0]" sequence {"+" Sequence}] + ["[0]" array (.only Array)] + ["[0]" dictionary (.only Dictionary)] + ["[0]" queue (.only Queue)] + ["[0]" set (.only Set)] + ["[0]" stack (.only Stack)] + ["[0]" sequence (.only Sequence)] [tree - ["[0]" finger {"+" Tree}]]]] + ["[0]" finger (.only Tree)]]]] [math - [number {"+" hex} + [number (.only hex) ["n" nat] ["i" int] ["f" frac] ["r" ratio] ["c" complex] ["[0]" i64]]] - ["[0]" time {"+" Time} - ["[0]" instant {"+" Instant}] - ["[0]" date {"+" Date}] - ["[0]" duration {"+" Duration}] - ["[0]" month {"+" Month}] - ["[0]" day {"+" Day}]] + ["[0]" time (.only Time) + ["[0]" instant (.only Instant)] + ["[0]" date (.only Date)] + ["[0]" duration (.only Duration)] + ["[0]" month (.only Month)] + ["[0]" day (.only Day)]] [type - [refinement {"+" Refiner Refined}]]]]) + [refinement (.only Refiner Refined)]]]]) (type: .public PRNG (Rec PRNG diff --git a/stdlib/source/library/lux/meta.lux b/stdlib/source/library/lux/meta.lux index 3f6c82f27..065cd79eb 100644 --- a/stdlib/source/library/lux/meta.lux +++ b/stdlib/source/library/lux/meta.lux @@ -2,12 +2,12 @@ [library [lux {"-" type macro try} [abstract - [functor {"+" Functor}] - [apply {"+" Apply}] - ["[0]" monad {"+" Monad do}]] + [functor (.only Functor)] + [apply (.only Apply)] + ["[0]" monad (.only Monad do)]] [control ["[0]" maybe] - ["[0]" try {"+" Try}]] + ["[0]" try (.only Try)]] [data ["[0]" product] ["[0]" text ("[1]#[0]" monoid order)] diff --git a/stdlib/source/library/lux/meta/configuration.lux b/stdlib/source/library/lux/meta/configuration.lux index 54bb66630..a85c15674 100644 --- a/stdlib/source/library/lux/meta/configuration.lux +++ b/stdlib/source/library/lux/meta/configuration.lux @@ -3,14 +3,14 @@ [lux {"-" for} ["[0]" meta] [abstract - [equivalence {"+" Equivalence}] - [monoid {"+" Monoid}] - [monad {"+" do}]] + [equivalence (.only Equivalence)] + [monoid (.only Monoid)] + [monad (.only do)]] [control ["[0]" maybe ("[1]#[0]" functor)] - ["[0]" exception {"+" exception:}] + ["[0]" exception (.only exception:)] ["<>" parser - ["<[0]>" text {"+" Parser}] + ["<[0]>" text (.only Parser)] ["<[0]>" code]]] [data ["[0]" text ("[1]#[0]" equivalence) @@ -20,10 +20,10 @@ [dictionary ["/" plist]]]] [macro - [syntax {"+" syntax:}] + [syntax (.only syntax:)] ["[0]" code]] [math - [number {"+" hex}]]]]) + [number (.only hex)]]]]) (type: .public Configuration (/.PList Text)) diff --git a/stdlib/source/library/lux/meta/location.lux b/stdlib/source/library/lux/meta/location.lux index 13bb059d3..8f1b56e69 100644 --- a/stdlib/source/library/lux/meta/location.lux +++ b/stdlib/source/library/lux/meta/location.lux @@ -2,7 +2,7 @@ [library [lux "*" [abstract - [equivalence {"+" Equivalence}]]]]) + [equivalence (.only Equivalence)]]]]) (implementation: .public equivalence (Equivalence Location) diff --git a/stdlib/source/library/lux/meta/symbol.lux b/stdlib/source/library/lux/meta/symbol.lux index 15e96c352..d4a133217 100644 --- a/stdlib/source/library/lux/meta/symbol.lux +++ b/stdlib/source/library/lux/meta/symbol.lux @@ -2,10 +2,10 @@ [library [lux "*" [abstract - [equivalence {"+" Equivalence}] - [hash {"+" Hash}] - [order {"+" Order}] - [codec {"+" Codec}]] + [equivalence (.only Equivalence)] + [hash (.only Hash)] + [order (.only Order)] + [codec (.only Codec)]] [data ["[0]" text ("[1]#[0]" equivalence monoid)] ["[0]" product]]]]) diff --git a/stdlib/source/library/lux/meta/version.lux b/stdlib/source/library/lux/meta/version.lux index b2a9f8784..bd34c1f06 100644 --- a/stdlib/source/library/lux/meta/version.lux +++ b/stdlib/source/library/lux/meta/version.lux @@ -3,9 +3,9 @@ [lux {"-" for} ["[0]" meta] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control - ["[0]" exception {"+" exception:}] + ["[0]" exception (.only exception:)] ["<>" parser ["<[0]>" code]]] [data @@ -13,11 +13,11 @@ [collection ["[0]" list ("[1]#[0]" mix)]]] [macro - [syntax {"+" syntax:}] + [syntax (.only syntax:)] ["[0]" code]] [tool [compiler - [version {"+" Version}]]]]]) + [version (.only Version)]]]]]) (def: .public latest Version diff --git a/stdlib/source/library/lux/program.lux b/stdlib/source/library/lux/program.lux index c4a3b34a4..3f88d5de3 100644 --- a/stdlib/source/library/lux/program.lux +++ b/stdlib/source/library/lux/program.lux @@ -3,7 +3,7 @@ [lux "*" ["@" target] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" io] [concurrency @@ -11,8 +11,8 @@ ["<>" parser ["<[0]>" code] ["<[0]>" cli]]] - [macro {"+" with_symbols} - [syntax {"+" syntax:}] + [macro (.only with_symbols) + [syntax (.only syntax:)] ["[0]" code]]]]) (type: Arguments diff --git a/stdlib/source/library/lux/static.lux b/stdlib/source/library/lux/static.lux index 3f1e535ad..dd49631a8 100644 --- a/stdlib/source/library/lux/static.lux +++ b/stdlib/source/library/lux/static.lux @@ -3,7 +3,7 @@ [lux {"-" nat int rev if cond} ["[0]" meta ("[1]#[0]" functor)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["<>" parser ["<[0]>" code]]] @@ -11,11 +11,11 @@ [collection ["[0]" list ("[1]#[0]" functor mix)]]] [macro - [syntax {"+" syntax:}] + [syntax (.only syntax:)] ["[0]" code]] [math - [number {"+" hex}] - ["[0]" random {"+" Random}]]]]) + [number (.only hex)] + ["[0]" random (.only Random)]]]]) (template [<name> <type> <format>] [(syntax: .public (<name> [expression <code>.any]) diff --git a/stdlib/source/library/lux/target/common_lisp.lux b/stdlib/source/library/lux/target/common_lisp.lux index d410458f4..ba06dc2fc 100644 --- a/stdlib/source/library/lux/target/common_lisp.lux +++ b/stdlib/source/library/lux/target/common_lisp.lux @@ -5,7 +5,7 @@ ["[0]" pipe]] [data ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" monad monoid)]]] [macro diff --git a/stdlib/source/library/lux/target/js.lux b/stdlib/source/library/lux/target/js.lux index 45d84ba99..8bb3c766b 100644 --- a/stdlib/source/library/lux/target/js.lux +++ b/stdlib/source/library/lux/target/js.lux @@ -5,7 +5,7 @@ ["[0]" pipe]] [data ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" functor mix)]]] [macro diff --git a/stdlib/source/library/lux/target/jvm.lux b/stdlib/source/library/lux/target/jvm.lux index 6233c158e..f97654aa9 100644 --- a/stdlib/source/library/lux/target/jvm.lux +++ b/stdlib/source/library/lux/target/jvm.lux @@ -1,13 +1,13 @@ (.using - [library - [lux {"-" Type Primitive Label} - [data - [collection - [sequence {"+" Sequence}]]] - [target - [jvm - [type {"+" Type} - ["[0]" category {"+" Primitive Class Value Method}]]]]]]) + [library + [lux {"-" Type Primitive Label} + [data + [collection + [sequence (.only Sequence)]]] + [target + [jvm + [type (.only Type) + ["[0]" category (.only Primitive Class Value Method)]]]]]]) (type: .public Literal (Variant diff --git a/stdlib/source/library/lux/target/jvm/attribute.lux b/stdlib/source/library/lux/target/jvm/attribute.lux index c59e77236..99b139fb9 100644 --- a/stdlib/source/library/lux/target/jvm/attribute.lux +++ b/stdlib/source/library/lux/target/jvm/attribute.lux @@ -2,31 +2,31 @@ [library [lux {"-" Info Code Type} [abstract - [monad {"+" do}] - ["[0]" equivalence {"+" Equivalence}]] + [monad (.only do)] + ["[0]" equivalence (.only Equivalence)]] [control ["[0]" try] - ["[0]" exception {"+" exception:}]] + ["[0]" exception (.only exception:)]] [data ["[0]" sum] ["[0]" product] [format - ["[0]F" binary {"+" Writer}]]] + ["[0]F" binary (.only Writer)]]] [macro ["^" pattern]] [math [number ["n" nat]]]]] ["[0]" // "_" - ["[1][0]" index {"+" Index}] - ["[1][0]" type {"+" Type} - ["[2][0]" signature {"+" Signature}]] + ["[1][0]" index (.only Index)] + ["[1][0]" type (.only Type) + ["[2][0]" signature (.only Signature)]] [encoding - ["[1][0]" unsigned {"+" U2 U4}]] - ["[1][0]" constant {"+" UTF8 Class Value} - ["[2][0]" pool {"+" Pool Resource} ("[1]#[0]" monad)]]] + ["[1][0]" unsigned (.only U2 U4)]] + ["[1][0]" constant (.only UTF8 Class Value) + ["[2][0]" pool (.only Pool Resource) ("[1]#[0]" monad)]]] ["[0]" / "_" - ["[1][0]" constant {"+" Constant}] + ["[1][0]" constant (.only Constant)] ["[1][0]" code]]) (type: .public (Info about) diff --git a/stdlib/source/library/lux/target/jvm/attribute/code.lux b/stdlib/source/library/lux/target/jvm/attribute/code.lux index 5d2ed4879..dc03412d7 100644 --- a/stdlib/source/library/lux/target/jvm/attribute/code.lux +++ b/stdlib/source/library/lux/target/jvm/attribute/code.lux @@ -2,25 +2,25 @@ [library [lux {"-" Code} [abstract - [equivalence {"+" Equivalence}]] + [equivalence (.only Equivalence)]] [data ["[0]" product] - ["[0]" binary {"+" Binary}] + ["[0]" binary (.only Binary)] [format - ["[0]F" binary {"+" Writer} ("[1]#[0]" monoid)]] + ["[0]F" binary (.only Writer) ("[1]#[0]" monoid)]] [collection - ["[0]" sequence {"+" Sequence} ("[1]#[0]" functor mix)]]] + ["[0]" sequence (.only Sequence) ("[1]#[0]" functor mix)]]] [math [number ["n" nat]]]]] ["[0]" /// "_" [bytecode [environment - ["[1][0]" limit {"+" Limit}]]] + ["[1][0]" limit (.only Limit)]]] [encoding - ["[1][0]" unsigned {"+" U2}]]] + ["[1][0]" unsigned (.only U2)]]] ["[0]" / "_" - ["[1][0]" exception {"+" Exception}]]) + ["[1][0]" exception (.only Exception)]]) (type: .public (Code Attribute) (Record diff --git a/stdlib/source/library/lux/target/jvm/attribute/code/exception.lux b/stdlib/source/library/lux/target/jvm/attribute/code/exception.lux index 649049e0b..2f56e40be 100644 --- a/stdlib/source/library/lux/target/jvm/attribute/code/exception.lux +++ b/stdlib/source/library/lux/target/jvm/attribute/code/exception.lux @@ -2,22 +2,22 @@ [library [lux "*" [abstract - [equivalence {"+" Equivalence}]] + [equivalence (.only Equivalence)]] [data ["[0]" product] ["[0]" format "_" - ["[1]" binary {"+" Writer}]]] + ["[1]" binary (.only Writer)]]] [math [number ["n" nat]]]]] ["[0]" // "_" ["//[1]" /// "_" - [constant {"+" Class}] - ["[1][0]" index {"+" Index}] + [constant (.only Class)] + ["[1][0]" index (.only Index)] [bytecode - ["[1][0]" address {"+" Address}]] + ["[1][0]" address (.only Address)]] [encoding - ["[1][0]" unsigned {"+" U2}]]]]) + ["[1][0]" unsigned (.only U2)]]]]) (type: .public Exception (Record diff --git a/stdlib/source/library/lux/target/jvm/attribute/constant.lux b/stdlib/source/library/lux/target/jvm/attribute/constant.lux index ae7788385..b4ba21594 100644 --- a/stdlib/source/library/lux/target/jvm/attribute/constant.lux +++ b/stdlib/source/library/lux/target/jvm/attribute/constant.lux @@ -1,16 +1,16 @@ (.using - [library - [lux "*" - [abstract - [equivalence {"+" Equivalence}]] - [data - [format - [binary {"+" Writer}]]]]] - ["[0]" /// "_" - [constant {"+" Value}] - ["[1][0]" index {"+" Index}] - [encoding - ["[1][0]" unsigned {"+" U2 U4}]]]) + [library + [lux "*" + [abstract + [equivalence (.only Equivalence)]] + [data + [format + [binary (.only Writer)]]]]] + ["[0]" /// "_" + [constant (.only Value)] + ["[1][0]" index (.only Index)] + [encoding + ["[1][0]" unsigned (.only U2 U4)]]]) (type: .public (Constant a) (Index (Value a))) diff --git a/stdlib/source/library/lux/target/jvm/bytecode.lux b/stdlib/source/library/lux/target/jvm/bytecode.lux index d6de25632..0202791f1 100644 --- a/stdlib/source/library/lux/target/jvm/bytecode.lux +++ b/stdlib/source/library/lux/target/jvm/bytecode.lux @@ -1,25 +1,25 @@ (.using [library [lux {"-" Type Label int try} - ["[0]" ffi {"+" import:}] + ["[0]" ffi (.only import:)] [abstract - [monoid {"+" Monoid}] - [functor {"+" Functor}] - ["[0]" monad {"+" Monad do}]] + [monoid (.only Monoid)] + [functor (.only Functor)] + ["[0]" monad (.only Monad do)]] [control - ["[0]" writer {"+" Writer}] - ["[0]" state {"+" +State}] + ["[0]" writer (.only Writer)] + ["[0]" state (.only +State)] ["[0]" maybe] - ["[0]" try {"+" Try} ("[1]#[0]" monad)] - ["[0]" exception {"+" exception:}]] + ["[0]" try (.only Try) ("[1]#[0]" monad)] + ["[0]" exception (.only exception:)]] [data ["[0]" product] [text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" functor mix)] - ["[0]" dictionary {"+" Dictionary}] - ["[0]" sequence {"+" Sequence}]]] + ["[0]" dictionary (.only Dictionary)] + ["[0]" sequence (.only Sequence)]]] [macro ["^" pattern] ["[0]" template]] @@ -27,28 +27,28 @@ [number ["n" nat] ["i" int] - ["[0]" i32 {"+" I32}]]]]] + ["[0]" i32 (.only I32)]]]]] ["[0]" / "_" - ["[1][0]" address {"+" Address}] - ["[1][0]" jump {"+" Jump Big_Jump}] - ["_" instruction {"+" Primitive_Array_Type Instruction Estimator} ("[1]#[0]" monoid)] - ["[1][0]" environment {"+" Environment} + ["[1][0]" address (.only Address)] + ["[1][0]" jump (.only Jump Big_Jump)] + ["_" instruction (.only Primitive_Array_Type Instruction Estimator) ("[1]#[0]" monoid)] + ["[1][0]" environment (.only Environment) [limit - ["/[0]" registry {"+" Register Registry}] - ["/[0]" stack {"+" Stack}]]] + ["/[0]" registry (.only Register Registry)] + ["/[0]" stack (.only Stack)]]] ["/[1]" // "_" - ["[1][0]" index {"+" Index}] + ["[1][0]" index (.only Index)] [encoding ["[1][0]" name] - ["[1][0]" unsigned {"+" U1 U2}] - ["[1][0]" signed {"+" S1 S2 S4}]] - ["[1][0]" constant {"+" UTF8} - ["[1]/[0]" pool {"+" Pool Resource}]] + ["[1][0]" unsigned (.only U1 U2)] + ["[1][0]" signed (.only S1 S2 S4)]] + ["[1][0]" constant (.only UTF8) + ["[1]/[0]" pool (.only Pool Resource)]] [attribute [code - ["[1][0]" exception {"+" Exception}]]] - ["[0]" type {"+" Type} - [category {"+" Class Object Value' Value Return' Return Method}] + ["[1][0]" exception (.only Exception)]]] + ["[0]" type (.only Type) + [category (.only Class Object Value' Value Return' Return Method)] ["[0]" reflection] ["[0]" parser]]]]) diff --git a/stdlib/source/library/lux/target/jvm/bytecode/address.lux b/stdlib/source/library/lux/target/jvm/bytecode/address.lux index 7edce6747..812434af4 100644 --- a/stdlib/source/library/lux/target/jvm/bytecode/address.lux +++ b/stdlib/source/library/lux/target/jvm/bytecode/address.lux @@ -2,26 +2,26 @@ [library [lux "*" [abstract - [equivalence {"+" Equivalence}] - [monad {"+" do}]] + [equivalence (.only Equivalence)] + [monad (.only do)]] [control - ["[0]" try {"+" Try}]] + ["[0]" try (.only Try)]] [data [format - [binary {"+" Writer}]] + [binary (.only Writer)]] [text - ["%" format {"+" Format}]]] + ["%" format (.only Format)]]] [math [number ["n" nat]]] [type [primitive "*"]]]] ["[0]" // "_" - [jump {"+" Big_Jump}] + [jump (.only Big_Jump)] ["/[1]" // "_" [encoding - ["[1][0]" unsigned {"+" U2}] - ["[1][0]" signed {"+" S4}]]]]) + ["[1][0]" unsigned (.only U2)] + ["[1][0]" signed (.only S4)]]]]) (primitive: .public Address U2 diff --git a/stdlib/source/library/lux/target/jvm/bytecode/environment.lux b/stdlib/source/library/lux/target/jvm/bytecode/environment.lux index 2f99d83c0..9c0e91224 100644 --- a/stdlib/source/library/lux/target/jvm/bytecode/environment.lux +++ b/stdlib/source/library/lux/target/jvm/bytecode/environment.lux @@ -2,20 +2,20 @@ [library [lux {"-" Type static has} [abstract - [monad {"+" do}] - [monoid {"+" Monoid}]] + [monad (.only do)] + [monoid (.only Monoid)]] [control - ["[0]" try {"+" Try}] - ["[0]" exception {"+" exception:}]]]] + ["[0]" try (.only Try)] + ["[0]" exception (.only exception:)]]]] [/ - ["/[0]" limit {"+" Limit} - ["/[0]" stack {"+" Stack}] - ["/[0]" registry {"+" Registry}]] + ["/[0]" limit (.only Limit) + ["/[0]" stack (.only Stack)] + ["/[0]" registry (.only Registry)]] [/// [encoding - [unsigned {"+" U2}]] - [type {"+" Type} - [category {"+" Method}]]]]) + [unsigned (.only U2)]] + [type (.only Type) + [category (.only Method)]]]]) (type: .public Environment (Record diff --git a/stdlib/source/library/lux/target/jvm/bytecode/environment/limit.lux b/stdlib/source/library/lux/target/jvm/bytecode/environment/limit.lux index eb98b1262..531ca3ba7 100644 --- a/stdlib/source/library/lux/target/jvm/bytecode/environment/limit.lux +++ b/stdlib/source/library/lux/target/jvm/bytecode/environment/limit.lux @@ -2,23 +2,23 @@ [library [lux {"-" Type static} [abstract - [monad {"+" do}] - [equivalence {"+" Equivalence}]] + [monad (.only do)] + [equivalence (.only Equivalence)]] [control - ["[0]" try {"+" Try}]] + ["[0]" try (.only Try)]] [data ["[0]" product] ["[0]" format "_" - ["[1]" binary {"+" Writer} ("[1]#[0]" monoid)]]] + ["[1]" binary (.only Writer) ("[1]#[0]" monoid)]]] [math [number ["n" nat]]]]] ["[0]" / "_" - ["[1][0]" stack {"+" Stack}] - ["[1][0]" registry {"+" Registry}] + ["[1][0]" stack (.only Stack)] + ["[1][0]" registry (.only Registry)] [//// - [type {"+" Type} - [category {"+" Method}]]]]) + [type (.only Type) + [category (.only Method)]]]]) (type: .public Limit (Record diff --git a/stdlib/source/library/lux/target/jvm/bytecode/environment/limit/registry.lux b/stdlib/source/library/lux/target/jvm/bytecode/environment/limit/registry.lux index 334a2cb15..a9c265bab 100644 --- a/stdlib/source/library/lux/target/jvm/bytecode/environment/limit/registry.lux +++ b/stdlib/source/library/lux/target/jvm/bytecode/environment/limit/registry.lux @@ -2,12 +2,12 @@ [library [lux {"-" Type for static has} [abstract - ["[0]" equivalence {"+" Equivalence}]] + ["[0]" equivalence (.only Equivalence)]] [control - ["[0]" try {"+" Try} ("[1]#[0]" functor)]] + ["[0]" try (.only Try) ("[1]#[0]" functor)]] [data [format - [binary {"+" Writer}]] + [binary (.only Writer)]] [collection ["[0]" list ("[1]#[0]" functor mix)]]] [math @@ -17,9 +17,9 @@ [primitive "*"]]]] ["[0]" ///// "_" [encoding - ["[1][0]" unsigned {"+" U1 U2}]] - ["[1][0]" type {"+" Type} - [category {"+" Method}] + ["[1][0]" unsigned (.only U1 U2)]] + ["[1][0]" type (.only Type) + [category (.only Method)] ["[1]/[0]" parser]]]) (type: .public Register diff --git a/stdlib/source/library/lux/target/jvm/bytecode/environment/limit/stack.lux b/stdlib/source/library/lux/target/jvm/bytecode/environment/limit/stack.lux index 414a74ddd..cbc4cc941 100644 --- a/stdlib/source/library/lux/target/jvm/bytecode/environment/limit/stack.lux +++ b/stdlib/source/library/lux/target/jvm/bytecode/environment/limit/stack.lux @@ -2,20 +2,20 @@ [library [lux "*" [abstract - ["[0]" equivalence {"+" Equivalence}]] + ["[0]" equivalence (.only Equivalence)]] [control ["[0]" maybe] - ["[0]" try {"+" Try}]] + ["[0]" try (.only Try)]] [data [text - ["%" format {"+" Format}]] + ["%" format (.only Format)]] [format - [binary {"+" Writer}]]] + [binary (.only Writer)]]] [type [primitive "*"]]]] ["[0]" ///// "_" [encoding - ["[1][0]" unsigned {"+" U2}]]]) + ["[1][0]" unsigned (.only U2)]]]) (primitive: .public Stack U2 diff --git a/stdlib/source/library/lux/target/jvm/bytecode/instruction.lux b/stdlib/source/library/lux/target/jvm/bytecode/instruction.lux index 90569a287..3aacb4021 100644 --- a/stdlib/source/library/lux/target/jvm/bytecode/instruction.lux +++ b/stdlib/source/library/lux/target/jvm/bytecode/instruction.lux @@ -1,43 +1,43 @@ (.using [library [lux "*" - [ffi {"+"}] + [ffi (.only)] [abstract - [monad {"+" do}] - [monoid {"+" Monoid}]] + [monad (.only do)] + [monoid (.only Monoid)]] [control ["[0]" function] ["[0]" try]] [data ["[0]" product] ["[0]" binary "_" - [/ {"+"}] + [/ (.only)] ["[1]" \\unsafe]] ["[0]" format "_" - ["[1]" binary {"+" Mutation Specification}]] + ["[1]" binary (.only Mutation Specification)]] [collection ["[0]" list]]] [macro ["[0]" template]] [math - [number {"+" hex} + [number (.only hex) ["n" nat]]] [type [primitive "*"]]]] ["[0]" // "_" - ["[1][0]" address {"+" Address}] - ["[1][0]" jump {"+" Jump Big_Jump}] + ["[1][0]" address (.only Address)] + ["[1][0]" jump (.only Jump Big_Jump)] [environment [limit - [registry {"+" Register}]]] + [registry (.only Register)]]] ["/[1]" // "_" - ["[1][0]" index {"+" Index}] - ["[1][0]" constant {"+" Class Reference}] + ["[1][0]" index (.only Index)] + ["[1][0]" constant (.only Class Reference)] [encoding - ["[1][0]" unsigned {"+" U1 U2 U4}] - ["[1][0]" signed {"+" S1 S2 S4}]] + ["[1][0]" unsigned (.only U1 U2 U4)] + ["[1][0]" signed (.only S1 S2 S4)]] [type - [category {"+" Value Method}]]]]) + [category (.only Value Method)]]]]) (type: .public Size U2) diff --git a/stdlib/source/library/lux/target/jvm/bytecode/jump.lux b/stdlib/source/library/lux/target/jvm/bytecode/jump.lux index a9ddc510b..4d3100069 100644 --- a/stdlib/source/library/lux/target/jvm/bytecode/jump.lux +++ b/stdlib/source/library/lux/target/jvm/bytecode/jump.lux @@ -1,14 +1,14 @@ (.using - [library - [lux "*" - [abstract - [equivalence {"+" Equivalence}]] - [data - ["[0]" format "_" - ["[1]" binary {"+" Writer}]]]]] - ["[0]" /// "_" - [encoding - ["[1][0]" signed {"+" S2 S4}]]]) + [library + [lux "*" + [abstract + [equivalence (.only Equivalence)]] + [data + ["[0]" format "_" + ["[1]" binary (.only Writer)]]]]] + ["[0]" /// "_" + [encoding + ["[1][0]" signed (.only S2 S4)]]]) (type: .public Jump S2) diff --git a/stdlib/source/library/lux/target/jvm/class.lux b/stdlib/source/library/lux/target/jvm/class.lux index cd459643a..7a8824173 100644 --- a/stdlib/source/library/lux/target/jvm/class.lux +++ b/stdlib/source/library/lux/target/jvm/class.lux @@ -2,33 +2,33 @@ [library [lux {"-" Type public private} [abstract - [equivalence {"+" Equivalence}] - ["[0]" monad {"+" do}]] + [equivalence (.only Equivalence)] + ["[0]" monad (.only do)]] [control ["[0]" state] - ["[0]" try {"+" Try}]] + ["[0]" try (.only Try)]] [data ["[0]" product] [format - ["[0]F" binary {"+" Writer} ("[1]#[0]" monoid)]] + ["[0]F" binary (.only Writer) ("[1]#[0]" monoid)]] [collection - ["[0]" sequence {"+" Sequence}]]]]] + ["[0]" sequence (.only Sequence)]]]]] ["[0]" // "_" - ["[1][0]" modifier {"+" Modifier modifiers:}] - ["[1][0]" version {"+" Version Minor Major}] - ["[1][0]" magic {"+" Magic}] - ["[1][0]" index {"+" Index}] - ["[1][0]" attribute {"+" Attribute}] - ["[1][0]" field {"+" Field}] - ["[1][0]" method {"+" Method}] + ["[1][0]" modifier (.only Modifier modifiers:)] + ["[1][0]" version (.only Version Minor Major)] + ["[1][0]" magic (.only Magic)] + ["[1][0]" index (.only Index)] + ["[1][0]" attribute (.only Attribute)] + ["[1][0]" field (.only Field)] + ["[1][0]" method (.only Method)] [encoding ["[1][0]" unsigned] - ["[1][0]" name {"+" Internal}]] - ["[1][0]" type {"+" Type} - [category {"+" Inheritance}] - ["[2][0]" signature {"+" Signature}]] - ["[1][0]" constant {"+" Constant} - ["[2][0]" pool {"+" Pool Resource}]]]) + ["[1][0]" name (.only Internal)]] + ["[1][0]" type (.only Type) + [category (.only Inheritance)] + ["[2][0]" signature (.only Signature)]] + ["[1][0]" constant (.only Constant) + ["[2][0]" pool (.only Pool Resource)]]]) (type: .public Class (Rec Class diff --git a/stdlib/source/library/lux/target/jvm/constant.lux b/stdlib/source/library/lux/target/jvm/constant.lux index b0dfc7cda..25f9cd782 100644 --- a/stdlib/source/library/lux/target/jvm/constant.lux +++ b/stdlib/source/library/lux/target/jvm/constant.lux @@ -2,22 +2,22 @@ [library [lux "*" ["@" target] - ["[0]" ffi {"+" import:}] + ["[0]" ffi (.only import:)] [abstract - [monad {"+" do}] - ["[0]" equivalence {"+" Equivalence}]] + [monad (.only do)] + ["[0]" equivalence (.only Equivalence)]] [data ["[0]" sum] ["[0]" product] ["[0]" text] [format - ["[0]F" binary {"+" Writer} ("[1]#[0]" monoid)]]] + ["[0]F" binary (.only Writer) ("[1]#[0]" monoid)]]] [macro ["^" pattern] ["[0]" template]] [math [number - ["[0]" i32 {"+" I32}] + ["[0]" i32 (.only I32)] ["[0]" i64] ["[0]" int] ["[0]" frac]]] @@ -26,10 +26,10 @@ ["[0]" / "_" ["[1][0]" tag] ["/[1]" // "_" - ["[1][0]" index {"+" Index}] + ["[1][0]" index (.only Index)] [type ["[1][0]" category] - ["[1][0]" descriptor {"+" Descriptor}]] + ["[1][0]" descriptor (.only Descriptor)]] [encoding ["[1][0]" unsigned]]]]) diff --git a/stdlib/source/library/lux/target/jvm/constant/pool.lux b/stdlib/source/library/lux/target/jvm/constant/pool.lux index 936cfe3c4..8c41dbf17 100644 --- a/stdlib/source/library/lux/target/jvm/constant/pool.lux +++ b/stdlib/source/library/lux/target/jvm/constant/pool.lux @@ -3,34 +3,34 @@ [lux "*" ["[0]" ffi] [abstract - [equivalence {"+" Equivalence}] - [functor {"+" Functor}] - [monad {"+" Monad do}]] + [equivalence (.only Equivalence)] + [functor (.only Functor)] + [monad (.only Monad do)]] [control ["[0]" pipe] - ["[0]" state {"+" +State}] - ["[0]" try {"+" Try}]] + ["[0]" state (.only +State)] + ["[0]" try (.only Try)]] [data ["[0]" product] ["[0]" text] ["[0]" format "_" - ["[1]" binary {"+" Writer} ("specification#[0]" monoid)]] + ["[1]" binary (.only Writer) ("specification#[0]" monoid)]] [collection - ["[0]" sequence {"+" Sequence} ("[1]#[0]" mix)]]] + ["[0]" sequence (.only Sequence) ("[1]#[0]" mix)]]] [math [number ["[0]" int] ["[0]" frac] ["[0]" i32]]]]] - ["[0]" // {"+" UTF8 String Class Integer Float Long Double Constant Name_And_Type Reference} + ["[0]" // (.only UTF8 String Class Integer Float Long Double Constant Name_And_Type Reference) [// - ["[1][0]" index {"+" Index}] + ["[1][0]" index (.only Index)] [encoding - ["[1][0]" name {"+" Internal External}] + ["[1][0]" name (.only Internal External)] ["[1][0]" unsigned]] [type - [category {"+" Value Method}] - ["[1][0]" descriptor {"+" Descriptor}]]]]) + [category (.only Value Method)] + ["[1][0]" descriptor (.only Descriptor)]]]]) (type: .public Pool [Index (Sequence [Index Constant])]) diff --git a/stdlib/source/library/lux/target/jvm/constant/tag.lux b/stdlib/source/library/lux/target/jvm/constant/tag.lux index 440dbc581..9b15c3401 100644 --- a/stdlib/source/library/lux/target/jvm/constant/tag.lux +++ b/stdlib/source/library/lux/target/jvm/constant/tag.lux @@ -2,17 +2,17 @@ [library [lux "*" [abstract - [equivalence {"+" Equivalence}]] + [equivalence (.only Equivalence)]] [control ["[0]" try]] [data [format - [binary {"+" Writer}]]] + [binary (.only Writer)]]] [type [primitive "*"]]]] ["[0]" /// "_" [encoding - ["[1][0]" unsigned {"+" U1} ("u1//[0]" equivalence)]]]) + ["[1][0]" unsigned (.only U1) ("u1//[0]" equivalence)]]]) (primitive: .public Tag U1 diff --git a/stdlib/source/library/lux/target/jvm/encoding/name.lux b/stdlib/source/library/lux/target/jvm/encoding/name.lux index 1479e35dd..029758c23 100644 --- a/stdlib/source/library/lux/target/jvm/encoding/name.lux +++ b/stdlib/source/library/lux/target/jvm/encoding/name.lux @@ -3,7 +3,7 @@ [lux "*" [data ["[0]" text - ["%" format {"+" format}]]] + ["%" format (.only format)]]] [type [primitive "*"]]]]) diff --git a/stdlib/source/library/lux/target/jvm/encoding/signed.lux b/stdlib/source/library/lux/target/jvm/encoding/signed.lux index be0f564e3..52b536100 100644 --- a/stdlib/source/library/lux/target/jvm/encoding/signed.lux +++ b/stdlib/source/library/lux/target/jvm/encoding/signed.lux @@ -2,16 +2,16 @@ [library [lux {"-" int} [abstract - [equivalence {"+" Equivalence}] - [order {"+" Order}]] + [equivalence (.only Equivalence)] + [order (.only Order)]] [control - ["[0]" try {"+" Try}] - ["[0]" exception {"+" exception:}]] + ["[0]" try (.only Try)] + ["[0]" exception (.only exception:)]] [data [text - ["%" format {"+" format}]] + ["%" format (.only format)]] ["[0]" format "_" - ["[1]" binary {"+" Writer}]]] + ["[1]" binary (.only Writer)]]] [macro ["[0]" template]] [math diff --git a/stdlib/source/library/lux/target/jvm/encoding/unsigned.lux b/stdlib/source/library/lux/target/jvm/encoding/unsigned.lux index 66506f3b0..47d7a95c4 100644 --- a/stdlib/source/library/lux/target/jvm/encoding/unsigned.lux +++ b/stdlib/source/library/lux/target/jvm/encoding/unsigned.lux @@ -2,16 +2,16 @@ [library [lux {"-" nat} [abstract - [equivalence {"+" Equivalence}] - [order {"+" Order}]] + [equivalence (.only Equivalence)] + [order (.only Order)]] [control - ["[0]" try {"+" Try}] - ["[0]" exception {"+" exception:}]] + ["[0]" try (.only Try)] + ["[0]" exception (.only exception:)]] [data [text - ["%" format {"+" format}]] + ["%" format (.only format)]] ["[0]" format "_" - ["[1]" binary {"+" Writer}]]] + ["[1]" binary (.only Writer)]]] [macro ["[0]" template]] [math diff --git a/stdlib/source/library/lux/target/jvm/field.lux b/stdlib/source/library/lux/target/jvm/field.lux index d97951fbf..27af1d6c3 100644 --- a/stdlib/source/library/lux/target/jvm/field.lux +++ b/stdlib/source/library/lux/target/jvm/field.lux @@ -2,23 +2,23 @@ [library [lux {"-" Type static public private} [abstract - [equivalence {"+" Equivalence}] - ["[0]" monad {"+" do}]] + [equivalence (.only Equivalence)] + ["[0]" monad (.only do)]] [data ["[0]" product] [format - ["[0]F" binary {"+" Writer} ("[1]#[0]" monoid)]] + ["[0]F" binary (.only Writer) ("[1]#[0]" monoid)]] [collection - ["[0]" sequence {"+" Sequence}]]]]] + ["[0]" sequence (.only Sequence)]]]]] ["[0]" // "_" - ["[0]" modifier {"+" Modifier modifiers:}] - ["[1][0]" constant {"+" UTF8} - ["[1]/[0]" pool {"+" Pool Resource}]] - ["[1][0]" index {"+" Index}] - ["[1][0]" attribute {"+" Attribute}] - ["[1][0]" type {"+" Type} - [category {"+" Value}] - [descriptor {"+" Descriptor}]]]) + ["[0]" modifier (.only Modifier modifiers:)] + ["[1][0]" constant (.only UTF8) + ["[1]/[0]" pool (.only Pool Resource)]] + ["[1][0]" index (.only Index)] + ["[1][0]" attribute (.only Attribute)] + ["[1][0]" type (.only Type) + [category (.only Value)] + [descriptor (.only Descriptor)]]]) (type: .public Field (Rec Field diff --git a/stdlib/source/library/lux/target/jvm/index.lux b/stdlib/source/library/lux/target/jvm/index.lux index 42c0e4c15..ea295478a 100644 --- a/stdlib/source/library/lux/target/jvm/index.lux +++ b/stdlib/source/library/lux/target/jvm/index.lux @@ -2,15 +2,15 @@ [library [lux "*" [abstract - ["[0]" equivalence {"+" Equivalence}]] + ["[0]" equivalence (.only Equivalence)]] [data [format - [binary {"+" Writer}]]] + [binary (.only Writer)]]] [type [primitive "*"]]]] ["[0]" // "_" [encoding - ["[1][0]" unsigned {"+" U2}]]]) + ["[1][0]" unsigned (.only U2)]]]) (def: .public length //unsigned.bytes/2) diff --git a/stdlib/source/library/lux/target/jvm/loader.lux b/stdlib/source/library/lux/target/jvm/loader.lux index 443f07227..7e5d090e7 100644 --- a/stdlib/source/library/lux/target/jvm/loader.lux +++ b/stdlib/source/library/lux/target/jvm/loader.lux @@ -2,22 +2,22 @@ [library [lux "*" ["@" target] - ["[0]" ffi {"+" import: object do_to}] + ["[0]" ffi (.only import: object do_to)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control - ["[0]" try {"+" Try}] - ["[0]" exception {"+" exception:}] - ["[0]" io {"+" IO}] + ["[0]" try (.only Try)] + ["[0]" exception (.only exception:)] + ["[0]" io (.only IO)] [concurrency - ["[0]" atom {"+" Atom}]]] + ["[0]" atom (.only Atom)]]] [data - ["[0]" binary {"+" Binary}] + ["[0]" binary (.only Binary)] ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" array] - ["[0]" dictionary {"+" Dictionary}]]]]]) + ["[0]" dictionary (.only Dictionary)]]]]]) (type: .public Library (Atom (Dictionary Text Binary))) diff --git a/stdlib/source/library/lux/target/jvm/magic.lux b/stdlib/source/library/lux/target/jvm/magic.lux index 3b2ed2e89..756104ae4 100644 --- a/stdlib/source/library/lux/target/jvm/magic.lux +++ b/stdlib/source/library/lux/target/jvm/magic.lux @@ -1,13 +1,13 @@ (.using - [library - [lux "*" - [control - ["[0]" try]] - [math - [number {"+" hex}]]]] - ["[0]" // "_" - [encoding - ["[1][0]" unsigned {"+" U4}]]]) + [library + [lux "*" + [control + ["[0]" try]] + [math + [number (.only hex)]]]] + ["[0]" // "_" + [encoding + ["[1][0]" unsigned (.only U4)]]]) (type: .public Magic U4) diff --git a/stdlib/source/library/lux/target/jvm/method.lux b/stdlib/source/library/lux/target/jvm/method.lux index 193bb4db8..54485d75b 100644 --- a/stdlib/source/library/lux/target/jvm/method.lux +++ b/stdlib/source/library/lux/target/jvm/method.lux @@ -2,30 +2,30 @@ [library [lux {"-" Type static public private} [abstract - [equivalence {"+" Equivalence}] - ["[0]" monad {"+" do}]] + [equivalence (.only Equivalence)] + ["[0]" monad (.only do)]] [control ["[0]" try]] [data ["[0]" product] ["[0]" format "_" - ["[1]" binary {"+" Writer} ("[1]#[0]" monoid)]] + ["[1]" binary (.only Writer) ("[1]#[0]" monoid)]] [collection - ["[0]" sequence {"+" Sequence}]]]]] + ["[0]" sequence (.only Sequence)]]]]] ["[0]" // "_" - ["[1][0]" modifier {"+" Modifier modifiers:}] - ["[1][0]" index {"+" Index}] - ["[1][0]" attribute {"+" Attribute} + ["[1][0]" modifier (.only Modifier modifiers:)] + ["[1][0]" index (.only Index)] + ["[1][0]" attribute (.only Attribute) ["[2][0]" code]] - ["[1][0]" constant {"+" UTF8} - ["[2][0]" pool {"+" Pool Resource}]] - ["[1][0]" bytecode {"+" Bytecode} - ["[2][0]" environment {"+" Environment}] + ["[1][0]" constant (.only UTF8) + ["[2][0]" pool (.only Pool Resource)]] + ["[1][0]" bytecode (.only Bytecode) + ["[2][0]" environment (.only Environment)] ["[2][0]" instruction]] - ["[1][0]" type {"+" Type} - [descriptor {"+" Descriptor}] + ["[1][0]" type (.only Type) + [descriptor (.only Descriptor)] ["[2][0]" category] - ["[2][0]" signature {"+" Signature}]]]) + ["[2][0]" signature (.only Signature)]]]) (type: .public Method (Rec Method diff --git a/stdlib/source/library/lux/target/jvm/modifier.lux b/stdlib/source/library/lux/target/jvm/modifier.lux index d573f0aeb..825abf133 100644 --- a/stdlib/source/library/lux/target/jvm/modifier.lux +++ b/stdlib/source/library/lux/target/jvm/modifier.lux @@ -2,20 +2,20 @@ [library [lux "*" [abstract - ["[0]" equivalence {"+" Equivalence}] - ["[0]" monoid {"+" Monoid}]] + ["[0]" equivalence (.only Equivalence)] + ["[0]" monoid (.only Monoid)]] [control ["[0]" try] ["<>" parser ["<[0]>" code]]] [data [format - ["[0]F" binary {"+" Writer}]]] - [macro {"+" with_symbols} - [syntax {"+" syntax:}] + ["[0]F" binary (.only Writer)]]] + [macro (.only with_symbols) + [syntax (.only syntax:)] ["[0]" code]] [math - ["[0]" number {"+" hex} + ["[0]" number (.only hex) ["[0]" i64]]] [type [primitive "*"]]]] diff --git a/stdlib/source/library/lux/target/jvm/modifier/inner.lux b/stdlib/source/library/lux/target/jvm/modifier/inner.lux index d088a227f..d119e9a69 100644 --- a/stdlib/source/library/lux/target/jvm/modifier/inner.lux +++ b/stdlib/source/library/lux/target/jvm/modifier/inner.lux @@ -1,9 +1,9 @@ (.using - [library - [lux {"-" static} - [type - abstract]]] - [// {"+" modifiers:}]) + [library + [lux {"-" static} + [type + abstract]]] + [// (.only modifiers:)]) (abstract: .public Inner Any) diff --git a/stdlib/source/library/lux/target/jvm/reflection.lux b/stdlib/source/library/lux/target/jvm/reflection.lux index 4fe60fd37..ba7b9f278 100644 --- a/stdlib/source/library/lux/target/jvm/reflection.lux +++ b/stdlib/source/library/lux/target/jvm/reflection.lux @@ -1,18 +1,18 @@ (.using [library [lux {"-" Primitive type parameter} - ["[0]" ffi {"+" import:}] + ["[0]" ffi (.only import:)] ["[0]" type] [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control - ["[0]" try {"+" Try} ("[1]#[0]" functor)] - ["[0]" exception {"+" exception:}] + ["[0]" try (.only Try) ("[1]#[0]" functor)] + ["[0]" exception (.only exception:)] [parser ["<t>" text]]] [data ["[0]" text ("[1]#[0]" equivalence) - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" mix functor)] ["[0]" array] @@ -24,10 +24,10 @@ ["n" nat]]]]] ["[0]" // "_" [encoding - ["[1][0]" name {"+" External}]] + ["[1][0]" name (.only External)]] ["/" type - [category {"+" Void Value Return Method Primitive Object Class Array Parameter}] - ["[1][0]" lux {"+" Mapping}] + [category (.only Void Value Return Method Primitive Object Class Array Parameter)] + ["[1][0]" lux (.only Mapping)] ["[1][0]" descriptor] ["[1][0]" reflection] ["[1][0]" parser]]]) diff --git a/stdlib/source/library/lux/target/jvm/type.lux b/stdlib/source/library/lux/target/jvm/type.lux index c2f40a5a5..df4d64dac 100644 --- a/stdlib/source/library/lux/target/jvm/type.lux +++ b/stdlib/source/library/lux/target/jvm/type.lux @@ -2,13 +2,13 @@ [library [lux {"-" Primitive Type int char} [abstract - [equivalence {"+" Equivalence}] - [hash {"+" Hash}]] + [equivalence (.only Equivalence)] + [hash (.only Hash)]] [control ["[0]" maybe]] [data ["[0]" text - ["%" format {"+" Format}]] + ["%" format (.only Format)]] [collection ["[0]" list ("[1]#[0]" functor)]]] [math @@ -18,12 +18,12 @@ [primitive "*"]]]] ["[0]" // "_" [encoding - ["[1][0]" name {"+" External}]]] + ["[1][0]" name (.only External)]]] ["[0]" / "_" - [category {"+" Void Value' Value Return' Return Method Primitive Object Class Array Var Parameter Declaration}] - ["[1][0]" signature {"+" Signature}] - ["[1][0]" descriptor {"+" Descriptor}] - ["[1][0]" reflection {"+" Reflection}]]) + [category (.only Void Value' Value Return' Return Method Primitive Object Class Array Var Parameter Declaration)] + ["[1][0]" signature (.only Signature)] + ["[1][0]" descriptor (.only Descriptor)] + ["[1][0]" reflection (.only Reflection)]]) (primitive: .public (Type category) [(Signature category) diff --git a/stdlib/source/library/lux/target/jvm/type/alias.lux b/stdlib/source/library/lux/target/jvm/type/alias.lux index 39f8aba69..919b90a8e 100644 --- a/stdlib/source/library/lux/target/jvm/type/alias.lux +++ b/stdlib/source/library/lux/target/jvm/type/alias.lux @@ -2,22 +2,22 @@ [library [lux {"-" Type Primitive int char type parameter} [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["[0]" maybe] ["[0]" try] - ["[0]" exception {"+" exception:}] + ["[0]" exception (.only exception:)] ["<>" parser - ["<[0]>" text {"+" Parser}]]] + ["<[0]>" text (.only Parser)]]] [data ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection - ["[0]" dictionary {"+" Dictionary}]]]]] - ["[0]" // {"+" Type} - [category {"+" Void Value Return Method Primitive Object Class Array Var Parameter}] + ["[0]" dictionary (.only Dictionary)]]]]] + ["[0]" // (.only Type) + [category (.only Void Value Return Method Primitive Object Class Array Var Parameter)] ["[1][0]" descriptor] - ["[1][0]" signature {"+" Signature}] + ["[1][0]" signature (.only Signature)] ["[1][0]" reflection] ["[1][0]" parser] ["/[1]" // "_" diff --git a/stdlib/source/library/lux/target/jvm/type/box.lux b/stdlib/source/library/lux/target/jvm/type/box.lux index e355328d2..2350485bf 100644 --- a/stdlib/source/library/lux/target/jvm/type/box.lux +++ b/stdlib/source/library/lux/target/jvm/type/box.lux @@ -1,9 +1,9 @@ (.using - [library - [lux {"-" int char}]] - [/// - [encoding - [name {"+" External}]]]) + [library + [lux {"-" int char}]] + [/// + [encoding + [name (.only External)]]]) (template [<name> <box>] [(def: .public <name> External <box>)] diff --git a/stdlib/source/library/lux/target/jvm/type/descriptor.lux b/stdlib/source/library/lux/target/jvm/type/descriptor.lux index a58c9098f..7f1c9e397 100644 --- a/stdlib/source/library/lux/target/jvm/type/descriptor.lux +++ b/stdlib/source/library/lux/target/jvm/type/descriptor.lux @@ -2,12 +2,12 @@ [library [lux {"-" Primitive int char} [abstract - [equivalence {"+" Equivalence}]] + [equivalence (.only Equivalence)]] [control ["[0]" maybe]] [data ["[0]" text ("[1]#[0]" equivalence) - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" functor)]]] [math @@ -16,10 +16,10 @@ [type [primitive "*"]]]] ["[0]" // "_" - [category {"+" Void Value Return Method Primitive Object Class Array Var Parameter Declaration}] + [category (.only Void Value Return Method Primitive Object Class Array Var Parameter Declaration)] ["/[1]" // "_" [encoding - ["[1][0]" name {"+" Internal External}]]]]) + ["[1][0]" name (.only Internal External)]]]]) (primitive: .public (Descriptor category) Text diff --git a/stdlib/source/library/lux/target/jvm/type/lux.lux b/stdlib/source/library/lux/target/jvm/type/lux.lux index 8fa73b5f9..36ddab7d0 100644 --- a/stdlib/source/library/lux/target/jvm/type/lux.lux +++ b/stdlib/source/library/lux/target/jvm/type/lux.lux @@ -2,24 +2,24 @@ [library [lux {"-" Primitive int char type parameter} [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["[0]" try] - ["[0]" exception {"+" exception:}] + ["[0]" exception (.only exception:)] ["<>" parser ("[1]#[0]" monad) - ["<[0]>" text {"+" Parser}]]] + ["<[0]>" text (.only Parser)]]] [data ["[0]" product] ["[0]" text ("[1]#[0]" equivalence) - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" array] - ["[0]" dictionary {"+" Dictionary}]]] + ["[0]" dictionary (.only Dictionary)]]] [type [primitive "*"] - ["[0]" check {"+" Check} ("[1]#[0]" monad)]]]] + ["[0]" check (.only Check) ("[1]#[0]" monad)]]]] ["[0]" // - [category {"+" Void Value Return Method Primitive Object Class Array Var Parameter}] + [category (.only Void Value Return Method Primitive Object Class Array Var Parameter)] ["[1][0]" descriptor] ["[1][0]" signature] ["[1][0]" reflection] diff --git a/stdlib/source/library/lux/target/jvm/type/parser.lux b/stdlib/source/library/lux/target/jvm/type/parser.lux index e7c2a2c70..04b66b360 100644 --- a/stdlib/source/library/lux/target/jvm/type/parser.lux +++ b/stdlib/source/library/lux/target/jvm/type/parser.lux @@ -2,25 +2,25 @@ [library [lux {"-" Type Primitive int char parameter} [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" try] ["[0]" function] ["<>" parser ("[1]#[0]" monad) - ["<[0]>" text {"+" Parser}]]] + ["<[0]>" text (.only Parser)]]] [data ["[0]" product] [text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list]]]]] - ["[0]" // {"+" Type} - [category {"+" Void Value Return Method Primitive Object Class Array Var Parameter Declaration}] + ["[0]" // (.only Type) + [category (.only Void Value Return Method Primitive Object Class Array Var Parameter Declaration)] ["[1][0]" signature] ["[1][0]" descriptor] ["[0]" // "_" [encoding - ["[1][0]" name {"+" External}]]]]) + ["[1][0]" name (.only External)]]]]) (template [<category> <name> <signature> <type>] [(def: .public <name> diff --git a/stdlib/source/library/lux/target/jvm/type/reflection.lux b/stdlib/source/library/lux/target/jvm/type/reflection.lux index 7e7ad7a1a..2ab921a16 100644 --- a/stdlib/source/library/lux/target/jvm/type/reflection.lux +++ b/stdlib/source/library/lux/target/jvm/type/reflection.lux @@ -2,18 +2,18 @@ [library [lux {"-" Primitive int char} [abstract - [equivalence {"+" Equivalence}]] + [equivalence (.only Equivalence)]] [data ["[0]" text ("[1]#[0]" equivalence) - ["%" format {"+" format}]]] + ["%" format (.only format)]]] [type [primitive "*"]]]] ["[0]" // "_" - [category {"+" Void Value Return Method Primitive Object Class Array Var Parameter Declaration}] + [category (.only Void Value Return Method Primitive Object Class Array Var Parameter Declaration)] ["[1][0]" descriptor] [// [encoding - ["[1][0]" name {"+" External}]]]]) + ["[1][0]" name (.only External)]]]]) (primitive: .public (Reflection category) Text diff --git a/stdlib/source/library/lux/target/jvm/type/signature.lux b/stdlib/source/library/lux/target/jvm/type/signature.lux index e9dffe710..d1bc73b96 100644 --- a/stdlib/source/library/lux/target/jvm/type/signature.lux +++ b/stdlib/source/library/lux/target/jvm/type/signature.lux @@ -2,23 +2,23 @@ [library [lux {"-" Primitive int char} [abstract - [equivalence {"+" Equivalence}] - [hash {"+" Hash}]] + [equivalence (.only Equivalence)] + [hash (.only Hash)]] [control ["[0]" pipe]] [data ["[0]" text ("[1]#[0]" hash) - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" functor)]]] [type [primitive "*"]]]] ["[0]" // "_" - [category {"+" Void Value Return Method Primitive Object Class Array Var Parameter Declaration Inheritance}] + [category (.only Void Value Return Method Primitive Object Class Array Var Parameter Declaration Inheritance)] ["[1][0]" descriptor] ["/[1]" // "_" [encoding - ["[1][0]" name {"+" External}]]]]) + ["[1][0]" name (.only External)]]]]) (primitive: .public (Signature category) Text diff --git a/stdlib/source/library/lux/target/jvm/version.lux b/stdlib/source/library/lux/target/jvm/version.lux index 33174b762..029c95d21 100644 --- a/stdlib/source/library/lux/target/jvm/version.lux +++ b/stdlib/source/library/lux/target/jvm/version.lux @@ -1,11 +1,11 @@ (.using - [library - [lux "*" - [control - ["[0]" try]]]] - ["[0]" // "_" - [encoding - ["[1][0]" unsigned {"+" U2}]]]) + [library + [lux "*" + [control + ["[0]" try]]]] + ["[0]" // "_" + [encoding + ["[1][0]" unsigned (.only U2)]]]) (type: .public Version U2) (type: .public Minor Version) diff --git a/stdlib/source/library/lux/target/lua.lux b/stdlib/source/library/lux/target/lua.lux index 91fe9e4a5..821449098 100644 --- a/stdlib/source/library/lux/target/lua.lux +++ b/stdlib/source/library/lux/target/lua.lux @@ -3,8 +3,8 @@ [lux {"-" Location Code Label int if function or and not let local comment the} ["@" target] [abstract - [equivalence {"+" Equivalence}] - [hash {"+" Hash}] + [equivalence (.only Equivalence)] + [hash (.only Hash)] ["[0]" enum]] [control ["[0]" pipe] @@ -12,11 +12,11 @@ ["<[0]>" code]]] [data ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" functor mix)]]] [macro - [syntax {"+" syntax:}] + [syntax (.only syntax:)] ["[0]" template] ["[0]" code]] [math diff --git a/stdlib/source/library/lux/target/php.lux b/stdlib/source/library/lux/target/php.lux index ea33a351b..83992fc25 100644 --- a/stdlib/source/library/lux/target/php.lux +++ b/stdlib/source/library/lux/target/php.lux @@ -3,8 +3,8 @@ [lux {"-" Location Code Global Label static int if cond or and not comment for try global the parameter} ["@" target] [abstract - [equivalence {"+" Equivalence}] - [hash {"+" Hash}] + [equivalence (.only Equivalence)] + [hash (.only Hash)] ["[0]" enum]] [control ["[0]" pipe] @@ -12,11 +12,11 @@ ["<[0]>" code]]] [data ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" functor mix)]]] [macro - [syntax {"+" syntax:}] + [syntax (.only syntax:)] ["[0]" template] ["[0]" code]] [math diff --git a/stdlib/source/library/lux/target/python.lux b/stdlib/source/library/lux/target/python.lux index 10045f1ea..13eb02e42 100644 --- a/stdlib/source/library/lux/target/python.lux +++ b/stdlib/source/library/lux/target/python.lux @@ -4,8 +4,8 @@ ["@" target] ["[0]" ffi] [abstract - [equivalence {"+" Equivalence}] - [hash {"+" Hash}] + [equivalence (.only Equivalence)] + [hash (.only Hash)] ["[0]" enum]] [control ["[0]" pipe] @@ -13,11 +13,11 @@ ["<[0]>" code]]] [data ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" functor mix)]]] [macro - [syntax {"+" syntax:}] + [syntax (.only syntax:)] ["[0]" template] ["[0]" code]] [math diff --git a/stdlib/source/library/lux/target/r.lux b/stdlib/source/library/lux/target/r.lux index a6a95bd38..7aba9722e 100644 --- a/stdlib/source/library/lux/target/r.lux +++ b/stdlib/source/library/lux/target/r.lux @@ -9,11 +9,11 @@ ["<[0]>" code]]] [data ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" functor mix)]]] [macro - [syntax {"+" syntax:}] + [syntax (.only syntax:)] ["[0]" template] ["[0]" code]] [math diff --git a/stdlib/source/library/lux/target/ruby.lux b/stdlib/source/library/lux/target/ruby.lux index 3bcf32d02..d236a2823 100644 --- a/stdlib/source/library/lux/target/ruby.lux +++ b/stdlib/source/library/lux/target/ruby.lux @@ -3,8 +3,8 @@ [lux {"-" Location Code static int if function or and not comment local global symbol the} ["@" target] [abstract - [equivalence {"+" Equivalence}] - [hash {"+" Hash}] + [equivalence (.only Equivalence)] + [hash (.only Hash)] ["[0]" enum]] [control ["[0]" pipe] @@ -12,11 +12,11 @@ ["<[0]>" code]]] [data ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" functor mix)]]] [macro - [syntax {"+" syntax:}] + [syntax (.only syntax:)] ["[0]" template] ["[0]" code]] [math diff --git a/stdlib/source/library/lux/target/scheme.lux b/stdlib/source/library/lux/target/scheme.lux index 5a174b9db..1124d12e0 100644 --- a/stdlib/source/library/lux/target/scheme.lux +++ b/stdlib/source/library/lux/target/scheme.lux @@ -3,13 +3,13 @@ [lux {"-" Code int or and if cond let symbol} ["@" target] [abstract - [equivalence {"+" Equivalence}] - [hash {"+" Hash}]] + [equivalence (.only Equivalence)] + [hash (.only Hash)]] [control ["[0]" pipe]] [data ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" functor monoid)]]] [macro diff --git a/stdlib/source/library/lux/test.lux b/stdlib/source/library/lux/test.lux index ac03309eb..3bdbc90f5 100644 --- a/stdlib/source/library/lux/test.lux +++ b/stdlib/source/library/lux/test.lux @@ -4,37 +4,37 @@ ["@" target] ["[0]" debug] [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["[0]" pipe] ["[0]" maybe] ["[0]" try] - ["[0]" exception {"+" exception:}] + ["[0]" exception (.only exception:)] ["[0]" io] [concurrency - ["[0]" atom {"+" Atom}] - ["[0]" async {"+" Async} ("[1]#[0]" monad)]] + ["[0]" atom (.only Atom)] + ["[0]" async (.only Async) ("[1]#[0]" monad)]] ["<>" parser ["<[0]>" code]]] [data ["[0]" product] ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" functor mix)] - ["[0]" set {"+" Set}] + ["[0]" set (.only Set)] ["[0]" dictionary "_" - ["[1]" ordered {"+" Dictionary}]]]] + ["[1]" ordered (.only Dictionary)]]]] [time ["[0]" instant] - ["[0]" duration {"+" Duration}]] + ["[0]" duration (.only Duration)]] [math - ["[0]" random {"+" Random} ("[1]#[0]" monad)] - [number {"+" hex} + ["[0]" random (.only Random) ("[1]#[0]" monad)] + [number (.only hex) ["n" nat] ["f" frac]]] [macro - [syntax {"+" syntax:}] + [syntax (.only syntax:)] ["[0]" code]] ["[0]" meta ["[0]" symbol]] diff --git a/stdlib/source/library/lux/time.lux b/stdlib/source/library/lux/time.lux index cf0d64c9e..fd5056cc8 100644 --- a/stdlib/source/library/lux/time.lux +++ b/stdlib/source/library/lux/time.lux @@ -2,17 +2,17 @@ [library [lux "*" [abstract - [equivalence {"+" Equivalence}] - [order {"+" Order}] - [enum {"+" Enum}] - [codec {"+" Codec}] - [monad {"+" Monad do}]] + [equivalence (.only Equivalence)] + [order (.only Order)] + [enum (.only Enum)] + [codec (.only Codec)] + [monad (.only Monad do)]] [control ["[0]" pipe] - ["[0]" try {"+" Try}] - ["[0]" exception {"+" exception:}] + ["[0]" try (.only Try)] + ["[0]" exception (.only exception:)] ["<>" parser - ["<[0]>" text {"+" Parser}]]] + ["<[0]>" text (.only Parser)]]] [data ["[0]" text ("[1]#[0]" monoid)]] [math @@ -21,7 +21,7 @@ [type [primitive "*"]]]] [/ - ["[0]" duration {"+" Duration}]]) + ["[0]" duration (.only Duration)]]) (template [<name> <singular> <plural>] [(def: .public <name> diff --git a/stdlib/source/library/lux/time/date.lux b/stdlib/source/library/lux/time/date.lux index fc839952e..52031a4f0 100644 --- a/stdlib/source/library/lux/time/date.lux +++ b/stdlib/source/library/lux/time/date.lux @@ -2,22 +2,22 @@ [library [lux "*" [abstract - [equivalence {"+" Equivalence}] - [order {"+" Order}] - [enum {"+" Enum}] - [codec {"+" Codec}] - [monad {"+" do}]] + [equivalence (.only Equivalence)] + [order (.only Order)] + [enum (.only Enum)] + [codec (.only Codec)] + [monad (.only do)]] [control ["[0]" maybe] - ["[0]" try {"+" Try}] - ["[0]" exception {"+" exception:}] + ["[0]" try (.only Try)] + ["[0]" exception (.only exception:)] ["<>" parser - ["<[0]>" text {"+" Parser}]]] + ["<[0]>" text (.only Parser)]]] [data ["[0]" text ("[1]#[0]" monoid)] [collection ["[0]" list ("[1]#[0]" mix)] - ["[0]" dictionary {"+" Dictionary}]]] + ["[0]" dictionary (.only Dictionary)]]] [math [number ["n" nat ("[1]#[0]" decimal)] @@ -25,8 +25,8 @@ [type [primitive "*"]]]] ["[0]" // "_" - ["[1][0]" year {"+" Year}] - ["[1][0]" month {"+" Month}]]) + ["[1][0]" year (.only Year)] + ["[1][0]" month (.only Month)]]) (def: month_by_number (Dictionary Nat Month) diff --git a/stdlib/source/library/lux/time/day.lux b/stdlib/source/library/lux/time/day.lux index 02926f610..b08b4e324 100644 --- a/stdlib/source/library/lux/time/day.lux +++ b/stdlib/source/library/lux/time/day.lux @@ -2,14 +2,14 @@ [library [lux {"-" nat} [abstract - [equivalence {"+" Equivalence}] - [hash {"+" Hash}] - [order {"+" Order}] - [enum {"+" Enum}] - [codec {"+" Codec}]] + [equivalence (.only Equivalence)] + [hash (.only Hash)] + [order (.only Order)] + [enum (.only Enum)] + [codec (.only Codec)]] [control - ["[0]" try {"+" Try}] - ["[0]" exception {"+" exception:}]] + ["[0]" try (.only Try)] + ["[0]" exception (.only exception:)]] [data ["[0]" text ("[1]#[0]" monoid)]] [macro diff --git a/stdlib/source/library/lux/time/duration.lux b/stdlib/source/library/lux/time/duration.lux index 4ce7774c3..54669d1c0 100644 --- a/stdlib/source/library/lux/time/duration.lux +++ b/stdlib/source/library/lux/time/duration.lux @@ -2,16 +2,16 @@ [library [lux "*" [abstract - [equivalence {"+" Equivalence}] - [order {"+" Order}] - [enum {"+" Enum}] - [codec {"+" Codec}] - [monoid {"+" Monoid}] - [monad {"+" do}]] + [equivalence (.only Equivalence)] + [order (.only Order)] + [enum (.only Enum)] + [codec (.only Codec)] + [monoid (.only Monoid)] + [monad (.only do)]] [control ["[0]" try] ["<>" parser - ["<[0]>" text {"+" Parser}]]] + ["<[0]>" text (.only Parser)]]] [data ["[0]" text ("[1]#[0]" monoid)]] [math diff --git a/stdlib/source/library/lux/time/instant.lux b/stdlib/source/library/lux/time/instant.lux index 81ff18897..a8ccbd019 100644 --- a/stdlib/source/library/lux/time/instant.lux +++ b/stdlib/source/library/lux/time/instant.lux @@ -3,18 +3,18 @@ [lux "*" ["@" target] [abstract - [equivalence {"+" Equivalence}] - [order {"+" Order}] - [enum {"+" Enum}] - [codec {"+" Codec}] - [monad {"+" Monad do}]] + [equivalence (.only Equivalence)] + [order (.only Order)] + [enum (.only Enum)] + [codec (.only Codec)] + [monad (.only Monad do)]] [control - [io {"+" IO io}] + [io (.only IO io)] ["[0]" maybe] ["[0]" try] - ["[0]" exception {"+" exception:}] + ["[0]" exception (.only exception:)] ["<>" parser - ["<[0]>" text {"+" Parser}]]] + ["<[0]>" text (.only Parser)]]] [data ["[0]" text ("[1]#[0]" monoid)]] [math @@ -23,12 +23,12 @@ ["f" frac]]] [type [primitive "*"]]]] - ["[0]" // {"+" Time} - ["[0]" duration {"+" Duration}] - ["[0]" year {"+" Year}] - ["[0]" month {"+" Month}] - ["[0]" day {"+" Day}] - ["[0]" date {"+" Date}]]) + ["[0]" // (.only Time) + ["[0]" duration (.only Duration)] + ["[0]" year (.only Year)] + ["[0]" month (.only Month)] + ["[0]" day (.only Day)] + ["[0]" date (.only Date)]]) (primitive: .public Instant Int diff --git a/stdlib/source/library/lux/time/month.lux b/stdlib/source/library/lux/time/month.lux index 351a6ecf7..fdb3e0303 100644 --- a/stdlib/source/library/lux/time/month.lux +++ b/stdlib/source/library/lux/time/month.lux @@ -2,14 +2,14 @@ [library [lux "*" [abstract - [equivalence {"+" Equivalence}] - [hash {"+" Hash}] - [order {"+" Order}] - [enum {"+" Enum}] - [codec {"+" Codec}]] + [equivalence (.only Equivalence)] + [hash (.only Hash)] + [order (.only Order)] + [enum (.only Enum)] + [codec (.only Codec)]] [control - ["[0]" try {"+" Try}] - ["[0]" exception {"+" exception:}]] + ["[0]" try (.only Try)] + ["[0]" exception (.only exception:)]] [data ["[0]" text ("[1]#[0]" monoid)]] [macro diff --git a/stdlib/source/library/lux/time/year.lux b/stdlib/source/library/lux/time/year.lux index ad60ff921..5d233956c 100644 --- a/stdlib/source/library/lux/time/year.lux +++ b/stdlib/source/library/lux/time/year.lux @@ -2,15 +2,15 @@ [library [lux "*" [abstract - [monad {"+" do}] - [codec {"+" Codec}] - [equivalence {"+" Equivalence}] - [order {"+" Order}]] + [monad (.only do)] + [codec (.only Codec)] + [equivalence (.only Equivalence)] + [order (.only Order)]] [control - ["[0]" try {"+" Try}] - ["[0]" exception {"+" exception:}] + ["[0]" try (.only Try)] + ["[0]" exception (.only exception:)] ["<>" parser - ["<[0]>" text {"+" Parser}]]] + ["<[0]>" text (.only Parser)]]] [data ["[0]" text ("[1]#[0]" monoid)]] [math diff --git a/stdlib/source/library/lux/tool/compiler.lux b/stdlib/source/library/lux/tool/compiler.lux index 7a6df03d6..dec32a653 100644 --- a/stdlib/source/library/lux/tool/compiler.lux +++ b/stdlib/source/library/lux/tool/compiler.lux @@ -2,24 +2,24 @@ [library [lux {"-" Module Code} [control - ["[0]" try {"+" Try}] - ["[0]" exception {"+" exception:}] + ["[0]" try (.only Try)] + ["[0]" exception (.only exception:)] ["<>" parser - ["<[0]>" binary {"+" Parser}]]] + ["<[0]>" binary (.only Parser)]]] [data - [binary {"+" Binary}] + [binary (.only Binary)] ["[0]" text] ["[0]" format "_" - ["[1]" binary {"+" Writer}]]] + ["[1]" binary (.only Writer)]]] [world - ["[0]" file {"+" Path}]]]] + ["[0]" file (.only Path)]]]] [/ [meta - ["[0]" archive {"+" Output Archive} - [key {"+" Key}] + ["[0]" archive (.only Output Archive) + [key (.only Key)] [module - [descriptor {"+" Descriptor Module}] - [document {"+" Document}]]]]]) + [descriptor (.only Descriptor Module)] + [document (.only Document)]]]]]) (type: .public Code Text) diff --git a/stdlib/source/library/lux/tool/compiler/default/init.lux b/stdlib/source/library/lux/tool/compiler/default/init.lux index 5e204f6ca..bed153bb9 100644 --- a/stdlib/source/library/lux/tool/compiler/default/init.lux +++ b/stdlib/source/library/lux/tool/compiler/default/init.lux @@ -1,54 +1,54 @@ (.using [library [lux "*" - ["@" target {"+" Target}] + ["@" target (.only Target)] ["[0]" meta] [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control - ["[0]" try {"+" Try}] - ["[0]" exception {"+" exception:}]] + ["[0]" try (.only Try)] + ["[0]" exception (.only exception:)]] [data - [binary {"+" Binary}] + [binary (.only Binary)] ["[0]" product] ["[0]" text ("[1]#[0]" hash) - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" functor)] ["[0]" dictionary] ["[0]" set] ["[0]" sequence ("[1]#[0]" functor)]]] [meta - ["[0]" configuration {"+" Configuration}] + ["[0]" configuration (.only Configuration)] ["[0]" version]] [world ["[0]" file]]]] ["[0]" // "_" - ["/[1]" // {"+" Instancer} + ["/[1]" // (.only Instancer) ["[1][0]" phase] [language [lux - [program {"+" Program}] - ["[1][0]" syntax {"+" Aliases}] + [program (.only Program)] + ["[1][0]" syntax (.only Aliases)] ["[1][0]" synthesis] - ["[1][0]" directive {"+" Requirements}] + ["[1][0]" directive (.only Requirements)] ["[1][0]" generation] ["[1][0]" analysis - [macro {"+" Expander}] + [macro (.only Expander)] ["[1]/[0]" evaluation] ["[0]A" module]] [phase ["[0]P" analysis] ["[0]P" synthesis] ["[0]P" directive] - ["[0]" extension {"+" Extender} + ["[0]" extension (.only Extender) ["[0]E" analysis] ["[0]E" synthesis] [directive ["[0]D" lux]]]]]] [meta - ["[0]" archive {"+" Archive} - ["[0]" registry {"+" Registry}] + ["[0]" archive (.only Archive) + ["[0]" registry (.only Registry)] ["[0]" module ["[0]" descriptor] ["[0]" document]]]]]]) diff --git a/stdlib/source/library/lux/tool/compiler/default/platform.lux b/stdlib/source/library/lux/tool/compiler/default/platform.lux index ac43de9f2..ea24d68b5 100644 --- a/stdlib/source/library/lux/tool/compiler/default/platform.lux +++ b/stdlib/source/library/lux/tool/compiler/default/platform.lux @@ -5,68 +5,68 @@ ["[0]" debug] ["[0]" static] [abstract - ["[0]" monad {"+" Monad do}]] + ["[0]" monad (.only Monad do)]] [control ["[0]" function] ["[0]" maybe] - ["[0]" try {"+" Try} ("[1]#[0]" monad)] - ["[0]" exception {"+" exception:}] + ["[0]" try (.only Try) ("[1]#[0]" monad)] + ["[0]" exception (.only exception:)] [concurrency - ["[0]" async {"+" Async Resolver} ("[1]#[0]" monad)] - ["[0]" stm {"+" Var STM}]]] + ["[0]" async (.only Async Resolver) ("[1]#[0]" monad)] + ["[0]" stm (.only Var STM)]]] [data - ["[0]" binary {"+" Binary}] + ["[0]" binary (.only Binary)] ["[0]" bit] ["[0]" product] ["[0]" text ("[1]#[0]" equivalence) - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection - ["[0]" dictionary {"+" Dictionary}] - ["[0]" sequence {"+" Sequence} ("[1]#[0]" mix)] - ["[0]" set {"+" Set}] + ["[0]" dictionary (.only Dictionary)] + ["[0]" sequence (.only Sequence) ("[1]#[0]" mix)] + ["[0]" set (.only Set)] ["[0]" list ("[1]#[0]" monoid functor mix)]] [format - ["_" binary {"+" Writer}]]] + ["_" binary (.only Writer)]]] ["[0]" meta - ["[0]" configuration {"+" Configuration}]] - [type {"+" sharing} + ["[0]" configuration (.only Configuration)]] + [type (.only sharing) ["[0]" check]] [world - ["[0]" file {"+" Path}] + ["[0]" file (.only Path)] ["[0]" console]]]] ["[0]" // "_" ["[1][0]" init] ["/[1]" // - ["[1][0]" phase {"+" Phase}] + ["[1][0]" phase (.only Phase)] [language [lux - [program {"+" Program}] + [program (.only Program)] ["$" /] ["[0]" syntax] ["[1][0]" synthesis] - ["[1][0]" generation {"+" Buffer}] + ["[1][0]" generation (.only Buffer)] ["[1][0]" directive] ["[1][0]" analysis - [macro {"+" Expander}] + [macro (.only Expander)] ["[0]A" module]] [phase - ["[0]" extension {"+" Extender}]]]] + ["[0]" extension (.only Extender)]]]] [meta - [import {"+" Import}] + [import (.only Import)] ["[0]" context] ["[0]" cache ["[1]/[0]" archive] ["[1]/[0]" module] ["[1]/[0]" artifact]] - [cli {"+" Compilation Library} + [cli (.only Compilation Library) ["[0]" compiler]] - ["[0]" archive {"+" Output Archive} - [key {"+" Key}] - ["[0]" registry {"+" Registry}] + ["[0]" archive (.only Output Archive) + [key (.only Key)] + ["[0]" registry (.only Registry)] ["[0]" artifact] ["[0]" module - ["[0]" descriptor {"+" Descriptor}] - ["[0]" document {"+" Document}]]] + ["[0]" descriptor (.only Descriptor)] + ["[0]" document (.only Document)]]] ["[0]" io "_" ["_[1]" /] ["[1]" context] diff --git a/stdlib/source/library/lux/tool/compiler/language/lux.lux b/stdlib/source/library/lux/tool/compiler/language/lux.lux index eb6cd78d7..a6737842a 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux.lux @@ -3,10 +3,10 @@ [lux "*" [control ["<>" parser - ["<[0]>" binary {"+" Parser}]]] + ["<[0]>" binary (.only Parser)]]] [data [format - ["_" binary {"+" Writer}]]] + ["_" binary (.only Writer)]]] [meta ["[0]" version]]]] ["[0]" / "_" @@ -16,7 +16,7 @@ [meta [archive ["[0]" signature] - ["[0]" key {"+" Key}]]]]]) + ["[0]" key (.only Key)]]]]]) ... TODO: Remove #module_hash, #imports & #module_state ASAP. ... TODO: Not just from this parser, but from the lux.Module type. diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/analysis.lux b/stdlib/source/library/lux/tool/compiler/language/lux/analysis.lux index da220b18f..65855dc71 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/analysis.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/analysis.lux @@ -2,25 +2,25 @@ [library [lux {"-" Tuple Variant nat int rev case local} [abstract - [equivalence {"+" Equivalence}] - [hash {"+" Hash}] - [monad {"+" do}]] + [equivalence (.only Equivalence)] + [hash (.only Hash)] + [monad (.only do)]] [control ["[0]" function] ["[0]" maybe] - ["[0]" try {"+" Try}] - ["[0]" exception {"+" Exception}] + ["[0]" try (.only Try)] + ["[0]" exception (.only Exception)] [parser ["<[0]>" code]]] [data ["[0]" product] ["[0]" bit ("[1]#[0]" equivalence)] ["[0]" text ("[1]#[0]" equivalence) - ["%" format {"+" Format}]] + ["%" format (.only Format)]] [collection ["[0]" list ("[1]#[0]" functor mix)]]] [macro - [syntax {"+" syntax:}]] + [syntax (.only syntax:)]] [math [number ["n" nat] @@ -29,20 +29,20 @@ ["f" frac]]] [meta ["[0]" location] - ["[0]" configuration {"+" Configuration}]]]] + ["[0]" configuration (.only Configuration)]]]] ["[0]" / "_" - ["[1][0]" simple {"+" Simple}] - ["[1][0]" complex {"+" Tuple Variant Complex}] - ["[1][0]" pattern {"+" Pattern}] + ["[1][0]" simple (.only Simple)] + ["[1][0]" complex (.only Tuple Variant Complex)] + ["[1][0]" pattern (.only Pattern)] [// [phase - ["[0]" extension {"+" Extension}]] + ["[0]" extension (.only Extension)]] [/// - [arity {"+" Arity}] - ["[0]" version {"+" Version}] + [arity (.only Arity)] + ["[0]" version (.only Version)] ["[0]" phase] - ["[0]" reference {"+" Reference} - ["[0]" variable {"+" Register Variable}]]]]]) + ["[0]" reference (.only Reference) + ["[0]" variable (.only Register Variable)]]]]]) (type: .public (Branch' e) (Record diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/analysis/complex.lux b/stdlib/source/library/lux/tool/compiler/language/lux/analysis/complex.lux index f4cf115d5..a45224900 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/analysis/complex.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/analysis/complex.lux @@ -2,12 +2,12 @@ [library [lux {"-" Tuple Variant} [abstract - [equivalence {"+" Equivalence}] - [hash {"+" Hash}]] + [equivalence (.only Equivalence)] + [hash (.only Hash)]] [data ["[0]" bit ("[1]#[0]" equivalence)] ["[0]" text - ["%" format {"+" Format}]] + ["%" format (.only Format)]] [collection ["[0]" list ("[1]#[0]" functor)]]] [math diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/analysis/coverage.lux b/stdlib/source/library/lux/tool/compiler/language/lux/analysis/coverage.lux index 0e100dad2..d3f3ee556 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/analysis/coverage.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/analysis/coverage.lux @@ -3,19 +3,19 @@ [lux {"-" Variant} [abstract equivalence - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["[0]" maybe ("[1]#[0]" monoid monad)] - ["[0]" try {"+" Try}] - ["[0]" exception {"+" exception:}]] + ["[0]" try (.only Try)] + ["[0]" exception (.only exception:)]] [data ["[0]" bit ("[1]#[0]" equivalence)] ["[0]" text ["%" format]] [collection ["[0]" list ("[1]#[0]" functor mix)] - ["[0]" dictionary {"+" Dictionary}] - ["[0]" set {"+" Set} ("[1]#[0]" equivalence)]]] + ["[0]" dictionary (.only Dictionary)] + ["[0]" set (.only Set) ("[1]#[0]" equivalence)]]] [macro ["^" pattern] ["[0]" template]] @@ -28,7 +28,7 @@ ["[0]" // "_" ["[1][0]" simple] ["[1][0]" complex] - ["[1][0]" pattern {"+" Pattern}]]) + ["[1][0]" pattern (.only Pattern)]]) ... The coverage of a pattern-matching expression summarizes how well ... all the possible values of an input are being covered by the diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/analysis/evaluation.lux b/stdlib/source/library/lux/tool/compiler/language/lux/analysis/evaluation.lux index de22db2db..44349d713 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/analysis/evaluation.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/analysis/evaluation.lux @@ -1,24 +1,24 @@ (.using [library [lux "*" - [type {"+" sharing}] + [type (.only sharing)] ["[0]" meta] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" maybe] ["[0]" try] ["[0]" io] [concurrency - ["[0]" atom {"+" Atom}]]] + ["[0]" atom (.only Atom)]]] [data [collection - ["[0]" dictionary {"+" Dictionary}]]] + ["[0]" dictionary (.only Dictionary)]]] [math [number ["n" nat]]]]] - ["[0]" // {"+" Operation} - [macro {"+" Expander}] + ["[0]" // (.only Operation) + [macro (.only Expander)] ["[1][0]" type] ["[1][0]" scope] [// @@ -32,7 +32,7 @@ [/// ["[0]" phase] [meta - ["[0]" archive {"+" Archive} + ["[0]" archive (.only Archive) ["[0]" module]]]]]]]]) (type: .public Eval diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/analysis/inference.lux b/stdlib/source/library/lux/tool/compiler/language/lux/analysis/inference.lux index 88f4c7069..2d56c6baf 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/analysis/inference.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/analysis/inference.lux @@ -3,15 +3,15 @@ [lux "*" ["[0]" meta] [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["[0]" pipe] ["[0]" maybe] ["[0]" try] - ["[0]" exception {"+" exception:}]] + ["[0]" exception (.only exception:)]] [data ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" functor monoid)]]] [macro @@ -22,7 +22,7 @@ ["n" nat]]] ["[0]" type ["[0]" check]]]] - ["/" // {"+" Analysis Operation Phase} + ["/" // (.only Analysis Operation Phase) ["[1][0]" type] [// [phase @@ -30,7 +30,7 @@ [/// ["[0]" phase ("[1]#[0]" monad)] [meta - [archive {"+" Archive}]]]]]) + [archive (.only Archive)]]]]]) (exception: .public (cannot_infer [type Type arguments (List Code)]) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/analysis/macro.lux b/stdlib/source/library/lux/tool/compiler/language/lux/analysis/macro.lux index b1cf6d24a..55cec2b7c 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/analysis/macro.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/analysis/macro.lux @@ -2,13 +2,13 @@ [library [lux "*" [abstract - [monad {"+" do}]] + [monad (.only do)]] [control - ["[0]" try {"+" Try}] - ["[0]" exception {"+" exception:}]] + ["[0]" try (.only Try)] + ["[0]" exception (.only exception:)]] [data ["[0]" text - ["%" format {"+" format}]]] + ["%" format (.only format)]]] ["[0]" meta]]] [///// ["[0]" phase]]) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/analysis/module.lux b/stdlib/source/library/lux/tool/compiler/language/lux/analysis/module.lux index 1a95a5a2c..accb1b6c2 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/analysis/module.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/analysis/module.lux @@ -2,20 +2,20 @@ [library [lux {"-" Label} [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["[0]" pipe] ["[0]" try] - ["[0]" exception {"+" exception:}]] + ["[0]" exception (.only exception:)]] [data ["[0]" text ("[1]#[0]" equivalence) - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" mix functor)] [dictionary ["[0]" plist]]]] ["[0]" meta]]] - ["/" // {"+" Operation} + ["/" // (.only Operation) ["//[1]" // "_" [phase ["[1][0]" extension]] diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/analysis/pattern.lux b/stdlib/source/library/lux/tool/compiler/language/lux/analysis/pattern.lux index cfce834d0..fb7d38b19 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/analysis/pattern.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/analysis/pattern.lux @@ -2,7 +2,7 @@ [library [lux {"-" nat int rev} [abstract - [equivalence {"+" Equivalence}]] + [equivalence (.only Equivalence)]] [data [text ["%" format]]] @@ -10,11 +10,11 @@ [number ["n" nat]]]]] ["[0]" // "_" - ["[1][0]" simple {"+" Simple}] - ["[1][0]" complex {"+" Complex}] + ["[1][0]" simple (.only Simple)] + ["[1][0]" complex (.only Complex)] [//// [reference - ["[1][0]" variable {"+" Register}]]]]) + ["[1][0]" variable (.only Register)]]]]) (type: .public Pattern (Rec Pattern diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/analysis/scope.lux b/stdlib/source/library/lux/tool/compiler/language/lux/analysis/scope.lux index 040298209..8b9f33470 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/analysis/scope.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/analysis/scope.lux @@ -2,11 +2,11 @@ [library [lux {"-" local} [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" maybe ("[1]#[0]" monad)] ["[0]" try] - ["[0]" exception {"+" exception:}]] + ["[0]" exception (.only exception:)]] [data ["[0]" text ("[1]#[0]" equivalence)] ["[0]" product] @@ -14,14 +14,14 @@ ["[0]" list ("[1]#[0]" functor mix monoid)] [dictionary ["[0]" plist]]]]]] - ["/" // {"+" Environment Operation Phase} + ["/" // (.only Environment Operation Phase) [// [phase ["[0]" extension]] [/// ["[0]" phase] [reference - ["[0]" variable {"+" Register Variable}]]]]]) + ["[0]" variable (.only Register Variable)]]]]]) (type: Local (Bindings Text [Type Register])) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/analysis/simple.lux b/stdlib/source/library/lux/tool/compiler/language/lux/analysis/simple.lux index b7518ded0..129d50c89 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/analysis/simple.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/analysis/simple.lux @@ -2,11 +2,11 @@ [library [lux "*" [abstract - [equivalence {"+" Equivalence}]] + [equivalence (.only Equivalence)]] [data ["[0]" bit ("[1]#[0]" equivalence)] ["[0]" text ("[1]#[0]" equivalence) - ["%" format {"+" Format}]]] + ["%" format (.only Format)]]] [macro ["^" pattern]] [math diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/analysis/type.lux b/stdlib/source/library/lux/tool/compiler/language/lux/analysis/type.lux index b215fa8b0..39b1715f9 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/analysis/type.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/analysis/type.lux @@ -3,13 +3,13 @@ [lux "*" ["[0]" meta] [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["[0]" function] ["[0]" try]] [data ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list]]] [macro @@ -18,8 +18,8 @@ [number ["n" nat]]] [type - ["[0]" check {"+" Check}]]]] - ["/" // {"+" Operation} + ["[0]" check (.only Check)]]]] + ["/" // (.only Operation) [// [phase ["[0]" extension]] diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/directive.lux b/stdlib/source/library/lux/tool/compiler/language/lux/directive.lux index d9bf832a3..7d8165ccd 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/directive.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/directive.lux @@ -2,7 +2,7 @@ [library [lux {"-" Module} [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" try]] [data @@ -19,7 +19,7 @@ [meta [archive [module - [descriptor {"+" Module}]]]]]]) + [descriptor (.only Module)]]]]]]) (type: .public (Component state phase) (Record diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/generation.lux b/stdlib/source/library/lux/tool/compiler/language/lux/generation.lux index 2b9f8b598..9e3b03940 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/generation.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/generation.lux @@ -2,20 +2,20 @@ [library [lux {"-" symbol} [abstract - [monad {"+" do}]] + [monad (.only do)]] [control - ["[0]" try {"+" Try}] - ["[0]" exception {"+" exception:}] + ["[0]" try (.only Try)] + ["[0]" exception (.only exception:)] ["[0]" function]] [data - [binary {"+" Binary}] + [binary (.only Binary)] ["[0]" product] ["[0]" text ("[1]#[0]" equivalence) - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection - ["[0]" sequence {"+" Sequence}] + ["[0]" sequence (.only Sequence)] ["[0]" list ("[1]#[0]" functor mix)] - ["[0]" set {"+" Set}]]] + ["[0]" set (.only Set)]]] [macro ["^" pattern] ["[0]" template]] @@ -25,14 +25,14 @@ [meta ["[0]" symbol]]]] [// - [synthesis {"+" Synthesis}] + [synthesis (.only Synthesis)] [phase ["[0]" extension]] [/// ["[0]" phase] [meta - ["[0]" archive {"+" Archive} - ["[0]" registry {"+" Registry}] + ["[0]" archive (.only Archive) + ["[0]" registry (.only Registry)] ["[0]" unit] ["[0]" artifact ["[0]" category]] diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/analysis.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/analysis.lux index 32e4ed22e..48c27ed4d 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/analysis.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/analysis.lux @@ -2,12 +2,12 @@ [library [lux "*" [abstract - [monad {"+" do}]] + [monad (.only do)]] [control - ["[0]" exception {"+" exception:}]] + ["[0]" exception (.only exception:)]] [data [text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list]]] [macro @@ -27,14 +27,14 @@ ["/[1]" // "_" ["[1][0]" extension] ["/[1]" // "_" - ["/" analysis {"+" Analysis Operation Phase} - ["[1][0]" macro {"+" Expander}] + ["/" analysis (.only Analysis Operation Phase) + ["[1][0]" macro (.only Expander)] ["[1][0]" type]] [/// ["//" phase] ["[0]" reference] [meta - [archive {"+" Archive}]]]]]]) + [archive (.only Archive)]]]]]]) (exception: .public (invalid [syntax Code]) (exception.report diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/analysis/case.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/analysis/case.lux index 394d54163..c811a2319 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/analysis/case.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/analysis/case.lux @@ -3,15 +3,15 @@ [lux {"-" case} ["[0]" meta] [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["[0]" maybe] ["[0]" try] - ["[0]" exception {"+" exception:}]] + ["[0]" exception (.only exception:)]] [data ["[0]" product] [text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" mix monoid monad)]]] [math @@ -21,20 +21,20 @@ ["^" pattern] ["[0]" code]] ["[0]" type - ["[0]" check {"+" Check}]]]] + ["[0]" check (.only Check)]]]] ["[0]" / "_" ["/[1]" // "_" ["[1][0]" complex] ["/[1]" // "_" ["[1][0]" extension] [// - ["/" analysis {"+" Analysis Operation Phase} + ["/" analysis (.only Analysis Operation Phase) ["[1][0]" simple] ["[1][0]" complex] - ["[1][0]" pattern {"+" Pattern}] + ["[1][0]" pattern (.only Pattern)] ["[1][0]" type] ["[1][0]" scope] - ["[1][0]" coverage {"+" Coverage}]] + ["[1][0]" coverage (.only Coverage)]] [/// ["[1]" phase]]]]]]) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/analysis/complex.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/analysis/complex.lux index b1d7398e6..770cf6262 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/analysis/complex.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/analysis/complex.lux @@ -3,19 +3,19 @@ [lux "*" ["[0]" meta] [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["[0]" maybe] ["[0]" try] - ["[0]" exception {"+" exception:}] + ["[0]" exception (.only exception:)] ["[0]" state]] [data ["[0]" product] ["[0]" text ("[1]#[0]" equivalence) - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" monad)] - ["[0]" dictionary {"+" Dictionary}]]] + ["[0]" dictionary (.only Dictionary)]]] [macro ["[0]" code]] [math @@ -30,14 +30,14 @@ ["/[1]" // "_" ["[1][0]" extension] [// - ["/" analysis {"+" Analysis Operation Phase} - ["[1][0]" complex {"+" Tag}] + ["/" analysis (.only Analysis Operation Phase) + ["[1][0]" complex (.only Tag)] ["[1][0]" type] ["[1][0]" inference]] [/// ["[1]" phase ("[1]#[0]" monad)] [meta - [archive {"+" Archive}]]]]]]) + [archive (.only Archive)]]]]]]) (exception: .public (not_a_quantified_type [type Type]) (exception.report diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/analysis/function.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/analysis/function.lux index 6416fbe77..d97680bd0 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/analysis/function.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/analysis/function.lux @@ -3,15 +3,15 @@ [lux {"-" function} ["[0]" meta] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" maybe] ["[0]" try] - ["[0]" exception {"+" exception:}]] + ["[0]" exception (.only exception:)]] [data ["[0]" product] ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" monoid monad)]]] [math @@ -22,14 +22,14 @@ ["[0]" /// "_" ["[1][0]" extension] [// - ["/" analysis {"+" Analysis Operation Phase} + ["/" analysis (.only Analysis Operation Phase) ["[1][0]" type] ["[1][0]" inference] ["[1][0]" scope]] [/// ["[1]" phase ("[1]#[0]" functor)] - [reference {"+"} - [variable {"+"}]]]]]) + [reference (.only) + [variable (.only)]]]]]) (exception: .public (cannot_analyse [expected Type function Text diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/analysis/reference.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/analysis/reference.lux index e5f1914ab..66ef31041 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/analysis/reference.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/analysis/reference.lux @@ -3,19 +3,19 @@ [lux "*" ["[0]" meta] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control - ["[0]" exception {"+" exception:}]] + ["[0]" exception (.only exception:)]] [data ["[0]" text ("[1]#[0]" equivalence) - ["%" format {"+" format}]]] + ["%" format (.only format)]]] [macro ["^" pattern]]]] ["[0]" // "_" ["/[1]" // "_" ["[1][0]" extension] [// - ["/" analysis {"+" Analysis Operation} + ["/" analysis (.only Analysis Operation) ["[1][0]" type] ["[1][0]" scope]] [/// diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/analysis/simple.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/analysis/simple.lux index 54b9b7a36..fdfe2e431 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/analysis/simple.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/analysis/simple.lux @@ -2,10 +2,10 @@ [library [lux {"-" nat int rev} [abstract - [monad {"+" do}]]]] + [monad (.only do)]]]] ["[0]" /// "_" [// - ["/" analysis {"+" Analysis Operation} + ["/" analysis (.only Analysis Operation) ["[1][0]" simple] ["[1][0]" type]] [/// diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/directive.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/directive.lux index df695d244..a745da868 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/directive.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/directive.lux @@ -3,30 +3,30 @@ [lux "*" ["[0]" meta] [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["[0]" try] - ["[0]" exception {"+" exception:}]] + ["[0]" exception (.only exception:)]] [data [text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" mix monoid)]]]]] ["[0]" // "_" ["[1][0]" extension] ["[1][0]" analysis] ["/[1]" // "_" - ["/" directive {"+" Operation Phase}] + ["/" directive (.only Operation Phase)] ["[1][0]" analysis ["[0]" evaluation] - ["[1]/[0]" macro {"+" Expander}] + ["[1]/[0]" macro (.only Expander)] ["[1]/[0]" type]] [/// ["//" phase] - [reference {"+" } - [variable {"+" }]] + [reference (.only) + [variable (.only)]] [meta - [archive {"+" Archive}]]]]]) + [archive (.only Archive)]]]]]) (exception: .public (not_a_directive [code Code]) (exception.report diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension.lux index 42528ba33..bb5535fa5 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension.lux @@ -2,26 +2,26 @@ [library [lux "*" [abstract - [equivalence {"+" Equivalence}] - [hash {"+" Hash}] - ["[0]" monad {"+" do}]] + [equivalence (.only Equivalence)] + [hash (.only Hash)] + ["[0]" monad (.only do)]] [control ["[0]" function] - ["[0]" try {"+" Try}] - ["[0]" exception {"+" exception:}]] + ["[0]" try (.only Try)] + ["[0]" exception (.only exception:)]] [data ["[0]" product] ["[0]" text ("[1]#[0]" order) - ["%" format {"+" Format format}]] + ["%" format (.only Format format)]] [collection ["[0]" list] - ["[0]" dictionary {"+" Dictionary}]]] + ["[0]" dictionary (.only Dictionary)]]] [macro ["^" pattern]]]] [///// ["//" phase] [meta - [archive {"+" Archive}]]]) + [archive (.only Archive)]]]) (type: .public Name Text) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/analysis.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/analysis.lux index 3529ba762..cec02696e 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/analysis.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/analysis.lux @@ -5,8 +5,8 @@ [collection ["[0]" dictionary]]]]] [//// - [analysis {"+" Bundle} - [evaluation {"+" Eval}]]] + [analysis (.only Bundle) + [evaluation (.only Eval)]]] ["[0]" / "_" ["[1][0]" lux]]) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/analysis/common_lisp.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/analysis/common_lisp.lux index 031f4d779..bdf1723f4 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/analysis/common_lisp.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/analysis/common_lisp.lux @@ -1,32 +1,32 @@ (.using - [library - [lux "*" - ["[0]" ffi] - [abstract - ["[0]" monad {"+" do}]] - [control - ["<>" parser - ["<c>" code {"+" Parser}]]] - [data - [collection - ["[0]" array {"+" Array}] - ["[0]" dictionary] - ["[0]" list]]] - ["[0]" type - ["[0]" check]] - ["@" target - ["_" common_lisp]]]] + [library + [lux "*" + ["[0]" ffi] + [abstract + ["[0]" monad (.only do)]] + [control + ["<>" parser + ["<c>" code (.only Parser)]]] + [data + [collection + ["[0]" array (.only Array)] + ["[0]" dictionary] + ["[0]" list]]] + ["[0]" type + ["[0]" check]] + ["@" target + ["_" common_lisp]]]] + [// + ["/" lux (.only custom)] [// - ["/" lux {"+" custom}] + ["[0]" bundle] [// - ["[0]" bundle] + ["[0]" analysis "_" + ["[1]/[0]" type]] [// - ["[0]" analysis "_" - ["[1]/[0]" type]] - [// - ["[0]" analysis {"+" Analysis Operation Phase Handler Bundle}] - [/// - ["[0]" phase]]]]]]) + ["[0]" analysis (.only Analysis Operation Phase Handler Bundle)] + [/// + ["[0]" phase]]]]]]) (def: .public bundle Bundle diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/analysis/js.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/analysis/js.lux index 39a8ef632..440a0d9b1 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/analysis/js.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/analysis/js.lux @@ -3,10 +3,10 @@ [lux "*" ["[0]" ffi] [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["<>" parser - ["<[0]>" code {"+" Parser}]]] + ["<[0]>" code (.only Parser)]]] [data [collection ["[0]" array] @@ -17,11 +17,11 @@ ["@" target ["_" js]]]] [// - ["/" lux {"+" custom}] + ["/" lux (.only custom)] [// ["[0]" bundle] [/// - ["[0]" analysis {"+" Analysis Operation Phase Handler Bundle} + ["[0]" analysis (.only Analysis Operation Phase Handler Bundle) ["[1]/[0]" type]] [/// ["[0]" phase]]]]]) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/analysis/jvm.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/analysis/jvm.lux index 6a54bf8e5..572ecb60a 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/analysis/jvm.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/analysis/jvm.lux @@ -1,28 +1,28 @@ (.using [library [lux {"-" Type Module Primitive type char int} - ["[0]" ffi {"+" import:}] + ["[0]" ffi (.only import:)] ["[0]" meta] [abstract - ["[0]" monad {"+" do}] + ["[0]" monad (.only do)] ["[0]" predicate]] [control ["[0]" pipe] ["[0]" maybe ("[1]#[0]" functor)] - ["[0]" try {"+" Try} ("[1]#[0]" monad)] - ["[0]" exception {"+" exception:}] + ["[0]" try (.only Try) ("[1]#[0]" monad)] + ["[0]" exception (.only exception:)] ["<>" parser - ["<[0]>" code {"+" Parser}] + ["<[0]>" code (.only Parser)] ["<[0]>" text]]] [data - [binary {"+" Binary}] + [binary (.only Binary)] ["[0]" product] ["[0]" text ("[1]#[0]" equivalence) - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" mix monad monoid)] ["[0]" array] - ["[0]" dictionary {"+" Dictionary}] + ["[0]" dictionary (.only Dictionary)] ["[0]" sequence]] ["[0]" format "_" ["[1]" binary]]] @@ -36,30 +36,30 @@ [target ["[0]" jvm "_" ["[0]!" reflection] - ["_" bytecode {"+" Bytecode} ("[1]#[0]" monad)] - ["[0]" modifier {"+" Modifier} ("[1]#[0]" monoid)] + ["_" bytecode (.only Bytecode) ("[1]#[0]" monad)] + ["[0]" modifier (.only Modifier) ("[1]#[0]" monoid)] ["[0]" attribute] ["[0]" field] ["[0]" version] ["[0]" method] ["[0]" class] ["[0]" constant - ["[0]" pool {"+" Resource}]] + ["[0]" pool (.only Resource)]] [encoding - ["[0]" name {"+" External}]] - ["[1]" type {"+" Type Argument Typed} ("[1]#[0]" equivalence) - ["[0]" category {"+" Void Value' Value Return' Return Primitive Object Class Array Var Parameter Method}] + ["[0]" name (.only External)]] + ["[1]" type (.only Type Argument Typed) ("[1]#[0]" equivalence) + ["[0]" category (.only Void Value' Value Return' Return Primitive Object Class Array Var Parameter Method)] ["[0]" box] ["[0]" reflection] ["[0]" descriptor] ["[0]" signature] ["[0]" parser] - ["[0]" alias {"+" Aliasing}] - ["[0]T" lux {"+" Mapping}]]]] + ["[0]" alias (.only Aliasing)] + ["[0]T" lux (.only Mapping)]]]] ["[0]" type - ["[0]" check {"+" Check} ("[1]#[0]" monad)]]]] + ["[0]" check (.only Check) ("[1]#[0]" monad)]]]] ["[0]" // "_" - ["[1][0]" lux {"+" custom}] + ["[1][0]" lux (.only custom)] ["/[1]" // ["[1][0]" bundle] ["/[1]" // "_" @@ -71,7 +71,7 @@ ["/[1]" // "_" ["[0]" generation] ["[0]" directive] - ["[1][0]" analysis {"+" Analysis Operation Phase Handler Bundle} + ["[1][0]" analysis (.only Analysis Operation Phase Handler Bundle) ["[0]" complex] ["[0]" pattern] ["[0]" inference] @@ -80,9 +80,9 @@ [/// ["[0]" phase ("[1]#[0]" monad)] [meta - [archive {"+" Archive} + [archive (.only Archive) [module - [descriptor {"+" Module}]]]]]]]]]) + [descriptor (.only Module)]]]]]]]]]) (import: java/lang/ClassLoader "[1]::[0]") diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/analysis/lua.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/analysis/lua.lux index 6f5b62016..1f5c91fe7 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/analysis/lua.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/analysis/lua.lux @@ -3,10 +3,10 @@ [lux "*" ["[0]" ffi] [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["<>" parser - ["<[0]>" code {"+" Parser}]]] + ["<[0]>" code (.only Parser)]]] [data [collection ["[0]" array] @@ -17,11 +17,11 @@ ["@" target ["_" lua]]]] [// - ["/" lux {"+" custom}] + ["/" lux (.only custom)] [// ["[0]" bundle] [/// - ["[0]" analysis {"+" Analysis Operation Phase Handler Bundle} + ["[0]" analysis (.only Analysis Operation Phase Handler Bundle) ["[1]/[0]" type]] [/// ["[0]" phase]]]]]) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/analysis/lux.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/analysis/lux.lux index 6ff97bb35..8b870557d 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/analysis/lux.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/analysis/lux.lux @@ -2,19 +2,19 @@ [library [lux "*" [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["[0]" maybe] ["[0]" try] - ["[0]" exception {"+" exception:}] + ["[0]" exception (.only exception:)] ["<>" parser - ["<[0]>" code {"+" Parser}]]] + ["<[0]>" code (.only Parser)]]] [data ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" functor)] - ["[0]" dictionary {"+" Dictionary}]]] + ["[0]" dictionary (.only Dictionary)]]] [macro ["^" pattern]] [math @@ -27,13 +27,13 @@ ["[1][0]" bundle] ["/[1]" // "_" [// - ["[1][0]" analysis {"+" Analysis Operation Phase Handler Bundle} - [evaluation {"+" Eval}] + ["[1][0]" analysis (.only Analysis Operation Phase Handler Bundle) + [evaluation (.only Eval)] ["[0]A" type]] [/// ["[1]" phase] [meta - [archive {"+" Archive}]]]]]]) + [archive (.only Archive)]]]]]]) (def: .public (custom [syntax handler]) (All (_ s) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/analysis/php.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/analysis/php.lux index 6d7b0d128..5befafa46 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/analysis/php.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/analysis/php.lux @@ -3,13 +3,13 @@ [lux "*" ["[0]" ffi] [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["<>" parser - ["<c>" code {"+" Parser}]]] + ["<c>" code (.only Parser)]]] [data [collection - ["[0]" array {"+" Array}] + ["[0]" array (.only Array)] ["[0]" dictionary] ["[0]" list]]] ["[0]" type @@ -17,14 +17,14 @@ ["@" target ["_" php]]]] [// - ["/" lux {"+" custom}] + ["/" lux (.only custom)] [// ["[0]" bundle] [// ["[0]" analysis "_" ["[1]/[0]" type]] [// - ["[0]" analysis {"+" Analysis Operation Phase Handler Bundle}] + ["[0]" analysis (.only Analysis Operation Phase Handler Bundle)] [/// ["[0]" phase]]]]]]) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/analysis/python.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/analysis/python.lux index 9156e497b..4a194a6db 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/analysis/python.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/analysis/python.lux @@ -3,10 +3,10 @@ [lux "*" ["[0]" ffi] [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["<>" parser - ["<[0]>" code {"+" Parser}]]] + ["<[0]>" code (.only Parser)]]] [data [collection ["[0]" array] @@ -17,11 +17,11 @@ ["@" target ["_" python]]]] [// - ["/" lux {"+" custom}] + ["/" lux (.only custom)] [// ["[0]" bundle] [/// - ["[0]" analysis {"+" Analysis Operation Phase Handler Bundle} + ["[0]" analysis (.only Analysis Operation Phase Handler Bundle) ["[1]/[0]" type]] [/// ["[0]" phase]]]]]) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/analysis/r.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/analysis/r.lux index d842741db..871fa9054 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/analysis/r.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/analysis/r.lux @@ -1,32 +1,32 @@ (.using - [library - [lux "*" - ["[0]" ffi] - [abstract - ["[0]" monad {"+" do}]] - [control - ["<>" parser - ["<c>" code {"+" Parser}]]] - [data - [collection - ["[0]" array {"+" Array}] - ["[0]" dictionary] - ["[0]" list]]] - ["[0]" type - ["[0]" check]] - ["@" target - ["_" r]]]] + [library + [lux "*" + ["[0]" ffi] + [abstract + ["[0]" monad (.only do)]] + [control + ["<>" parser + ["<c>" code (.only Parser)]]] + [data + [collection + ["[0]" array (.only Array)] + ["[0]" dictionary] + ["[0]" list]]] + ["[0]" type + ["[0]" check]] + ["@" target + ["_" r]]]] + [// + ["/" lux (.only custom)] [// - ["/" lux {"+" custom}] + ["[0]" bundle] [// - ["[0]" bundle] + ["[0]" analysis "_" + ["[1]/[0]" type]] [// - ["[0]" analysis "_" - ["[1]/[0]" type]] - [// - ["[0]" analysis {"+" Analysis Operation Phase Handler Bundle}] - [/// - ["[0]" phase]]]]]]) + ["[0]" analysis (.only Analysis Operation Phase Handler Bundle)] + [/// + ["[0]" phase]]]]]]) (def: .public bundle Bundle diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/analysis/ruby.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/analysis/ruby.lux index 9ab5d8351..d7c2eba78 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/analysis/ruby.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/analysis/ruby.lux @@ -3,10 +3,10 @@ [lux "*" ["[0]" ffi] [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["<>" parser - ["<[0]>" code {"+" Parser}]]] + ["<[0]>" code (.only Parser)]]] [data [collection ["[0]" array] @@ -17,11 +17,11 @@ ["@" target ["_" ruby]]]] [// - ["/" lux {"+" custom}] + ["/" lux (.only custom)] [// ["[0]" bundle] [/// - ["[0]" analysis {"+" Analysis Operation Phase Handler Bundle} + ["[0]" analysis (.only Analysis Operation Phase Handler Bundle) ["[1]/[0]" type]] [/// ["[0]" phase]]]]]) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/analysis/scheme.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/analysis/scheme.lux index fb119ae7e..6901b48dc 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/analysis/scheme.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/analysis/scheme.lux @@ -3,13 +3,13 @@ [lux "*" ["[0]" ffi] [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["<>" parser - ["<c>" code {"+" Parser}]]] + ["<c>" code (.only Parser)]]] [data [collection - ["[0]" array {"+" Array}] + ["[0]" array (.only Array)] ["[0]" dictionary] ["[0]" list]]] ["[0]" type @@ -17,14 +17,14 @@ ["@" target ["_" scheme]]]] [// - ["/" lux {"+" custom}] + ["/" lux (.only custom)] [// ["[0]" bundle] [// ["[0]" analysis "_" ["[1]/[0]" type]] [// - ["[0]" analysis {"+" Analysis Operation Phase Handler Bundle}] + ["[0]" analysis (.only Analysis Operation Phase Handler Bundle)] [/// ["[0]" phase]]]]]]) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/bundle.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/bundle.lux index a13e79398..cf4ab6a6f 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/bundle.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/bundle.lux @@ -1,15 +1,15 @@ (.using - [library - [lux "*" - [abstract - [monad {"+" do}]] - [data - ["[0]" text - ["%" format {"+" format}]] - [collection - ["[0]" list ("[1]#[0]" functor)] - ["[0]" dictionary {"+" Dictionary}]]]]] - [// {"+" Handler Bundle}]) + [library + [lux "*" + [abstract + [monad (.only do)]] + [data + ["[0]" text + ["%" format (.only format)]] + [collection + ["[0]" list ("[1]#[0]" functor)] + ["[0]" dictionary (.only Dictionary)]]]]] + [// (.only Handler Bundle)]) (def: .public empty Bundle diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/directive/jvm.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/directive/jvm.lux index 1a30f6bc6..28f555dce 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/directive/jvm.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/directive/jvm.lux @@ -1,27 +1,27 @@ (.using [library [lux {"-" Type Definition Primitive} - ["[0]" ffi {"+" import:}] + ["[0]" ffi (.only import:)] [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["[0]" pipe] - ["[0]" try {"+" Try} ("[1]#[0]" functor)] + ["[0]" try (.only Try) ("[1]#[0]" functor)] ["[0]" exception] ["<>" parser ("[1]#[0]" monad) - ["<[0]>" code {"+" Parser}] + ["<[0]>" code (.only Parser)] ["<[0]>" text] ["<[0]>" synthesis]]] [data - [binary {"+" Binary}] + [binary (.only Binary)] ["[0]" product] [text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" functor mix)] ["[0]" dictionary] ["[0]" sequence] - ["[0]" set {"+" Set}]] + ["[0]" set (.only Set)]] ["[0]" format "_" ["[1]" binary]]] [macro @@ -33,31 +33,31 @@ ["[0]" i32]]] [target [jvm - ["_" bytecode {"+" Bytecode} ("[1]#[0]" monad)] - ["[0]" modifier {"+" Modifier} ("[1]#[0]" monoid)] + ["_" bytecode (.only Bytecode) ("[1]#[0]" monad)] + ["[0]" modifier (.only Modifier) ("[1]#[0]" monoid)] ["[0]" attribute] ["[0]" field] ["[0]" version] - ["[0]" method {"+" Method}] + ["[0]" method (.only Method)] ["[0]" class] ["[0]" constant - ["[0]" pool {"+" Resource}]] + ["[0]" pool (.only Resource)]] [encoding - ["[0]" name {"+" External}]] - ["[0]" type {"+" Type Constraint Argument Typed} - [category {"+" Void Value Return Primitive Object Class Array Var Parameter}] - ["[0]T" lux {"+" Mapping}] + ["[0]" name (.only External)]] + ["[0]" type (.only Type Constraint Argument Typed) + [category (.only Void Value Return Primitive Object Class Array Var Parameter)] + ["[0]T" lux (.only Mapping)] ["[0]" signature] ["[0]" reflection] - ["[0]" descriptor {"+" Descriptor}] + ["[0]" descriptor (.only Descriptor)] ["[0]" parser]]]] [tool [compiler ["[0]" phase] [reference - [variable {"+" Register}]] + [variable (.only Register)]] [meta - [archive {"+" Archive} + [archive (.only Archive) ["[0]" artifact] ["[0]" unit]] ["[0]" cache "_" @@ -65,16 +65,16 @@ ["[1]" artifact]]]] [language [lux - ["[0]" synthesis {"+" Synthesis}] + ["[0]" synthesis (.only Synthesis)] ["[0]" generation] - ["[0]" directive {"+" Handler Bundle}] - ["[0]" analysis {"+" Analysis} + ["[0]" directive (.only Handler Bundle)] + ["[0]" analysis (.only Analysis) ["[0]A" type] ["[0]A" scope]] [phase [generation [jvm - ["[0]" runtime {"+" Anchor Definition Extender}] + ["[0]" runtime (.only Anchor Definition Extender)] ["[0]" value]]] ["[0]" extension ["[0]" bundle] @@ -86,7 +86,7 @@ [directive ["/" lux]]]]]]]] [type - ["[0]" check {"+" Check}]]]]) + ["[0]" check (.only Check)]]]]) (type: Operation (directive.Operation Anchor (Bytecode Any) Definition)) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/directive/lux.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/directive/lux.lux index 2d07295c0..b7da13039 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/directive/lux.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/directive/lux.lux @@ -4,51 +4,51 @@ ["@" target] ["[0]" meta] [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control - [io {"+" IO}] + [io (.only IO)] ["[0]" maybe ("[1]#[0]" functor)] ["[0]" try] - ["[0]" exception {"+" exception:}] + ["[0]" exception (.only exception:)] ["<>" parser - ["<[0]>" code {"+" Parser}]]] + ["<[0]>" code (.only Parser)]]] [data ["[0]" binary] ["[0]" product] ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" dictionary] ["[0]" array] ["[0]" list ("[1]#[0]" functor mix)] - ["[0]" set {"+" Set}]]] + ["[0]" set (.only Set)]]] [macro ["^" pattern] ["[0]" code]] [math [number ["n" nat]]] - ["[0]" type {"+" sharing} ("[1]#[0]" equivalence) + ["[0]" type (.only sharing) ("[1]#[0]" equivalence) ["[0]" check]]]] - ["[0]" /// {"+" Extender} + ["[0]" /// (.only Extender) ["[1][0]" bundle] ["[1][0]" analysis] ["/[1]" // "_" ["/[1]" // "_" ["[1][0]" analysis - [macro {"+" Expander}] + [macro (.only Expander)] ["[1]/[0]" evaluation] ["[0]A" type] ["[0]A" module] ["[0]" scope]] - ["[1][0]" synthesis {"+" Synthesis}] + ["[1][0]" synthesis (.only Synthesis)] ["[1][0]" generation] - ["[1][0]" directive {"+" Import Requirements Phase Operation Handler Bundle}] - ["[1][0]" program {"+" Program}] + ["[1][0]" directive (.only Import Requirements Phase Operation Handler Bundle)] + ["[1][0]" program (.only Program)] [/// ["[0]" phase] [meta - ["[0]" archive {"+" Archive} + ["[0]" archive (.only Archive) ["[0]" artifact] ["[0]" module] ["[0]" unit]] diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/common_lisp.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/common_lisp.lux index bb22d2126..15f572207 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/common_lisp.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/common_lisp.lux @@ -10,7 +10,7 @@ [//// [generation [common_lisp - [runtime {"+" Bundle}]]]]]) + [runtime (.only Bundle)]]]]]) (def: .public bundle Bundle diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/common_lisp/common.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/common_lisp/common.lux index 0a4a86df5..861fb2de5 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/common_lisp/common.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/common_lisp/common.lux @@ -2,16 +2,16 @@ [library [lux "*" [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["[0]" function] ["[0]" try] ["<>" parser - ["<s>" synthesis {"+" Parser}]]] + ["<s>" synthesis (.only Parser)]]] [data ["[0]" product] ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" dictionary] ["[0]" set] @@ -20,20 +20,20 @@ [number ["f" frac]]] ["@" target - ["_" common_lisp {"+" Expression}]]]] + ["_" common_lisp (.only Expression)]]]] ["[0]" //// "_" ["/" bundle] ["/[1]" // "_" ["[0]" extension] [generation - [extension {"+" Nullary Unary Binary Trinary - nullary unary binary trinary}] + [extension (.only Nullary Unary Binary Trinary + nullary unary binary trinary)] ["[0]" reference] ["//" common_lisp "_" - ["[1][0]" runtime {"+" Operation Phase Handler Bundle Generator}] + ["[1][0]" runtime (.only Operation Phase Handler Bundle Generator)] ["[1][0]" case]]] [// - ["[0]" synthesis {"+" %synthesis}] + ["[0]" synthesis (.only %synthesis)] ["[0]" generation] [/// ["[1]" phase]]]]]) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/common_lisp/host.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/common_lisp/host.lux index b5077cb7b..5a246b3ef 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/common_lisp/host.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/common_lisp/host.lux @@ -1,37 +1,37 @@ (.using - [library - [lux "*" - [abstract - ["[0]" monad {"+" do}]] - [control - ["[0]" function] - ["<>" parser - ["<s>" synthesis {"+" Parser}]]] - [data - [collection - ["[0]" dictionary] - ["[0]" list]] - [text - ["%" format {"+" format}]]] - [target - ["_" common_lisp {"+" Var Expression}]]]] - ["[0]" // "_" - ["[1][0]" common {"+" custom}] - ["//[1]" /// "_" - ["/" bundle] + [library + [lux "*" + [abstract + ["[0]" monad (.only do)]] + [control + ["[0]" function] + ["<>" parser + ["<s>" synthesis (.only Parser)]]] + [data + [collection + ["[0]" dictionary] + ["[0]" list]] + [text + ["%" format (.only format)]]] + [target + ["_" common_lisp (.only Var Expression)]]]] + ["[0]" // "_" + ["[1][0]" common (.only custom)] + ["//[1]" /// "_" + ["/" bundle] + ["/[1]" // "_" + ["[0]" extension] + [generation + [extension (.only Nullary Unary Binary Trinary + nullary unary binary trinary)] + ["[0]" reference] + ["//" common_lisp "_" + ["[1][0]" runtime (.only Operation Phase Handler Bundle + with_vars)]]] ["/[1]" // "_" - ["[0]" extension] - [generation - [extension {"+" Nullary Unary Binary Trinary - nullary unary binary trinary}] - ["[0]" reference] - ["//" common_lisp "_" - ["[1][0]" runtime {"+" Operation Phase Handler Bundle - with_vars}]]] - ["/[1]" // "_" - ["[0]" generation] - ["//[1]" /// "_" - ["[1][0]" phase]]]]]]) + ["[0]" generation] + ["//[1]" /// "_" + ["[1][0]" phase]]]]]]) (def: .public bundle Bundle diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/js.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/js.lux index 2530af7ec..994156093 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/js.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/js.lux @@ -10,7 +10,7 @@ [//// [generation [js - [runtime {"+" Bundle}]]]]]) + [runtime (.only Bundle)]]]]]) (def: .public bundle Bundle diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/js/common.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/js/common.lux index c935634c7..9b9945736 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/js/common.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/js/common.lux @@ -2,11 +2,11 @@ [library [lux "*" [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["[0]" try] ["<>" parser - ["<s>" synthesis {"+" Parser}]]] + ["<s>" synthesis (.only Parser)]]] [data ["[0]" product] [collection @@ -18,16 +18,16 @@ [number ["f" frac]]] ["@" target - ["_" js {"+" Literal Expression Statement}]]]] + ["_" js (.only Literal Expression Statement)]]]] ["[0]" //// "_" ["/" bundle] ["/[1]" // "_" ["[0]" extension] [generation - [extension {"+" Nullary Unary Binary Trinary - nullary unary binary trinary}] + [extension (.only Nullary Unary Binary Trinary + nullary unary binary trinary)] ["//" js "_" - ["[1][0]" runtime {"+" Operation Phase Phase! Handler Bundle Generator}] + ["[1][0]" runtime (.only Operation Phase Phase! Handler Bundle Generator)] ["[1][0]" primitive] ["[1][0]" structure] ["[1][0]" reference] @@ -35,7 +35,7 @@ ["[1][0]" loop] ["[1][0]" function]]] [// - ["[0]" synthesis {"+" %synthesis}] + ["[0]" synthesis (.only %synthesis)] [/// ["[1]" phase ("[1]#[0]" monad)]]]]]) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/js/host.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/js/host.lux index 055fec9ee..46459fd02 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/js/host.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/js/host.lux @@ -2,29 +2,29 @@ [library [lux "*" [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["[0]" function] ["<>" parser - ["<s>" synthesis {"+" Parser}]]] + ["<s>" synthesis (.only Parser)]]] [data [collection ["[0]" dictionary] ["[0]" list]]] [target - ["_" js {"+" Var Expression}]]]] + ["_" js (.only Var Expression)]]]] ["[0]" // "_" - ["[1][0]" common {"+" custom}] + ["[1][0]" common (.only custom)] ["//[1]" /// "_" ["/" bundle] ["/[1]" // "_" ["[0]" extension] [generation - [extension {"+" Nullary Unary Binary Trinary - nullary unary binary trinary}] + [extension (.only Nullary Unary Binary Trinary + nullary unary binary trinary)] ["//" js "_" - ["[1][0]" runtime {"+" Operation Phase Handler Bundle - with_vars}]]] + ["[1][0]" runtime (.only Operation Phase Handler Bundle + with_vars)]]] ["/[1]" // "_" ["[0]" generation] ["//[1]" /// "_" diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/jvm.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/jvm.lux index 4b27edabb..7a6897bce 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/jvm.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/jvm.lux @@ -10,7 +10,7 @@ [//// [generation [jvm - [runtime {"+" Bundle}]]]]]) + [runtime (.only Bundle)]]]]]) (def: .public bundle Bundle diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/jvm/common.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/jvm/common.lux index 7ecc092e8..39ba779e9 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/jvm/common.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/jvm/common.lux @@ -2,12 +2,12 @@ [library [lux {"-" Type Label Primitive} [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["[0]" try] - ["[0]" exception {"+" exception:}] + ["[0]" exception (.only exception:)] ["<>" parser - ["<[0]>" synthesis {"+" Parser}]]] + ["<[0]>" synthesis (.only Parser)]]] [data ["[0]" product] [collection @@ -19,29 +19,29 @@ ["[0]" i32]]] [target [jvm - ["_" bytecode {"+" Label Bytecode} ("[1]#[0]" monad)] + ["_" bytecode (.only Label Bytecode) ("[1]#[0]" monad)] [encoding - ["[0]" signed {"+" S4}]] - ["[0]" type {"+" Type} - [category {"+" Primitive Class}]]]]]] + ["[0]" signed (.only S4)]] + ["[0]" type (.only Type) + [category (.only Primitive Class)]]]]]] ["[0]" ///// "_" [generation - [extension {"+" Nullary Unary Binary Trinary Variadic - nullary unary binary trinary variadic}] + [extension (.only Nullary Unary Binary Trinary Variadic + nullary unary binary trinary variadic)] ["///" jvm "_" ["[1][0]" value] - ["[1][0]" runtime {"+" Operation Phase Bundle Handler}] + ["[1][0]" runtime (.only Operation Phase Bundle Handler)] ["[1][0]" function "_" ["[1]" abstract]]]] [extension ["[1]extension" /] ["[1][0]" bundle]] [// - ["/[1][0]" synthesis {"+" Synthesis %synthesis}] + ["/[1][0]" synthesis (.only Synthesis %synthesis)] [/// ["[1]" phase] [meta - [archive {"+" Archive}]]]]]) + [archive (.only Archive)]]]]]) (def: .public (custom [parser handler]) (All (_ s) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/jvm/host.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/jvm/host.lux index 908057f4d..c8ec7c9fa 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/jvm/host.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/jvm/host.lux @@ -2,21 +2,21 @@ [library [lux {"-" Type Primitive} [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["[0]" maybe ("[1]#[0]" functor)] - ["[0]" exception {"+" exception:}] + ["[0]" exception (.only exception:)] ["<>" parser ["<[0]>" text] - ["<[0]>" synthesis {"+" Parser}]]] + ["<[0]>" synthesis (.only Parser)]]] [data ["[0]" product] ["[0]" text ("[1]#[0]" equivalence) ["%" format]] [collection ["[0]" list ("[1]#[0]" monad mix monoid)] - ["[0]" dictionary {"+" Dictionary}] - ["[0]" set {"+" Set}] + ["[0]" dictionary (.only Dictionary)] + ["[0]" set (.only Set)] ["[0]" sequence]] ["[0]" format "_" ["[1]" binary]]] @@ -31,28 +31,28 @@ [jvm ["[0]" version] ["[0]" modifier ("[1]#[0]" monoid)] - ["[0]" method {"+" Method}] - ["[0]" class {"+" Class}] + ["[0]" method (.only Method)] + ["[0]" class (.only Class)] [constant - [pool {"+" Resource}]] + [pool (.only Resource)]] [encoding ["[0]" name]] - ["_" bytecode {"+" Bytecode} ("[1]#[0]" monad) - ["__" instruction {"+" Primitive_Array_Type}]] - ["[0]" type {"+" Type Typed Argument} - ["[0]" category {"+" Void Value' Value Return' Return Primitive Object Array Var Parameter}] + ["_" bytecode (.only Bytecode) ("[1]#[0]" monad) + ["__" instruction (.only Primitive_Array_Type)]] + ["[0]" type (.only Type Typed Argument) + ["[0]" category (.only Void Value' Value Return' Return Primitive Object Array Var Parameter)] ["[0]" box] ["[0]" reflection] ["[0]" signature] ["[0]" parser]]]]]] ["[0]" // "_" - [common {"+" custom}] + [common (.only custom)] ["///[1]" //// "_" [generation - [extension {"+" Nullary Unary Binary Trinary Variadic - nullary unary binary trinary variadic}] + [extension (.only Nullary Unary Binary Trinary Variadic + nullary unary binary trinary variadic)] ["///" jvm - ["[1][0]" runtime {"+" Operation Bundle Phase Handler}] + ["[1][0]" runtime (.only Operation Bundle Phase Handler)] ["[1][0]" reference] ["[1][0]" value] [function @@ -64,15 +64,15 @@ [analysis ["/" jvm]]] ["/[1]" // "_" - [analysis {"+" Environment}] - ["[1][0]" synthesis {"+" Synthesis Path %synthesis}] + [analysis (.only Environment)] + ["[1][0]" synthesis (.only Synthesis Path %synthesis)] ["[1][0]" generation] [/// ["[1]" phase] ["[1][0]" reference - ["[2][0]" variable {"+" Variable Register}]] + ["[2][0]" variable (.only Variable Register)]] [meta - ["[0]" archive {"+" Archive} + ["[0]" archive (.only Archive) ["[0]" artifact] ["[0]" unit]] ["[0]" cache "_" diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/lua.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/lua.lux index 8335ce18d..f132dc39e 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/lua.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/lua.lux @@ -10,7 +10,7 @@ [//// [generation [lua - [runtime {"+" Bundle}]]]]]) + [runtime (.only Bundle)]]]]]) (def: .public bundle Bundle diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/lua/common.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/lua/common.lux index cb29b9c89..a45ba6c40 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/lua/common.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/lua/common.lux @@ -2,16 +2,16 @@ [library [lux "*" [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["[0]" function] ["[0]" try] ["<>" parser - ["<s>" synthesis {"+" Parser}]]] + ["<s>" synthesis (.only Parser)]]] [data ["[0]" product] ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" dictionary] ["[0]" list ("[1]#[0]" functor mix)]]] @@ -21,16 +21,16 @@ [number ["f" frac]]] ["@" target - ["_" lua {"+" Expression Statement}]]]] + ["_" lua (.only Expression Statement)]]]] ["[0]" //// "_" ["/" bundle] ["/[1]" // "_" ["[0]" extension] [generation - [extension {"+" Nullary Unary Binary Trinary - nullary unary binary trinary}] + [extension (.only Nullary Unary Binary Trinary + nullary unary binary trinary)] ["//" lua "_" - ["[1][0]" runtime {"+" Operation Phase Phase! Handler Bundle Generator}] + ["[1][0]" runtime (.only Operation Phase Phase! Handler Bundle Generator)] ["[1][0]" primitive] ["[1][0]" structure] ["[1][0]" reference] @@ -38,7 +38,7 @@ ["[1][0]" loop] ["[1][0]" function]]] [// - ["[0]" synthesis {"+" %synthesis}] + ["[0]" synthesis (.only %synthesis)] ["[0]" generation] [/// ["[1]" phase ("[1]#[0]" monad)]]]]]) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/lua/host.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/lua/host.lux index 1d3f9cae4..61f04ed49 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/lua/host.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/lua/host.lux @@ -2,32 +2,32 @@ [library [lux "*" [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["[0]" function] ["<>" parser - ["<s>" synthesis {"+" Parser}]]] + ["<s>" synthesis (.only Parser)]]] [data [collection ["[0]" dictionary] ["[0]" list]] [text - ["%" format {"+" format}]]] + ["%" format (.only format)]]] [target - ["_" lua {"+" Var Expression}]]]] + ["_" lua (.only Var Expression)]]]] ["[0]" // "_" - ["[1][0]" common {"+" custom}] + ["[1][0]" common (.only custom)] ["//[1]" /// "_" ["/" bundle] ["/[1]" // "_" ["[0]" extension] [generation - [extension {"+" Nullary Unary Binary Trinary - nullary unary binary trinary}] + [extension (.only Nullary Unary Binary Trinary + nullary unary binary trinary)] ["[0]" reference] ["//" lua "_" - ["[1][0]" runtime {"+" Operation Phase Handler Bundle - with_vars}]]] + ["[1][0]" runtime (.only Operation Phase Handler Bundle + with_vars)]]] ["/[1]" // "_" ["[0]" generation] ["//[1]" /// "_" diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/php.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/php.lux index 3bf186a60..4e11b0df9 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/php.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/php.lux @@ -10,7 +10,7 @@ [//// [generation [php - [runtime {"+" Bundle}]]]]]) + [runtime (.only Bundle)]]]]]) (def: .public bundle Bundle diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/php/common.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/php/common.lux index 82eb02ee5..3395e8ec8 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/php/common.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/php/common.lux @@ -2,16 +2,16 @@ [library [lux "*" [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["[0]" function] ["[0]" try] ["<>" parser - ["<s>" synthesis {"+" Parser}]]] + ["<s>" synthesis (.only Parser)]]] [data ["[0]" product] ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" dictionary] ["[0]" set] @@ -20,20 +20,20 @@ [number ["f" frac]]] ["@" target - ["_" php {"+" Expression}]]]] + ["_" php (.only Expression)]]]] ["[0]" //// "_" ["/" bundle] ["/[1]" // "_" ["[0]" extension] [generation - [extension {"+" Nullary Unary Binary Trinary - nullary unary binary trinary}] + [extension (.only Nullary Unary Binary Trinary + nullary unary binary trinary)] ["[0]" reference] ["//" php "_" - ["[1][0]" runtime {"+" Operation Phase Handler Bundle Generator}] + ["[1][0]" runtime (.only Operation Phase Handler Bundle Generator)] ["[1][0]" case]]] [// - ["[0]" synthesis {"+" %synthesis}] + ["[0]" synthesis (.only %synthesis)] ["[0]" generation] [/// ["[1]" phase]]]]]) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/php/host.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/php/host.lux index b4be6893f..ffa9c2706 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/php/host.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/php/host.lux @@ -2,32 +2,32 @@ [library [lux "*" [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["[0]" function] ["<>" parser - ["<s>" synthesis {"+" Parser}]]] + ["<s>" synthesis (.only Parser)]]] [data [collection ["[0]" dictionary] ["[0]" list]] [text - ["%" format {"+" format}]]] + ["%" format (.only format)]]] [target - ["_" php {"+" Var Expression}]]]] + ["_" php (.only Var Expression)]]]] ["[0]" // "_" - ["[1][0]" common {"+" custom}] + ["[1][0]" common (.only custom)] ["//[1]" /// "_" ["/" bundle] ["/[1]" // "_" ["[0]" extension] [generation - [extension {"+" Nullary Unary Binary Trinary - nullary unary binary trinary}] + [extension (.only Nullary Unary Binary Trinary + nullary unary binary trinary)] ["[0]" reference] ["//" php "_" - ["[1][0]" runtime {"+" Operation Phase Handler Bundle - with_vars}]]] + ["[1][0]" runtime (.only Operation Phase Handler Bundle + with_vars)]]] ["/[1]" // "_" ["[0]" generation] ["//[1]" /// "_" diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/python.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/python.lux index 4124be69d..ee404ed8e 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/python.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/python.lux @@ -10,7 +10,7 @@ [//// [generation [python - [runtime {"+" Bundle}]]]]]) + [runtime (.only Bundle)]]]]]) (def: .public bundle Bundle diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/python/common.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/python/common.lux index 89092a241..6a3dbe92d 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/python/common.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/python/common.lux @@ -2,16 +2,16 @@ [library [lux "*" [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["[0]" function] ["[0]" try] ["<>" parser - ["<[0]>" synthesis {"+" Parser}]]] + ["<[0]>" synthesis (.only Parser)]]] [data ["[0]" product] ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" dictionary] ["[0]" list ("[1]#[0]" functor mix)]]] @@ -21,17 +21,17 @@ [number ["f" frac]]] [target - ["_" python {"+" Expression Statement}]]]] + ["_" python (.only Expression Statement)]]]] ["[0]" //// "_" ["/" bundle] ["/[1]" // "_" ["[0]" extension] [generation ["[0]" reference] - [extension {"+" Nullary Unary Binary Trinary - nullary unary binary trinary}] + [extension (.only Nullary Unary Binary Trinary + nullary unary binary trinary)] ["//" python "_" - ["[1][0]" runtime {"+" Operation Phase Phase! Handler Bundle Generator}] + ["[1][0]" runtime (.only Operation Phase Phase! Handler Bundle Generator)] ["[1][0]" primitive] ["[1][0]" structure] ["[1][0]" reference] @@ -39,8 +39,8 @@ ["[1][0]" case] ["[1][0]" loop]]] [// - [analysis {"+" }] - ["[0]" synthesis {"+" %synthesis}] + [analysis (.only)] + ["[0]" synthesis (.only %synthesis)] ["[0]" generation] [/// ["[1]" phase ("[1]#[0]" monad)]]]]]) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/python/host.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/python/host.lux index 2b06a7946..ba4cd89d5 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/python/host.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/python/host.lux @@ -2,11 +2,11 @@ [library [lux "*" [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["[0]" function] ["<>" parser - ["<s>" synthesis {"+" Parser}]]] + ["<s>" synthesis (.only Parser)]]] [data ["[0]" text ["%" format]] @@ -14,19 +14,19 @@ ["[0]" dictionary] ["[0]" list]]] [target - ["_" python {"+" Expression SVar}]]]] + ["_" python (.only Expression SVar)]]]] ["[0]" // "_" - ["[1][0]" common {"+" custom}] + ["[1][0]" common (.only custom)] ["//[1]" /// "_" ["/" bundle] ["/[1]" // "_" ["[0]" extension] [generation - [extension {"+" Nullary Unary Binary Trinary - nullary unary binary trinary}] + [extension (.only Nullary Unary Binary Trinary + nullary unary binary trinary)] ["//" python "_" - ["[1][0]" runtime {"+" Operation Phase Handler Bundle - with_vars}]]] + ["[1][0]" runtime (.only Operation Phase Handler Bundle + with_vars)]]] ["/[1]" // "_" ["[0]" generation] ["//[1]" /// "_" diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/r.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/r.lux index 338342aba..0112c3fb4 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/r.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/r.lux @@ -10,7 +10,7 @@ [//// [generation [r - [runtime {"+" Bundle}]]]]]) + [runtime (.only Bundle)]]]]]) (def: .public bundle Bundle diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/r/common.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/r/common.lux index eba2036c4..61fb604cb 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/r/common.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/r/common.lux @@ -2,16 +2,16 @@ [library [lux "*" [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["[0]" function] ["[0]" try] ["<>" parser - ["<s>" synthesis {"+" Parser}]]] + ["<s>" synthesis (.only Parser)]]] [data ["[0]" product] ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" dictionary] ["[0]" set] @@ -20,20 +20,20 @@ [number ["f" frac]]] ["@" target - ["_" r {"+" Expression}]]]] + ["_" r (.only Expression)]]]] ["[0]" //// "_" ["/" bundle] ["/[1]" // "_" ["[0]" extension] [generation - [extension {"+" Nullary Unary Binary Trinary - nullary unary binary trinary}] + [extension (.only Nullary Unary Binary Trinary + nullary unary binary trinary)] ["[0]" reference] ["//" r "_" - ["[1][0]" runtime {"+" Operation Phase Handler Bundle Generator}] + ["[1][0]" runtime (.only Operation Phase Handler Bundle Generator)] ["[1][0]" case]]] [// - ["[0]" synthesis {"+" %synthesis}] + ["[0]" synthesis (.only %synthesis)] ["[0]" generation] [/// ["[1]" phase]]]]]) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/r/host.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/r/host.lux index 7cd663e5e..3d01788a9 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/r/host.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/r/host.lux @@ -1,37 +1,37 @@ (.using - [library - [lux "*" - [abstract - ["[0]" monad {"+" do}]] - [control - ["[0]" function] - ["<>" parser - ["<s>" synthesis {"+" Parser}]]] - [data - [collection - ["[0]" dictionary] - ["[0]" list]] - [text - ["%" format {"+" format}]]] - [target - ["_" r {"+" Var Expression}]]]] - ["[0]" // "_" - ["[1][0]" common {"+" custom}] - ["//[1]" /// "_" - ["/" bundle] + [library + [lux "*" + [abstract + ["[0]" monad (.only do)]] + [control + ["[0]" function] + ["<>" parser + ["<s>" synthesis (.only Parser)]]] + [data + [collection + ["[0]" dictionary] + ["[0]" list]] + [text + ["%" format (.only format)]]] + [target + ["_" r (.only Var Expression)]]]] + ["[0]" // "_" + ["[1][0]" common (.only custom)] + ["//[1]" /// "_" + ["/" bundle] + ["/[1]" // "_" + ["[0]" extension] + [generation + [extension (.only Nullary Unary Binary Trinary + nullary unary binary trinary)] + ["[0]" reference] + ["//" r "_" + ["[1][0]" runtime (.only Operation Phase Handler Bundle + with_vars)]]] ["/[1]" // "_" - ["[0]" extension] - [generation - [extension {"+" Nullary Unary Binary Trinary - nullary unary binary trinary}] - ["[0]" reference] - ["//" r "_" - ["[1][0]" runtime {"+" Operation Phase Handler Bundle - with_vars}]]] - ["/[1]" // "_" - ["[0]" generation] - ["//[1]" /// "_" - ["[1][0]" phase]]]]]]) + ["[0]" generation] + ["//[1]" /// "_" + ["[1][0]" phase]]]]]]) (def: .public bundle Bundle diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/ruby.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/ruby.lux index fe36de1b2..5461e6511 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/ruby.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/ruby.lux @@ -10,7 +10,7 @@ [//// [generation [ruby - [runtime {"+" Bundle}]]]]]) + [runtime (.only Bundle)]]]]]) (def: .public bundle Bundle diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/ruby/common.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/ruby/common.lux index bec0ecdc2..d6d56ed63 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/ruby/common.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/ruby/common.lux @@ -2,16 +2,16 @@ [library [lux "*" [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["[0]" function] ["[0]" try] ["<>" parser - ["<s>" synthesis {"+" Parser}]]] + ["<s>" synthesis (.only Parser)]]] [data ["[0]" product] ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" dictionary] ["[0]" list ("[1]#[0]" functor mix)]]] @@ -21,16 +21,16 @@ [number ["f" frac]]] [target - ["_" ruby {"+" Expression Statement}]]]] + ["_" ruby (.only Expression Statement)]]]] ["[0]" //// "_" ["/" bundle] ["/[1]" // "_" ["[0]" extension] [generation - [extension {"+" Nullary Unary Binary Trinary - nullary unary binary trinary}] + [extension (.only Nullary Unary Binary Trinary + nullary unary binary trinary)] ["//" ruby "_" - ["[1][0]" runtime {"+" Operation Phase Phase! Handler Bundle Generator}] + ["[1][0]" runtime (.only Operation Phase Phase! Handler Bundle Generator)] ["[1][0]" primitive] ["[1][0]" structure] ["[1][0]" reference] @@ -38,7 +38,7 @@ ["[1][0]" case] ["[1][0]" loop]]] [// - ["[0]" synthesis {"+" %synthesis}] + ["[0]" synthesis (.only %synthesis)] ["[0]" generation] [/// ["[1]" phase ("[1]#[0]" monad)]]]]]) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/ruby/host.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/ruby/host.lux index a5f389ec9..1b5a79492 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/ruby/host.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/ruby/host.lux @@ -2,32 +2,32 @@ [library [lux "*" [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["[0]" function] ["<>" parser - ["<s>" synthesis {"+" Parser}]]] + ["<s>" synthesis (.only Parser)]]] [data [collection ["[0]" dictionary] ["[0]" list]] [text - ["%" format {"+" format}]]] + ["%" format (.only format)]]] [target - ["_" ruby {"+" Var Expression}]]]] + ["_" ruby (.only Var Expression)]]]] ["[0]" // "_" - ["[1][0]" common {"+" custom}] + ["[1][0]" common (.only custom)] ["//[1]" /// "_" ["/" bundle] ["/[1]" // "_" ["[0]" extension] [generation - [extension {"+" Nullary Unary Binary Trinary - nullary unary binary trinary}] + [extension (.only Nullary Unary Binary Trinary + nullary unary binary trinary)] ["[0]" reference] ["//" ruby "_" - ["[1][0]" runtime {"+" Operation Phase Handler Bundle - with_vars}]]] + ["[1][0]" runtime (.only Operation Phase Handler Bundle + with_vars)]]] ["/[1]" // "_" ["[0]" generation] ["//[1]" /// "_" diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/scheme.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/scheme.lux index 5419daa5e..8d09d638f 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/scheme.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/scheme.lux @@ -10,7 +10,7 @@ [//// [generation [scheme - [runtime {"+" Bundle}]]]]]) + [runtime (.only Bundle)]]]]]) (def: .public bundle Bundle diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/scheme/common.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/scheme/common.lux index 4a1218b26..933e7d3a0 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/scheme/common.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/scheme/common.lux @@ -2,16 +2,16 @@ [library [lux "*" [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["[0]" function] ["[0]" try] ["<>" parser - ["<s>" synthesis {"+" Parser}]]] + ["<s>" synthesis (.only Parser)]]] [data ["[0]" product] ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" dictionary] ["[0]" set] @@ -20,20 +20,20 @@ [number ["f" frac]]] ["@" target - ["_" scheme {"+" Expression}]]]] + ["_" scheme (.only Expression)]]]] ["[0]" //// "_" ["/" bundle] ["/[1]" // "_" ["[0]" extension] [generation - [extension {"+" Nullary Unary Binary Trinary - nullary unary binary trinary}] + [extension (.only Nullary Unary Binary Trinary + nullary unary binary trinary)] ["[0]" reference] ["//" scheme "_" - ["[1][0]" runtime {"+" Operation Phase Handler Bundle Generator}] + ["[1][0]" runtime (.only Operation Phase Handler Bundle Generator)] ["[1][0]" case]]] [// - ["[0]" synthesis {"+" %synthesis}] + ["[0]" synthesis (.only %synthesis)] ["[0]" generation] [/// ["[1]" phase]]]]]) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/scheme/host.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/scheme/host.lux index aedc15c3f..67b1827ce 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/scheme/host.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/generation/scheme/host.lux @@ -2,32 +2,32 @@ [library [lux "*" [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["[0]" function] ["<>" parser - ["<s>" synthesis {"+" Parser}]]] + ["<s>" synthesis (.only Parser)]]] [data [collection ["[0]" dictionary] ["[0]" list]] [text - ["%" format {"+" format}]]] + ["%" format (.only format)]]] [target - ["_" scheme {"+" Var Expression}]]]] + ["_" scheme (.only Var Expression)]]]] ["[0]" // "_" - ["[1][0]" common {"+" custom}] + ["[1][0]" common (.only custom)] ["//[1]" /// "_" ["/" bundle] ["/[1]" // "_" ["[0]" extension] [generation - [extension {"+" Nullary Unary Binary Trinary - nullary unary binary trinary}] + [extension (.only Nullary Unary Binary Trinary + nullary unary binary trinary)] ["[0]" reference] ["//" scheme "_" - ["[1][0]" runtime {"+" Operation Phase Handler Bundle - with_vars}]]] + ["[1][0]" runtime (.only Operation Phase Handler Bundle + with_vars)]]] ["/[1]" // "_" ["[0]" generation] ["//[1]" /// "_" diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/synthesis.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/synthesis.lux index 50c9acf01..25868a29a 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/synthesis.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/extension/synthesis.lux @@ -1,10 +1,10 @@ (.using - [library - [lux "*"]] - [// - ["[0]" bundle] - [/// - [synthesis {"+" Bundle}]]]) + [library + [lux "*"]] + [// + ["[0]" bundle] + [/// + [synthesis (.only Bundle)]]]) (def: .public bundle Bundle diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp.lux index d92c3084f..462d178ea 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp.lux @@ -2,11 +2,11 @@ [library [lux "*" [abstract - [monad {"+" do}]] + [monad (.only do)]] [macro ["^" pattern]]]] ["[0]" / "_" - [runtime {"+" Phase}] + [runtime (.only Phase)] ["[1][0]" primitive] ["[1][0]" structure] ["[1][0]" reference] @@ -18,12 +18,12 @@ ["/[1]" // "_" ["[1][0]" extension] ["/[1]" // "_" - [analysis {"+" }] + [analysis (.only)] ["[1][0]" synthesis] ["//[1]" /// "_" ["[1][0]" phase ("[1]#[0]" monad)] - [reference {"+"} - [variable {"+"}]]]]]]]) + [reference (.only) + [variable (.only)]]]]]]]) (def: .public (generate archive synthesis) Phase diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/case.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/case.lux index 2f5b895e3..55baf8d63 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/case.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/case.lux @@ -2,12 +2,12 @@ [library [lux {"-" case let if} [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control - ["[0]" exception {"+" exception:}]] + ["[0]" exception (.only exception:)]] [data ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" functor mix monoid)] ["[0]" set]]] @@ -17,9 +17,9 @@ [number ["n" nat]]] [target - ["_" common_lisp {"+" Expression Var/1}]]]] + ["_" common_lisp (.only Expression Var/1)]]]] ["[0]" // "_" - ["[1][0]" runtime {"+" Operation Phase Generator}] + ["[1][0]" runtime (.only Operation Phase Generator)] ["[1][0]" reference] ["[1][0]" primitive] ["/[1]" // "_" @@ -28,14 +28,14 @@ ["[1][0]" synthesis "_" ["[1]/[0]" case]] ["/[1]" // "_" - ["[1][0]" synthesis {"+" Member Synthesis Path}] + ["[1][0]" synthesis (.only Member Synthesis Path)] ["[1][0]" generation] ["//[1]" /// "_" [reference - ["[1][0]" variable {"+" Register}]] + ["[1][0]" variable (.only Register)]] ["[1][0]" phase ("[1]#[0]" monad)] [meta - [archive {"+" Archive}]]]]]]]) + [archive (.only Archive)]]]]]]]) (def: .public register (-> Register Var/1) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/extension.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/extension.lux index 1a041edc1..8c2e01506 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/extension.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/extension.lux @@ -1,13 +1,13 @@ (.using - [library - [lux "*" - [data - [collection - ["[0]" dictionary]]]]] - [// - [runtime {"+" Bundle}]] - [/ - ["[0]" common]]) + [library + [lux "*" + [data + [collection + ["[0]" dictionary]]]]] + [// + [runtime (.only Bundle)]] + [/ + ["[0]" common]]) (def: .public bundle Bundle diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/extension/common.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/extension/common.lux index 527ee9822..26b03d5e9 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/extension/common.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/extension/common.lux @@ -2,7 +2,7 @@ [library [lux "*" [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["[0]" function]] [data @@ -12,13 +12,13 @@ [collection ["[0]" dictionary]]] [target - ["_" common_lisp {"+" Expression}]]]] + ["_" common_lisp (.only Expression)]]]] ["[0]" /// "_" - ["[1][0]" runtime {"+" Operation Phase Handler Bundle}] + ["[1][0]" runtime (.only Operation Phase Handler Bundle)] ["[1][0]" primitive] [// - [extension {"+" Nullary Unary Binary Trinary - nullary unary binary trinary}] + [extension (.only Nullary Unary Binary Trinary + nullary unary binary trinary)] [// [extension ["[0]" bundle]]]]]) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/function.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/function.lux index d91f824ad..c525d1cbf 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/function.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/function.lux @@ -2,32 +2,32 @@ [library [lux {"-" function} [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control pipe] [data ["[0]" product] [text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" functor)]]] [target - ["_" common_lisp {"+" Expression Var/1}]]]] + ["_" common_lisp (.only Expression Var/1)]]]] ["[0]" // "_" - ["[1][0]" runtime {"+" Operation Phase Generator}] + ["[1][0]" runtime (.only Operation Phase Generator)] ["[1][0]" reference] ["[1][0]" case] ["/[1]" // "_" ["[1][0]" reference] ["//[1]" /// "_" - [analysis {"+" Variant Tuple Abstraction Application Analysis}] - [synthesis {"+" Synthesis}] - ["[1][0]" generation {"+" Context}] + [analysis (.only Variant Tuple Abstraction Application Analysis)] + [synthesis (.only Synthesis)] + ["[1][0]" generation (.only Context)] ["//[1]" /// "_" - [arity {"+" Arity}] + [arity (.only Arity)] ["[1][0]" phase ("[1]#[0]" monad)] [reference - [variable {"+" Register Variable}]]]]]]) + [variable (.only Register Variable)]]]]]]) (def: .public (apply expression archive [functionS argsS+]) (Generator (Application Synthesis)) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/loop.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/loop.lux index 29ad332ab..f8563d14b 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/loop.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/loop.lux @@ -2,20 +2,20 @@ [library [lux {"-" Scope} [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [data ["[0]" product] [text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" functor)]]] [math [number ["n" nat]]] [target - ["_" common_lisp {"+" Expression}]]]] + ["_" common_lisp (.only Expression)]]]] ["[0]" // "_" - [runtime {"+" Operation Phase Generator}] + [runtime (.only Operation Phase Generator)] ["[1][0]" case] ["/[1]" // "_" ["[1][0]" reference] @@ -23,14 +23,14 @@ [synthesis ["[0]" case]] ["/[1]" // "_" - ["[0]"synthesis {"+" Scope Synthesis}] + ["[0]"synthesis (.only Scope Synthesis)] ["[1][0]" generation] ["//[1]" /// "_" ["[1][0]" phase] [meta - [archive {"+" Archive}]] + [archive (.only Archive)]] [reference - [variable {"+" Register}]]]]]]]) + [variable (.only Register)]]]]]]]) (def: .public (scope expression archive [start initsS+ bodyS]) (Generator (Scope Synthesis)) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/primitive.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/primitive.lux index c58595ac2..c6fb147f8 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/primitive.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/primitive.lux @@ -1,8 +1,8 @@ (.using - [library - [lux {"-" i64} - [target - ["_" common_lisp {"+" Expression}]]]]) + [library + [lux {"-" i64} + [target + ["_" common_lisp (.only Expression)]]]]) (def: .public bit (-> Bit (Expression Any)) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/reference.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/reference.lux index b032cfc3d..55188d5ea 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/reference.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/reference.lux @@ -1,10 +1,10 @@ (.using - [library - [lux "*" - [target - ["_" common_lisp {"+" Expression}]]]] - [/// - [reference {"+" System}]]) + [library + [lux "*" + [target + ["_" common_lisp (.only Expression)]]]] + [/// + [reference (.only System)]]) (implementation: .public system (System (Expression Any)) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/runtime.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/runtime.lux index 947dd7cc7..0993f6724 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/runtime.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/runtime.lux @@ -3,7 +3,7 @@ [lux {"-" Location} ["[0]" meta] [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["[0]" function] ["<>" parser @@ -11,32 +11,32 @@ [data ["[0]" product] ["[0]" text ("[1]#[0]" hash) - ["%" format {"+" format}] + ["%" format (.only format)] ["[0]" encoding]] [collection ["[0]" list ("[1]#[0]" functor monoid)] ["[0]" sequence]]] ["[0]" macro - [syntax {"+" syntax:}] + [syntax (.only syntax:)] ["[0]" code]] [math - [number {"+" hex} + [number (.only hex) ["[0]" i64]]] ["@" target - ["_" common_lisp {"+" Expression Computation Literal}]]]] + ["_" common_lisp (.only Expression Computation Literal)]]]] ["[0]" /// "_" ["[1][0]" reference] ["//[1]" /// "_" - [analysis {"+" Variant}] - ["[1][0]" synthesis {"+" Synthesis}] + [analysis (.only Variant)] + ["[1][0]" synthesis (.only Synthesis)] ["[1][0]" generation] ["//[1]" /// ["[1][0]" phase] [reference - [variable {"+" Register}]] + [variable (.only Register)]] [meta - [archive {"+" Output Archive} - ["[0]" artifact {"+" Registry}]]]]]]) + [archive (.only Output Archive) + ["[0]" artifact (.only Registry)]]]]]]) (def: module_id 0) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/structure.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/structure.lux index 8554b332f..af0d4302b 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/structure.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/common_lisp/structure.lux @@ -1,18 +1,18 @@ (.using - [library - [lux "*" - [abstract - ["[0]" monad {"+" do}]] - [target - ["_" common_lisp {"+" Expression}]]]] - ["[0]" // "_" - ["[1][0]" runtime {"+" Operation Phase Generator}] - ["[1][0]" primitive] - ["///[1]" //// "_" - [analysis {"+" Variant Tuple}] - ["[1][0]" synthesis {"+" Synthesis}] - ["//[1]" /// "_" - ["[1][0]" phase ("[1]#[0]" monad)]]]]) + [library + [lux "*" + [abstract + ["[0]" monad (.only do)]] + [target + ["_" common_lisp (.only Expression)]]]] + ["[0]" // "_" + ["[1][0]" runtime (.only Operation Phase Generator)] + ["[1][0]" primitive] + ["///[1]" //// "_" + [analysis (.only Variant Tuple)] + ["[1][0]" synthesis (.only Synthesis)] + ["//[1]" /// "_" + ["[1][0]" phase ("[1]#[0]" monad)]]]]) (def: .public (tuple expression archive elemsS+) (Generator (Tuple Synthesis)) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/extension.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/extension.lux index a260ec3c8..6762b03c1 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/extension.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/extension.lux @@ -2,7 +2,7 @@ [library [lux "*" [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control [parser ["<[0]>" code]]] @@ -10,13 +10,13 @@ [collection ["[0]" list ("[1]#[0]" functor)]]] ["[0]" meta] - ["[0]" macro {"+" with_symbols} + ["[0]" macro (.only with_symbols) ["[0]" code] - [syntax {"+" syntax:}]]]] + [syntax (.only syntax:)]]]] ["[0]" /// "_" ["[1][0]" extension] [// - [synthesis {"+" Synthesis}] + [synthesis (.only Synthesis)] ["[0]" generation] [/// ["[1]" phase]]]]) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js.lux index 637513242..cd1276c3c 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js.lux @@ -2,15 +2,15 @@ [library [lux "*" [abstract - [monad {"+" do}]] + [monad (.only do)]] [control - ["[0]" exception {"+" exception:}]] + ["[0]" exception (.only exception:)]] [macro ["^" pattern]] [target ["_" js]]]] ["[0]" / "_" - [runtime {"+" Phase Phase!}] + [runtime (.only Phase Phase!)] ["[1][0]" primitive] ["[1][0]" structure] ["[1][0]" reference] @@ -25,12 +25,12 @@ [js ["[1]/[0]" common]]]] ["/[1]" // "_" - [analysis {"+" }] + [analysis (.only)] ["[0]" synthesis] ["//[1]" /// "_" ["[1][0]" phase ("[1]#[0]" monad)] - [reference {"+"} - [variable {"+"}]]]]]]]) + [reference (.only) + [variable (.only)]]]]]]]) (exception: .public cannot_recur_as_an_expression) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/case.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/case.lux index de443a7c7..c660b2d39 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/case.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/case.lux @@ -2,7 +2,7 @@ [library [lux {"-" case exec let if} [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["[0]" maybe]] [data @@ -15,9 +15,9 @@ [number ["n" nat]]] [target - ["_" js {"+" Expression Computation Var Statement}]]]] + ["_" js (.only Expression Computation Var Statement)]]]] ["[0]" // "_" - ["[1][0]" runtime {"+" Operation Phase Phase! Generator Generator!}] + ["[1][0]" runtime (.only Operation Phase Phase! Generator Generator!)] ["[1][0]" reference] ["[1][0]" primitive] ["/[1]" // "_" @@ -26,15 +26,15 @@ ["[1][0]" synthesis "_" ["[1]/[0]" case]] ["/[1]" // "_" - ["[1][0]" synthesis {"+" Synthesis Path} + ["[1][0]" synthesis (.only Synthesis Path) [access - ["[0]" member {"+" Member}]]] + ["[0]" member (.only Member)]]] ["//[1]" /// "_" [reference - [variable {"+" Register}]] + [variable (.only Register)]] ["[1][0]" phase ("[1]#[0]" monad)] [meta - [archive {"+" Archive}]]]]]]]) + [archive (.only Archive)]]]]]]]) (def: .public register (-> Register Var) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/function.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/function.lux index 15c0a984a..95d8d484f 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/function.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/function.lux @@ -2,30 +2,30 @@ [library [lux {"-" function} [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [data ["[0]" product] [text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" functor mix)]]] [target - ["_" js {"+" Expression Computation Var Statement}]]]] + ["_" js (.only Expression Computation Var Statement)]]]] ["[0]" // "_" - ["[1][0]" runtime {"+" Operation Phase Phase! Generator}] + ["[1][0]" runtime (.only Operation Phase Phase! Generator)] ["[1][0]" reference] ["[1][0]" case] ["/[1]" // "_" ["[1][0]" reference] ["//[1]" /// "_" - [analysis {"+" Abstraction Reification Analysis}] - [synthesis {"+" Synthesis}] + [analysis (.only Abstraction Reification Analysis)] + [synthesis (.only Synthesis)] ["[1][0]" generation] ["//[1]" /// "_" - [arity {"+" Arity}] + [arity (.only Arity)] ["[1][0]" phase ("[1]#[0]" monad)] [reference - [variable {"+" Register Variable}]] + [variable (.only Register Variable)]] [meta [archive ["[0]" unit]] diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/loop.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/loop.lux index 62da60326..634cbdd2b 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/loop.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/loop.lux @@ -2,28 +2,28 @@ [library [lux {"-" Scope} [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [data ["[0]" product] ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" functor mix)]]] [math [number ["n" nat]]] [target - ["_" js {"+" Computation Var Expression Statement}]]]] + ["_" js (.only Computation Var Expression Statement)]]]] ["[0]" // "_" - [runtime {"+" Operation Phase Phase! Generator Generator!}] + [runtime (.only Operation Phase Phase! Generator Generator!)] ["[1][0]" case] ["///[1]" //// "_" - [synthesis {"+" Scope Synthesis}] + [synthesis (.only Scope Synthesis)] ["[1][0]" generation] ["//[1]" /// "_" ["[1][0]" phase] [reference - [variable {"+" Register}]]]]]) + [variable (.only Register)]]]]]) (def: @scope (-> Nat Text) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/primitive.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/primitive.lux index 1672c65b7..6cdbb5035 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/primitive.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/primitive.lux @@ -1,10 +1,10 @@ (.using - [library - [lux {"-" i64} - [target - ["_" js {"+" Computation}]]]] - ["[0]" // "_" - ["[1][0]" runtime]]) + [library + [lux {"-" i64} + [target + ["_" js (.only Computation)]]]] + ["[0]" // "_" + ["[1][0]" runtime]]) (def: .public bit _.boolean) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/reference.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/reference.lux index 0874ed4f3..b6a386e8b 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/reference.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/reference.lux @@ -1,10 +1,10 @@ (.using - [library - [lux "*" - [target - ["_" js {"+" Expression}]]]] - [/// - [reference {"+" System}]]) + [library + [lux "*" + [target + ["_" js (.only Expression)]]]] + [/// + [reference (.only System)]]) (implementation: .public system (System Expression) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/runtime.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/runtime.lux index 13f2a82e0..66c8021fd 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/runtime.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/runtime.lux @@ -3,7 +3,7 @@ [lux {"-" i64} ["[0]" meta] [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["[0]" function] ["<>" parser @@ -11,32 +11,32 @@ [data ["[0]" product] ["[0]" text ("[1]#[0]" hash) - ["%" format {"+" format}] + ["%" format (.only format)] [encoding ["[0]" utf8]]] [collection ["[0]" list ("[1]#[0]" functor)] ["[0]" sequence]]] ["[0]" macro - [syntax {"+" syntax:}] + [syntax (.only syntax:)] ["[0]" code]] [math - [number {"+" hex} + [number (.only hex) ["[0]" i64]]] [target - ["_" js {"+" Expression Var Computation Statement}]]]] + ["_" js (.only Expression Var Computation Statement)]]]] ["[0]" /// "_" ["[1][0]" reference] ["//[1]" /// "_" - ["[1][0]" synthesis {"+" Synthesis}] + ["[1][0]" synthesis (.only Synthesis)] ["[1][0]" generation] ["//[1]" /// ["[1][0]" phase] [reference - [variable {"+" Register}]] + [variable (.only Register)]] [meta - [archive {"+" Output Archive} - ["[0]" registry {"+" Registry}] + [archive (.only Output Archive) + ["[0]" registry (.only Registry)] ["[0]" unit]]]]]]) (template [<name> <base>] diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/structure.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/structure.lux index 96ed21e8a..8d3abeb61 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/structure.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/js/structure.lux @@ -2,16 +2,16 @@ [library [lux {"-" Variant Tuple} [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [target - ["_" js {"+" Expression}]]]] + ["_" js (.only Expression)]]]] ["[0]" // "_" - ["[1][0]" runtime {"+" Operation Phase Generator}] + ["[1][0]" runtime (.only Operation Phase Generator)] ["[1][0]" primitive] ["///[1]" //// "_" - ["[1][0]" synthesis {"+" Synthesis}] + ["[1][0]" synthesis (.only Synthesis)] [analysis - [complex {"+" Variant Tuple}]] + [complex (.only Variant Tuple)]] ["//[1]" /// ["[1][0]" phase ("[1]#[0]" monad)]]]]) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm.lux index 67ae82f54..2f1e595eb 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm.lux @@ -2,11 +2,11 @@ [library [lux "*" [abstract - [monad {"+" do}]] + [monad (.only do)]] [macro ["^" pattern]]]] ["[0]" / "_" - [runtime {"+" Phase}] + [runtime (.only Phase)] ["[1][0]" primitive] ["[1][0]" structure] ["[1][0]" reference] diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/case.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/case.lux index 455121d02..e88608b70 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/case.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/case.lux @@ -2,14 +2,14 @@ [library [lux {"-" Type Label if let exec case int} [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["[0]" function]] [data [collection ["[0]" list ("[1]#[0]" mix)]] ["[0]" text ("[1]#[0]" equivalence) - ["%" format {"+" format}]]] + ["%" format (.only format)]]] [macro ["^" pattern]] [math @@ -18,26 +18,26 @@ ["[0]" i32]]] [target [jvm - ["_" bytecode {"+" Label Bytecode} ("[1]#[0]" monad) + ["_" bytecode (.only Label Bytecode) ("[1]#[0]" monad) [environment [limit ["[0]" stack]]]] - ["[0]" type {"+" Type} - [category {"+" Method}]]]]]] + ["[0]" type (.only Type) + [category (.only Method)]]]]]] ["[0]" // "_" ["[1][0]" type] - ["[1][0]" runtime {"+" Operation Phase Generator}] + ["[1][0]" runtime (.only Operation Phase Generator)] ["[1][0]" value] ["[1][0]" structure] [//// ["[0]" generation] - ["[0]" synthesis {"+" Path Fork Synthesis} + ["[0]" synthesis (.only Path Fork Synthesis) [access - ["[0]" member {"+" Member}]]] + ["[0]" member (.only Member)]]] [/// ["[0]" phase ("operation#[0]" monad)] [reference - [variable {"+" Register}]]]]]) + [variable (.only Register)]]]]]) (def: (pop_alt stack_depth) (-> Nat (Bytecode Any)) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/debug.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/debug.lux index 5caa9c817..5c1005d2a 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/debug.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/debug.lux @@ -2,16 +2,16 @@ [library [lux "*" [abstract - [monad {"+" do}]] + [monad (.only do)]] [control - ["[0]" io {"+" IO}] - ["[0]" try {"+" Try}]] + ["[0]" io (.only IO)] + ["[0]" try (.only Try)]] [data - [binary {"+" Binary}] + [binary (.only Binary)] [text - ["%" format {"+" format}]]] + ["%" format (.only format)]]] [world - ["[0]" file {"+" File}]]]]) + ["[0]" file (.only File)]]]]) (def: extension ".class") diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function.lux index 77f1a415f..37f4ff161 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function.lux @@ -2,7 +2,7 @@ [library [lux {"-" Type Label} [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [data ["[0]" product] [collection @@ -17,23 +17,23 @@ [target [jvm ["[0]" version] - ["[0]" modifier {"+" Modifier} ("[1]#[0]" monoid)] - ["[0]" field {"+" Field}] - ["[0]" method {"+" Method}] - ["_" bytecode {"+" Label Bytecode} ("[1]#[0]" monad)] - ["[0]" class {"+" Class}] - ["[0]" type {"+" Type} - [category {"+" Return' Value'}] + ["[0]" modifier (.only Modifier) ("[1]#[0]" monoid)] + ["[0]" field (.only Field)] + ["[0]" method (.only Method)] + ["_" bytecode (.only Label Bytecode) ("[1]#[0]" monad)] + ["[0]" class (.only Class)] + ["[0]" type (.only Type) + [category (.only Return' Value')] ["[0]" reflection]] ["[0]" constant - [pool {"+" Resource}]] + [pool (.only Resource)]] [encoding - ["[0]" name {"+" External Internal}] + ["[0]" name (.only External Internal)] ["[0]" unsigned]]]] [tool [compiler [meta - ["[0]" archive {"+" Archive}] + ["[0]" archive (.only Archive)] ["[0]" cache "_" [dependency ["[1]/[0]" artifact]]]]]]]] @@ -52,20 +52,20 @@ ["[1][0]" reset] ["[1][0]" apply]] ["/[1]" // "_" - ["[1][0]" runtime {"+" Operation Phase Generator}] + ["[1][0]" runtime (.only Operation Phase Generator)] ["[1][0]" reference] [//// - [analysis {"+" Environment}] - ["[0]" synthesis {"+" Synthesis Abstraction Apply}] + [analysis (.only Environment)] + ["[0]" synthesis (.only Synthesis Abstraction Apply)] ["[0]" generation] [/// - ["[0]" arity {"+" Arity}] + ["[0]" arity (.only Arity)] ["[0]" phase] [meta [archive ["[0]" unit]]] [reference - [variable {"+" Register}]]]]]]) + [variable (.only Register)]]]]]]) (def: .public (with generate archive @begin class environment arity body) (-> Phase Archive Label External (Environment Synthesis) Arity (Bytecode Any) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/abstract.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/abstract.lux index d8bd53835..6167117e5 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/abstract.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/abstract.lux @@ -1,17 +1,17 @@ (.using - [library - [lux {"-" Type} - [data - [text - ["%" format]]] - [target - [jvm - ["[0]" type {"+" Type} - [category {"+" Method}]]]]]] - [// - [field - [constant - ["[0]" arity]]]]) + [library + [lux {"-" Type} + [data + [text + ["%" format]]] + [target + [jvm + ["[0]" type (.only Type) + [category (.only Method)]]]]]] + [// + [field + [constant + ["[0]" arity]]]]) ... (def: .public artifact_id ... 1) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/field/constant.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/field/constant.lux index bccc114a9..f13d6d8d3 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/field/constant.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/field/constant.lux @@ -6,12 +6,12 @@ ["[0]" sequence]]] [target [jvm - ["[0]" field {"+" Field}] - ["[0]" modifier {"+" Modifier} ("[1]#[0]" monoid)] - [type {"+" Type} - [category {"+" Value}]] + ["[0]" field (.only Field)] + ["[0]" modifier (.only Modifier) ("[1]#[0]" monoid)] + [type (.only Type) + [category (.only Value)]] [constant - [pool {"+" Resource}]]]]]]) + [pool (.only Resource)]]]]]]) (def: modifier (Modifier Field) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/field/constant/arity.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/field/constant/arity.lux index 1828fe5c1..9583f083a 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/field/constant/arity.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/field/constant/arity.lux @@ -1,14 +1,14 @@ (.using - [library - [lux {"-" type} - [target - [jvm - ["[0]" type] - [constant - [pool {"+" Resource}]]]]]] - ["[0]" // - [///////// - [arity {"+" Arity}]]]) + [library + [lux {"-" type} + [target + [jvm + ["[0]" type] + [constant + [pool (.only Resource)]]]]]] + ["[0]" // + [///////// + [arity (.only Arity)]]]) (def: .public minimum Arity 1) (def: .public maximum Arity 8) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/field/variable.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/field/variable.lux index 179fdb273..408e673cc 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/field/variable.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/field/variable.lux @@ -7,19 +7,19 @@ ["[0]" sequence]]] [target [jvm - ["[0]" modifier {"+" Modifier} ("[1]#[0]" monoid)] - ["[0]" field {"+" Field}] - ["_" bytecode {"+" Bytecode}] - [type {"+" Type} - [category {"+" Value Class}]] + ["[0]" modifier (.only Modifier) ("[1]#[0]" monoid)] + ["[0]" field (.only Field)] + ["_" bytecode (.only Bytecode)] + [type (.only Type) + [category (.only Value Class)]] [constant - [pool {"+" Resource}]]]]]] + [pool (.only Resource)]]]]]] ["[0]" //// "_" ["[1][0]" type] ["[1][0]" reference] [////// [reference - [variable {"+" Register}]]]]) + [variable (.only Register)]]]]) (def: .public type ////type.value) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/field/variable/count.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/field/variable/count.lux index c3a960653..1c1224866 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/field/variable/count.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/field/variable/count.lux @@ -5,10 +5,10 @@ ["[0]" try]] [target [jvm - ["_" bytecode {"+" Bytecode}] + ["_" bytecode (.only Bytecode)] ["[0]" type] [encoding - [name {"+" External}] + [name (.only External)] ["[0]" signed]]]]]] ["[0]" //// "_" ["[1][0]" abstract]]) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/field/variable/foreign.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/field/variable/foreign.lux index 2aeeb2f49..e102e04dc 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/field/variable/foreign.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/field/variable/foreign.lux @@ -1,26 +1,26 @@ (.using - [library - [lux {"-" Type} - [data - [collection - ["[0]" list]]] - [target - [jvm - ["_" bytecode {"+" Bytecode}] - ["[0]" field {"+" Field}] - [constant - [pool {"+" Resource}]] - [type {"+" Type} - [category {"+" Value Class}]]]]]] - ["[0]" // - ["///[1]" //// "_" - ["[1][0]" reference] - [//// - [analysis {"+" Environment}] - [synthesis {"+" Synthesis}] - [/// - [reference - [variable {"+" Register}]]]]]]) + [library + [lux {"-" Type} + [data + [collection + ["[0]" list]]] + [target + [jvm + ["_" bytecode (.only Bytecode)] + ["[0]" field (.only Field)] + [constant + [pool (.only Resource)]] + [type (.only Type) + [category (.only Value Class)]]]]]] + ["[0]" // + ["///[1]" //// "_" + ["[1][0]" reference] + [//// + [analysis (.only Environment)] + [synthesis (.only Synthesis)] + [/// + [reference + [variable (.only Register)]]]]]]) (def: .public (closure environment) (-> (Environment Synthesis) (List (Type Value))) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/field/variable/partial.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/field/variable/partial.lux index d6f86409c..4806c022e 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/field/variable/partial.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/field/variable/partial.lux @@ -11,12 +11,12 @@ ["n" nat]]] [target [jvm - ["[0]" field {"+" Field}] - ["_" bytecode {"+" Bytecode} ("[1]#[0]" monad)] - [type {"+" Type} - [category {"+" Class}]] + ["[0]" field (.only Field)] + ["_" bytecode (.only Bytecode) ("[1]#[0]" monad)] + [type (.only Type) + [category (.only Class)]] [constant - [pool {"+" Resource}]]]]]] + [pool (.only Resource)]]]]]] ["[0]" // ["[1][0]" count] ["/[1]" // "_" @@ -25,9 +25,9 @@ ["//[1]" /// "_" ["[1][0]" reference] [////// - ["[0]" arity {"+" Arity}] + ["[0]" arity (.only Arity)] [reference - [variable {"+" Register}]]]]]]) + [variable (.only Register)]]]]]]) (def: .public (initial amount) (-> Nat (Bytecode Any)) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/method.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/method.lux index e684f86bc..93f08dc46 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/method.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/method.lux @@ -3,8 +3,8 @@ [lux "*" [target [jvm - ["[0]" modifier {"+" Modifier} ("[1]#[0]" monoid)] - ["[0]" method {"+" Method}]]]]]) + ["[0]" modifier (.only Modifier) ("[1]#[0]" monoid)] + ["[0]" method (.only Method)]]]]]) (def: .public modifier (Modifier Method) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/method/apply.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/method/apply.lux index e4b3c7802..873e2818a 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/method/apply.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/method/apply.lux @@ -2,7 +2,7 @@ [library [lux {"-" Type Label type} [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["[0]" try]] [data @@ -15,14 +15,14 @@ ["[0]" i32]]] [target [jvm - ["_" bytecode {"+" Label Bytecode} ("[1]#[0]" monad)] - ["[0]" method {"+" Method}] + ["_" bytecode (.only Label Bytecode) ("[1]#[0]" monad)] + ["[0]" method (.only Method)] [constant - [pool {"+" Resource}]] + [pool (.only Resource)]] [encoding ["[0]" signed]] - ["[0]" type {"+" Type} - ["[0]" category {"+" Class}]]]]]] + ["[0]" type (.only Type) + ["[0]" category (.only Class)]]]]]] ["[0]" // ["[1][0]" reset] ["[1][0]" implementation] @@ -41,12 +41,12 @@ ["[1][0]" value] ["[1][0]" reference] [//// - [analysis {"+" Environment}] - [synthesis {"+" Synthesis}] + [analysis (.only Environment)] + [synthesis (.only Synthesis)] [/// - [arity {"+" Arity}] + [arity (.only Arity)] [reference - [variable {"+" Register}]]]]]]]) + [variable (.only Register)]]]]]]]) (def: (increment by) (-> Nat (Bytecode Any)) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/method/implementation.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/method/implementation.lux index eb17c5044..9d5466340 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/method/implementation.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/method/implementation.lux @@ -9,19 +9,19 @@ ["n" nat]]] [target [jvm - ["[0]" modifier {"+" Modifier} ("[1]#[0]" monoid)] - ["[0]" method {"+" Method}] - ["_" bytecode {"+" Label Bytecode}] + ["[0]" modifier (.only Modifier) ("[1]#[0]" monoid)] + ["[0]" method (.only Method)] + ["_" bytecode (.only Label Bytecode)] [constant - [pool {"+" Resource}]] - ["[0]" type {"+" Type} - ["[0]" category {"+" Class}]]]]]] + [pool (.only Resource)]] + ["[0]" type (.only Type) + ["[0]" category (.only Class)]]]]]] ["[0]" // ["//[1]" /// "_" ["[0]" runtime] ["[1][0]" type] [////// - [arity {"+" Arity}] + [arity (.only Arity)] [meta [archive ["[0]" unit]]]]]]) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/method/init.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/method/init.lux index d909c1aaf..2613bda11 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/method/init.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/method/init.lux @@ -13,14 +13,14 @@ ["n" nat]]] [target [jvm - ["_" bytecode {"+" Bytecode}] - ["[0]" method {"+" Method}] + ["_" bytecode (.only Bytecode)] + ["[0]" method (.only Method)] [encoding ["[0]" signed]] [constant - [pool {"+" Resource}]] - ["[0]" type {"+" Type} - ["[0]" category {"+" Class Value}]]]]]] + [pool (.only Resource)]] + ["[0]" type (.only Type) + ["[0]" category (.only Class Value)]]]]]] ["[0]" // ["[1][0]" implementation] ["/[1]" // "_" @@ -35,12 +35,12 @@ ["[1][0]" type] ["[1][0]" reference] [//// - [analysis {"+" Environment}] - [synthesis {"+" Synthesis}] + [analysis (.only Environment)] + [synthesis (.only Synthesis)] [/// - ["[0]" arity {"+" Arity}] + ["[0]" arity (.only Arity)] [reference - [variable {"+" Register}]]]]]]]) + [variable (.only Register)]]]]]]]) (def: .public name "<init>") diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/method/new.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/method/new.lux index 06c0b32d3..9d05cc4f2 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/method/new.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/method/new.lux @@ -2,7 +2,7 @@ [library [lux {"-" Type type} [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [data [collection ["[0]" list]]] @@ -11,17 +11,17 @@ ["n" nat]]] [target [jvm - ["[0]" field {"+" Field}] - ["[0]" method {"+" Method}] - ["_" bytecode {"+" Bytecode}] + ["[0]" field (.only Field)] + ["[0]" method (.only Method)] + ["_" bytecode (.only Bytecode)] ["[0]" constant - [pool {"+" Resource}]] - [type {"+" Type} - ["[0]" category {"+" Class Value Return}]]]] + [pool (.only Resource)]] + [type (.only Type) + ["[0]" category (.only Class Value Return)]]]] [tool [compiler [meta - ["[0]" archive {"+" Archive}]]]]]] + ["[0]" archive (.only Archive)]]]]]] ["[0]" // ["[1][0]" init] ["[1][0]" implementation] @@ -33,14 +33,14 @@ ["[1][0]" foreign] ["[1][0]" partial]]] ["/[1]" // "_" - [runtime {"+" Operation Phase}] + [runtime (.only Operation Phase)] ["[1][0]" value] ["[1][0]" reference] [//// - [analysis {"+" Environment}] - [synthesis {"+" Synthesis}] + [analysis (.only Environment)] + [synthesis (.only Synthesis)] [/// - ["[0]" arity {"+" Arity}] + ["[0]" arity (.only Arity)] ["[0]" phase]]]]]]) (def: .public (instance' foreign_setup class environment arity) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/method/reset.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/method/reset.lux index ea9f1fc21..31350c892 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/method/reset.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/function/method/reset.lux @@ -6,12 +6,12 @@ ["[0]" list ("[1]#[0]" functor)]]] [target [jvm - ["[0]" method {"+" Method}] - ["_" bytecode {"+" Bytecode}] + ["[0]" method (.only Method)] + ["_" bytecode (.only Bytecode)] [constant - [pool {"+" Resource}]] - ["[0]" type {"+" Type} - ["[0]" category {"+" Class}]]]]]] + [pool (.only Resource)]] + ["[0]" type (.only Type) + ["[0]" category (.only Class)]]]]]] ["[0]" // ["[1][0]" new] ["/[1]" // "_" @@ -21,10 +21,10 @@ ["/[1]" // "_" ["[1][0]" reference] [//// - [analysis {"+" Environment}] - [synthesis {"+" Synthesis}] + [analysis (.only Environment)] + [synthesis (.only Synthesis)] [/// - ["[0]" arity {"+" Arity}]]]]]]) + ["[0]" arity (.only Arity)]]]]]]) (def: .public name "reset") diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/host.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/host.lux index d9f873984..dfa514d16 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/host.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/host.lux @@ -1,36 +1,36 @@ (.using [library [lux {"-" Definition} - ["[0]" ffi {"+" import: do_to object}] + ["[0]" ffi (.only import: do_to object)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" maybe] - ["[0]" try {"+" Try}] - ["[0]" exception {"+" exception:}] - ["[0]" io {"+" IO io}] + ["[0]" try (.only Try)] + ["[0]" exception (.only exception:)] + ["[0]" io (.only IO io)] [concurrency - ["[0]" atom {"+" Atom atom}]]] + ["[0]" atom (.only Atom atom)]]] [data - [binary {"+" Binary}] + [binary (.only Binary)] ["[0]" product] ["[0]" text ("[1]#[0]" hash) - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" array] - ["[0]" dictionary {"+" Dictionary}] + ["[0]" dictionary (.only Dictionary)] ["[0]" sequence]] ["[0]" format "_" ["[1]" binary]]] [target [jvm - ["_" bytecode {"+" Bytecode}] - ["[0]" loader {"+" Library}] - ["[0]" modifier {"+" Modifier} ("[1]#[0]" monoid)] - ["[0]" field {"+" Field}] - ["[0]" method {"+" Method}] + ["_" bytecode (.only Bytecode)] + ["[0]" loader (.only Library)] + ["[0]" modifier (.only Modifier) ("[1]#[0]" monoid)] + ["[0]" field (.only Field)] + ["[0]" method (.only Method)] ["[0]" version] - ["[0]" class {"+" Class}] + ["[0]" class (.only Class)] ["[0]" encoding "_" ["[1]/[0]" name]] ["[0]" type @@ -38,11 +38,11 @@ [tool [compiler [meta - [io {"+" lux_context}] + [io (.only lux_context)] [archive ["[0]" unit]]]]]]] ["[0]" // "_" - ["[1][0]" runtime {"+" Definition}] + ["[1][0]" runtime (.only Definition)] ["[1][0]" type] ["[1][0]" value]] ) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/loop.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/loop.lux index 167e22442..40a75189d 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/loop.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/loop.lux @@ -2,7 +2,7 @@ [library [lux "*" [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["[0]" function]] [data @@ -14,17 +14,17 @@ ["n" nat]]] [target [jvm - ["_" bytecode {"+" Bytecode} ("[1]#[0]" monad)]]]]] + ["_" bytecode (.only Bytecode) ("[1]#[0]" monad)]]]]] ["[0]" // "_" - ["[1][0]" runtime {"+" Operation Phase Generator}] + ["[1][0]" runtime (.only Operation Phase Generator)] ["[1][0]" value] [//// - ["[0]" synthesis {"+" Path Synthesis}] + ["[0]" synthesis (.only Path Synthesis)] ["[0]" generation] [/// ["[0]" phase] [reference - [variable {"+" Register}]]]]]) + [variable (.only Register)]]]]]) (def: (invariant? register changeS) (-> Register Synthesis Bit) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/primitive.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/primitive.lux index 21a10ad06..7a5b4d3eb 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/primitive.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/primitive.lux @@ -1,9 +1,9 @@ (.using [library [lux {"-" i64} - ["[0]" ffi {"+" import:}] + ["[0]" ffi (.only import:)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" try]] [macro @@ -13,7 +13,7 @@ ["i" int]]] [target [jvm - ["_" bytecode {"+" Bytecode}] + ["_" bytecode (.only Bytecode)] ["[0]" type] [encoding ["[0]" signed]]]]]] diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/program.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/program.lux index dacdd2318..dea6eef5f 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/program.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/program.lux @@ -2,7 +2,7 @@ [library [lux {"-" Definition} [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" try]] [data @@ -12,11 +12,11 @@ ["[1]" binary]]] [target [jvm - ["_" bytecode {"+" Bytecode}] - ["[0]" modifier {"+" Modifier} ("[1]#[0]" monoid)] - ["[0]" method {"+" Method}] + ["_" bytecode (.only Bytecode)] + ["[0]" modifier (.only Modifier) ("[1]#[0]" monoid)] + ["[0]" method (.only Method)] ["[0]" version] - ["[0]" class {"+" Class}] + ["[0]" class (.only Class)] [encoding ["[0]" name]] ["[0]" type @@ -25,12 +25,12 @@ [compiler [language [lux - [program {"+" Program}]]] + [program (.only Program)]]] [meta [archive ["[0]" unit]]]]]]] ["[0]" // - ["[1][0]" runtime {"+" Definition}] + ["[1][0]" runtime (.only Definition)] ["[1][0]" function/abstract]]) (def: ^Object diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/reference.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/reference.lux index 725952b30..7efa8cf7a 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/reference.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/reference.lux @@ -2,18 +2,18 @@ [library [lux "*" [abstract - [monad {"+" do}]] + [monad (.only do)]] [data [text - ["%" format {"+" format}]]] + ["%" format (.only format)]]] [target [jvm - ["_" bytecode {"+" Bytecode}] + ["_" bytecode (.only Bytecode)] ["[0]" type] [encoding ["[0]" unsigned]]]]]] ["[0]" // "_" - ["[1][0]" runtime {"+" Operation}] + ["[1][0]" runtime (.only Operation)] ["[1][0]" value] ["[1][0]" type] ["//[1]" /// "_" @@ -22,9 +22,9 @@ [/// ["[1]" phase ("operation#[0]" monad)] [reference - ["[0]" variable {"+" Register Variable}]] + ["[0]" variable (.only Register Variable)]] [meta - [archive {"+" Archive}]]]]]]) + [archive (.only Archive)]]]]]]) (def: .public this (Bytecode Any) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/runtime.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/runtime.lux index cb82ec642..d8d310885 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/runtime.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/runtime.lux @@ -2,12 +2,12 @@ [library [lux {"-" Type Definition Label case false true try} [abstract - ["[0]" monad {"+" do}] + ["[0]" monad (.only do)] ["[0]" enum]] [control ["[0]" try]] [data - [binary {"+" Binary}] + [binary (.only Binary)] ["[0]" product] [collection ["[0]" list ("[1]#[0]" functor)] @@ -15,7 +15,7 @@ ["[0]" format "_" ["[1]" binary]] [text - ["%" format {"+" format}]]] + ["%" format (.only format)]]] [math [number ["n" nat] @@ -25,18 +25,18 @@ ["[0]" version]] [target ["[0]" jvm "_" - ["_" bytecode {"+" Label Bytecode}] - ["[0]" modifier {"+" Modifier} ("[1]#[0]" monoid)] - ["[0]" field {"+" Field}] - ["[0]" method {"+" Method}] + ["_" bytecode (.only Label Bytecode)] + ["[0]" modifier (.only Modifier) ("[1]#[0]" monoid)] + ["[0]" field (.only Field)] + ["[0]" method (.only Method)] ["[1]/[0]" version] - ["[0]" class {"+" Class}] + ["[0]" class (.only Class)] ["[0]" constant - [pool {"+" Resource}]] + [pool (.only Resource)]] [encoding ["[0]" name]] - ["[0]" type {"+" Type} - ["[0]" category {"+" Return' Value'}] + ["[0]" type (.only Type) + ["[0]" category (.only Return' Value')] ["[0]" reflection]]]]]] ["[0]" // "_" ["[1][0]" type] @@ -54,14 +54,14 @@ ["[0]" generation] [/// ["[1]" phase] - [arity {"+" Arity}] + [arity (.only Arity)] [reference - [variable {"+" Register}]] + [variable (.only Register)]] [meta - [io {"+" lux_context}] - [archive {"+" Output Archive} + [io (.only lux_context)] + [archive (.only Output Archive) ["[0]" artifact] - ["[0]" registry {"+" Registry}] + ["[0]" registry (.only Registry)] ["[0]" unit]]]]]]]) (type: .public Byte_Code diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/structure.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/structure.lux index 4b0b2c145..911aa4f34 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/structure.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/structure.lux @@ -2,7 +2,7 @@ [library [lux {"-" Variant Tuple} [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["[0]" try]] [data @@ -13,18 +13,18 @@ ["[0]" i32]]] [target [jvm - ["_" bytecode {"+" Bytecode}] + ["_" bytecode (.only Bytecode)] ["[0]" type] [encoding ["[0]" signed]]]]]] ["[0]" // "_" ["[1][0]" type] - ["[1][0]" runtime {"+" Operation Phase Generator}] + ["[1][0]" runtime (.only Operation Phase Generator)] ["[1][0]" primitive] ["///[1]" //// "_" - ["[1][0]" synthesis {"+" Synthesis}] + ["[1][0]" synthesis (.only Synthesis)] [analysis - [complex {"+" Variant Tuple}]] + [complex (.only Variant Tuple)]] [/// ["[0]" phase]]]]) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/value.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/value.lux index e40b7d122..358df556e 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/value.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/jvm/value.lux @@ -3,9 +3,9 @@ [lux {"-" Type Primitive type} [target [jvm - ["_" bytecode {"+" Bytecode}] - ["[0]" type {"+" Type} ("[1]#[0]" equivalence) - [category {"+" Primitive}] + ["_" bytecode (.only Bytecode)] + ["[0]" type (.only Type) ("[1]#[0]" equivalence) + [category (.only Primitive)] ["[0]" box]]]]]]) (def: .public field "value") diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua.lux index 6493ea02a..d32c9cf0b 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua.lux @@ -2,15 +2,15 @@ [library [lux "*" [abstract - [monad {"+" do}]] + [monad (.only do)]] [control - ["[0]" exception {"+" exception:}]] + ["[0]" exception (.only exception:)]] [macro ["^" pattern]] [target ["_" lua]]]] ["[0]" / "_" - [runtime {"+" Phase}] + [runtime (.only Phase)] ["[1][0]" primitive] ["[1][0]" structure] ["[1][0]" reference] @@ -25,12 +25,12 @@ [lua ["[1]/[0]" common]]]] ["/[1]" // "_" - [analysis {"+" }] + [analysis (.only)] ["[0]" synthesis] ["//[1]" /// "_" ["[1][0]" phase ("[1]#[0]" monad)] - [reference {"+" } - [variable {"+" }]]]]]]]) + [reference (.only) + [variable (.only)]]]]]]]) (exception: .public cannot_recur_as_an_expression) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/case.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/case.lux index 18776639d..7fd901461 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/case.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/case.lux @@ -2,19 +2,19 @@ [library [lux {"-" case exec let if} [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [data ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" functor mix)] ["[0]" set]]] [macro ["^" pattern]] [target - ["_" lua {"+" Expression Var Statement}]]]] + ["_" lua (.only Expression Var Statement)]]]] ["[0]" // "_" - ["[1][0]" runtime {"+" Operation Phase Phase! Generator Generator!}] + ["[1][0]" runtime (.only Operation Phase Phase! Generator Generator!)] ["[1][0]" reference] ["[1][0]" primitive] ["/[1]" // "_" @@ -23,16 +23,16 @@ ["[1][0]" synthesis "_" ["[1]/[0]" case]] ["/[1]" // "_" - ["[1][0]" synthesis {"+" Synthesis Path} + ["[1][0]" synthesis (.only Synthesis Path) [access - ["[0]" member {"+" Member}]]] + ["[0]" member (.only Member)]]] ["[1][0]" generation] ["//[1]" /// "_" [reference - ["[1][0]" variable {"+" Register}]] + ["[1][0]" variable (.only Register)]] ["[1][0]" phase ("[1]#[0]" monad)] [meta - [archive {"+" Archive}]]]]]]]) + [archive (.only Archive)]]]]]]]) (def: .public register (-> Register Var) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/function.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/function.lux index de0387fd7..2d71b0fd5 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/function.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/function.lux @@ -2,27 +2,27 @@ [library [lux {"-" Label function} [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [data ["[0]" product] [text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" functor mix)]]] [target - ["_" lua {"+" Var Expression Label Statement}]]]] + ["_" lua (.only Var Expression Label Statement)]]]] ["[0]" // "_" - ["[1][0]" runtime {"+" Operation Phase Phase! Generator}] + ["[1][0]" runtime (.only Operation Phase Phase! Generator)] ["[1][0]" reference] ["[1][0]" case] ["/[1]" // "_" ["[1][0]" reference] ["//[1]" /// "_" - [analysis {"+" Abstraction Reification Analysis}] - [synthesis {"+" Synthesis}] + [analysis (.only Abstraction Reification Analysis)] + [synthesis (.only Synthesis)] ["[1][0]" generation] ["//[1]" /// "_" - [arity {"+" Arity}] + [arity (.only Arity)] ["[1][0]" phase ("[1]#[0]" monad)] [meta [archive @@ -31,7 +31,7 @@ [dependency ["[1]" artifact]]]] [reference - [variable {"+" Register Variable}]]]]]]) + [variable (.only Register Variable)]]]]]]) (def: .public (apply expression archive [functionS argsS+]) (Generator (Reification Synthesis)) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/loop.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/loop.lux index 9883feaaf..55cf46cca 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/loop.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/loop.lux @@ -2,11 +2,11 @@ [library [lux {"-" Label Scope} [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [data ["[0]" product] [text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" functor)] ["[0]" set]]] @@ -14,24 +14,24 @@ [number ["n" nat]]] [target - ["_" lua {"+" Var Expression Label Statement}]]]] + ["_" lua (.only Var Expression Label Statement)]]]] ["[0]" // "_" - [runtime {"+" Operation Phase Phase! Generator Generator!}] + [runtime (.only Operation Phase Phase! Generator Generator!)] ["[1][0]" case] ["/[1]" // "_" ["[1][0]" reference] ["//[1]" /// "_" - ["[0]"synthesis {"+" Scope Synthesis}] + ["[0]"synthesis (.only Scope Synthesis)] ["[1][0]" generation] ["//[1]" /// "_" ["[1][0]" phase] [meta - [archive {"+" Archive}] + [archive (.only Archive)] ["[0]" cache "_" [dependency ["[1]" artifact]]]] [reference - [variable {"+" Register}]]]]]]) + [variable (.only Register)]]]]]]) (def: @scope (-> Nat Label) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/primitive.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/primitive.lux index 556371e6a..50535a1a4 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/primitive.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/primitive.lux @@ -1,8 +1,8 @@ (.using - [library - [lux {"-" i64} - [target - ["_" lua {"+" Literal}]]]]) + [library + [lux {"-" i64} + [target + ["_" lua (.only Literal)]]]]) (template [<name> <type> <implementation>] [(def: .public <name> diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/reference.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/reference.lux index f3ff385ae..7cff5ed07 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/reference.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/reference.lux @@ -1,10 +1,10 @@ (.using - [library - [lux "*" - [target - ["_" lua {"+" Expression}]]]] - [/// - [reference {"+" System}]]) + [library + [lux "*" + [target + ["_" lua (.only Expression)]]]] + [/// + [reference (.only System)]]) (implementation: .public system (System Expression) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/runtime.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/runtime.lux index 9864bd037..149d5d333 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/runtime.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/runtime.lux @@ -3,7 +3,7 @@ [lux {"-" Label Location} ["[0]" meta] [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["[0]" function] ["<>" parser @@ -11,32 +11,32 @@ [data ["[0]" product] ["[0]" text ("[1]#[0]" hash) - ["%" format {"+" format}] + ["%" format (.only format)] [encoding ["[0]" utf8]]] [collection ["[0]" list ("[1]#[0]" functor)] ["[0]" sequence]]] ["[0]" macro - [syntax {"+" syntax:}] + [syntax (.only syntax:)] ["[0]" code]] [math - [number {"+" hex} + [number (.only hex) ["[0]" i64]]] ["@" target - ["_" lua {"+" Expression Location Var Computation Literal Label Statement}]]]] + ["_" lua (.only Expression Location Var Computation Literal Label Statement)]]]] ["[0]" /// "_" ["[1][0]" reference] ["//[1]" /// "_" - ["[1][0]" synthesis {"+" Synthesis}] + ["[1][0]" synthesis (.only Synthesis)] ["[1][0]" generation] ["//[1]" /// ["[1][0]" phase] [reference - [variable {"+" Register}]] + [variable (.only Register)]] [meta - [archive {"+" Output Archive} - ["[0]" registry {"+" Registry}] + [archive (.only Output Archive) + ["[0]" registry (.only Registry)] ["[0]" unit]]]]]]) (template [<name> <base>] diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/structure.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/structure.lux index 80028d75e..e1d8961f8 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/structure.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/lua/structure.lux @@ -2,16 +2,16 @@ [library [lux {"-" Tuple Variant} [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [target - ["_" lua {"+" Expression}]]]] + ["_" lua (.only Expression)]]]] ["[0]" // "_" - ["[1][0]" runtime {"+" Operation Phase Generator}] + ["[1][0]" runtime (.only Operation Phase Generator)] ["[1][0]" primitive] ["///[1]" //// "_" - ["[1][0]" synthesis {"+" Synthesis}] + ["[1][0]" synthesis (.only Synthesis)] [analysis - [complex {"+" Variant Tuple}]] + [complex (.only Variant Tuple)]] ["//[1]" /// "_" ["[1][0]" phase ("[1]#[0]" monad)]]]]) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php.lux index 460350507..c878aa282 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php.lux @@ -2,15 +2,15 @@ [library [lux "*" [abstract - [monad {"+" do}]] + [monad (.only do)]] [control - ["[0]" exception {"+" exception:}]] + ["[0]" exception (.only exception:)]] [macro ["^" pattern]] [target ["_" php]]]] ["[0]" / "_" - [runtime {"+" Phase Phase!}] + [runtime (.only Phase Phase!)] ["[1][0]" primitive] ["[1][0]" structure] ["[1][0]" reference] @@ -22,12 +22,12 @@ ["/[1]" // "_" ["[1][0]" extension] ["/[1]" // "_" - [analysis {"+" }] + [analysis (.only)] ["[1][0]" synthesis] ["//[1]" /// "_" ["[1][0]" phase ("[1]#[0]" monad)] - [reference {"+"} - [variable {"+"}]]]]]]]) + [reference (.only) + [variable (.only)]]]]]]]) (def: (statement expression archive synthesis) Phase! diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/case.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/case.lux index c950b555c..52c5a626e 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/case.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/case.lux @@ -2,11 +2,11 @@ [library [lux {"-" case let if} [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [data ["[0]" product] ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" functor mix)] ["[0]" set]]] @@ -16,9 +16,9 @@ [number ["i" int]]] [target - ["_" php {"+" Expression Var Statement}]]]] + ["_" php (.only Expression Var Statement)]]]] ["[0]" // "_" - ["[1][0]" runtime {"+" Operation Phase Phase! Generator Generator!}] + ["[1][0]" runtime (.only Operation Phase Phase! Generator Generator!)] ["[1][0]" reference] ["[1][0]" primitive] ["/[1]" // "_" @@ -27,14 +27,14 @@ ["[1][0]" synthesis "_" ["[1]/[0]" case]] ["/[1]" // "_" - ["[1][0]" synthesis {"+" Member Synthesis Path}] + ["[1][0]" synthesis (.only Member Synthesis Path)] ["[1][0]" generation] ["//[1]" /// "_" [reference - ["[1][0]" variable {"+" Register}]] + ["[1][0]" variable (.only Register)]] ["[1][0]" phase ("[1]#[0]" monad)] [meta - [archive {"+" Archive}]]]]]]]) + [archive (.only Archive)]]]]]]]) (def: .public register (-> Register Var) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/extension.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/extension.lux index 1a041edc1..8c2e01506 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/extension.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/extension.lux @@ -1,13 +1,13 @@ (.using - [library - [lux "*" - [data - [collection - ["[0]" dictionary]]]]] - [// - [runtime {"+" Bundle}]] - [/ - ["[0]" common]]) + [library + [lux "*" + [data + [collection + ["[0]" dictionary]]]]] + [// + [runtime (.only Bundle)]] + [/ + ["[0]" common]]) (def: .public bundle Bundle diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/extension/common.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/extension/common.lux index c52d69b22..e0549236f 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/extension/common.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/extension/common.lux @@ -2,7 +2,7 @@ [library [lux "*" [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["[0]" function]] [data @@ -13,13 +13,13 @@ [collection ["[0]" dictionary]]] [target - ["_" php {"+" Expression}]]]] + ["_" php (.only Expression)]]]] ["[0]" /// "_" - ["[1][0]" runtime {"+" Operation Phase Handler Bundle}] + ["[1][0]" runtime (.only Operation Phase Handler Bundle)] ["[1][0]" primitive] [// - [extension {"+" Nullary Unary Binary Trinary - nullary unary binary trinary}] + [extension (.only Nullary Unary Binary Trinary + nullary unary binary trinary)] [// [extension ["[0]" bundle]]]]]) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/function.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/function.lux index e9cc9f517..7dfe4b9d0 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/function.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/function.lux @@ -2,32 +2,32 @@ [library [lux {"-" Global function} [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control pipe] [data ["[0]" product] ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" functor mix)]]] [target - ["_" php {"+" Var Global Expression Argument Label Statement}]]]] + ["_" php (.only Var Global Expression Argument Label Statement)]]]] ["[0]" // "_" - ["[1][0]" runtime {"+" Operation Phase Phase! Generator}] + ["[1][0]" runtime (.only Operation Phase Phase! Generator)] ["[1][0]" reference] ["[1][0]" case] ["/[1]" // "_" ["[1][0]" reference] ["//[1]" /// "_" - [analysis {"+" Variant Tuple Abstraction Application Analysis}] - [synthesis {"+" Synthesis}] - ["[1][0]" generation {"+" Context}] + [analysis (.only Variant Tuple Abstraction Application Analysis)] + [synthesis (.only Synthesis)] + ["[1][0]" generation (.only Context)] ["//[1]" /// "_" - [arity {"+" Arity}] + [arity (.only Arity)] ["[1][0]" phase ("[1]#[0]" monad)] [reference - [variable {"+" Register Variable}]]]]]]) + [variable (.only Register Variable)]]]]]]) (def: .public (apply expression archive [functionS argsS+]) (Generator (Application Synthesis)) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/loop.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/loop.lux index 3c12092c7..53d726bc2 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/loop.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/loop.lux @@ -2,21 +2,21 @@ [library [lux {"-" Scope} [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [data ["[0]" product] ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" functor mix)] - ["[0]" set {"+" Set}]]] + ["[0]" set (.only Set)]]] [math [number ["n" nat]]] [target - ["_" php {"+" Var Expression Label Statement}]]]] + ["_" php (.only Var Expression Label Statement)]]]] ["[0]" // "_" - [runtime {"+" Operation Phase Phase! Generator Generator!}] + [runtime (.only Operation Phase Phase! Generator Generator!)] ["[1][0]" case] ["/[1]" // "_" ["[1][0]" reference] @@ -24,14 +24,14 @@ [synthesis ["[0]" case]] ["/[1]" // "_" - ["[0]"synthesis {"+" Scope Synthesis}] + ["[0]"synthesis (.only Scope Synthesis)] ["[1][0]" generation] ["//[1]" /// "_" ["[1][0]" phase] [meta - [archive {"+" Archive}]] + [archive (.only Archive)]] [reference - [variable {"+" Register}]]]]]]]) + [variable (.only Register)]]]]]]]) (def: @scope (-> Nat Label) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/primitive.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/primitive.lux index e5cc82537..635d2e7f4 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/primitive.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/primitive.lux @@ -1,13 +1,13 @@ (.using - [library - [lux {"-" i64} - [math - [number - ["[0]" frac]]] - [target - ["_" php {"+" Literal Expression}]]]] - ["[0]" // "_" - ["[1][0]" runtime]]) + [library + [lux {"-" i64} + [math + [number + ["[0]" frac]]] + [target + ["_" php (.only Literal Expression)]]]] + ["[0]" // "_" + ["[1][0]" runtime]]) (def: .public bit (-> Bit Literal) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/reference.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/reference.lux index 501bd515a..e76d2104b 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/reference.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/reference.lux @@ -1,10 +1,10 @@ (.using - [library - [lux "*" - [target - ["_" php {"+" Expression}]]]] - [/// - [reference {"+" System}]]) + [library + [lux "*" + [target + ["_" php (.only Expression)]]]] + [/// + [reference (.only System)]]) (implementation: .public system (System Expression) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/runtime.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/runtime.lux index d8885e026..0e3d6b9d2 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/runtime.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/runtime.lux @@ -3,7 +3,7 @@ [lux {"-" Location} ["[0]" meta] [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["[0]" function] ["<>" parser @@ -11,32 +11,32 @@ [data ["[0]" product] ["[0]" text ("[1]#[0]" hash) - ["%" format {"+" format}] + ["%" format (.only format)] [encoding ["[0]" utf8]]] [collection ["[0]" list ("[1]#[0]" functor)] ["[0]" sequence]]] ["[0]" macro - [syntax {"+" syntax:}] + [syntax (.only syntax:)] ["[0]" code]] [math - [number {"+" hex} + [number (.only hex) ["[0]" i64]]] ["@" target - ["_" php {"+" Expression Label Constant Var Computation Literal Statement}]]]] + ["_" php (.only Expression Label Constant Var Computation Literal Statement)]]]] ["[0]" /// "_" ["[1][0]" reference] ["//[1]" /// "_" - ["[1][0]" synthesis {"+" Synthesis}] + ["[1][0]" synthesis (.only Synthesis)] ["[1][0]" generation] ["//[1]" /// ["[1][0]" phase] [reference - [variable {"+" Register}]] + [variable (.only Register)]] [meta - [archive {"+" Output Archive} - ["[0]" artifact {"+" Registry}]]]]]]) + [archive (.only Output Archive) + ["[0]" artifact (.only Registry)]]]]]]) (template [<name> <base>] [(type: .public <name> diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/structure.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/structure.lux index 13d0bb252..7d037a703 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/structure.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/php/structure.lux @@ -1,21 +1,21 @@ (.using - [library - [lux "*" - [abstract - ["[0]" monad {"+" do}]] - [data - [collection - ["[0]" list]]] - [target - ["_" php {"+" Expression}]]]] - ["[0]" // "_" - ["[1][0]" runtime {"+" Operation Phase Generator}] - ["[1][0]" primitive] - ["///[1]" //// "_" - [analysis {"+" Variant Tuple}] - ["[1][0]" synthesis {"+" Synthesis}] - ["//[1]" /// "_" - ["[1][0]" phase ("[1]#[0]" monad)]]]]) + [library + [lux "*" + [abstract + ["[0]" monad (.only do)]] + [data + [collection + ["[0]" list]]] + [target + ["_" php (.only Expression)]]]] + ["[0]" // "_" + ["[1][0]" runtime (.only Operation Phase Generator)] + ["[1][0]" primitive] + ["///[1]" //// "_" + [analysis (.only Variant Tuple)] + ["[1][0]" synthesis (.only Synthesis)] + ["//[1]" /// "_" + ["[1][0]" phase ("[1]#[0]" monad)]]]]) (def: .public (tuple expression archive elemsS+) (Generator (Tuple Synthesis)) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python.lux index 7e620b07a..0ae118a09 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python.lux @@ -2,15 +2,15 @@ [library [lux "*" [abstract - [monad {"+" do}]] + [monad (.only do)]] [control - ["[0]" exception {"+" exception:}]] + ["[0]" exception (.only exception:)]] [macro ["^" pattern]] [target ["_" python]]]] ["[0]" / "_" - [runtime {"+" Phase}] + [runtime (.only Phase)] ["[1][0]" primitive] ["[1][0]" structure] ["[1][0]" reference] @@ -25,12 +25,12 @@ [python ["[1]/[0]" common]]]] ["/[1]" // "_" - [analysis {"+" }] + [analysis (.only)] ["[1][0]" synthesis] ["//[1]" /// "_" ["[1][0]" phase ("[1]#[0]" monad)] - [reference {"+"} - [variable {"+"}]]]]]]]) + [reference (.only) + [variable (.only)]]]]]]]) (exception: .public cannot_recur_as_an_expression) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/case.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/case.lux index 19d8dd56d..ce77bab09 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/case.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/case.lux @@ -2,10 +2,10 @@ [library [lux {"-" case exec let if symbol} [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [data ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" functor mix)] ["[0]" set]]] @@ -16,9 +16,9 @@ ["n" nat] ["i" int]]] [target - ["_" python {"+" Expression SVar Statement}]]]] + ["_" python (.only Expression SVar Statement)]]]] ["[0]" // "_" - ["[1][0]" runtime {"+" Operation Phase Generator Phase! Generator!}] + ["[1][0]" runtime (.only Operation Phase Generator Phase! Generator!)] ["[1][0]" reference] ["[1][0]" primitive] ["/[1]" // "_" @@ -28,15 +28,15 @@ ["[0]" case]] ["/[1]" // "_" ["[1][0]" generation] - ["[1][0]" synthesis {"+" Synthesis Path} + ["[1][0]" synthesis (.only Synthesis Path) [access - ["[0]" member {"+" Member}]]] + ["[0]" member (.only Member)]]] ["//[1]" /// "_" [reference - ["[1][0]" variable {"+" Register}]] + ["[1][0]" variable (.only Register)]] ["[1][0]" phase ("[1]#[0]" monad)] [meta - [archive {"+" Archive}] + [archive (.only Archive)] ["[0]" cache "_" [dependency ["[1]" artifact]]]]]]]]]) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/function.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/function.lux index 4f959f01c..89320db4f 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/function.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/function.lux @@ -2,33 +2,33 @@ [library [lux {"-" function} [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [data ["[0]" product] [text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" functor mix)]]] [target - ["_" python {"+" SVar Expression Statement}]]]] + ["_" python (.only SVar Expression Statement)]]]] ["[0]" // "_" - [runtime {"+" Operation Phase Generator Phase! Generator!}] + [runtime (.only Operation Phase Generator Phase! Generator!)] ["[1][0]" reference] ["[1][0]" case] ["[1][0]" loop] ["/[1]" // "_" ["[1][0]" reference] ["//[1]" /// "_" - [analysis {"+" Environment Abstraction Reification Analysis}] - [synthesis {"+" Synthesis}] + [analysis (.only Environment Abstraction Reification Analysis)] + [synthesis (.only Synthesis)] ["[1][0]" generation] ["//[1]" /// "_" - [arity {"+" Arity}] + [arity (.only Arity)] ["[1][0]" phase] [reference - [variable {"+" Register Variable}]] + [variable (.only Register Variable)]] [meta - [archive {"+" Archive} + [archive (.only Archive) ["[0]" artifact]] ["[0]" cache "_" [dependency diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/loop.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/loop.lux index 12f34891b..c54db23c1 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/loop.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/loop.lux @@ -2,11 +2,11 @@ [library [lux {"-" Scope} [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [data ["[0]" product] [text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" functor mix)] ["[0]" set]]] @@ -14,9 +14,9 @@ [number ["n" nat]]] [target - ["_" python {"+" Expression SVar Statement}]]]] + ["_" python (.only Expression SVar Statement)]]]] ["[0]" // "_" - [runtime {"+" Operation Phase Generator Phase! Generator!}] + [runtime (.only Operation Phase Generator Phase! Generator!)] ["[1][0]" case] ["/[1]" // "_" ["[1][0]" reference] @@ -24,7 +24,7 @@ [synthesis ["[0]" case]] ["/[1]" // "_" - ["[0]" synthesis {"+" Scope Synthesis}] + ["[0]" synthesis (.only Scope Synthesis)] ["[1][0]" generation] ["//[1]" /// "_" ["[1][0]" phase] @@ -33,7 +33,7 @@ [dependency ["[1]" artifact]]]] [reference - ["[1][0]" variable {"+" Register}]]]]]]]) + ["[1][0]" variable (.only Register)]]]]]]]) (def: (setup offset bindings body) (-> Register (List (Expression Any)) (Statement Any) (Statement Any)) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/primitive.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/primitive.lux index 803590ccb..b1d78eb68 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/primitive.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/primitive.lux @@ -1,10 +1,10 @@ (.using - [library - [lux {"-" i64} - [target - ["_" python {"+" Expression}]]]] - ["[0]" // "_" - ["[1][0]" runtime]]) + [library + [lux {"-" i64} + [target + ["_" python (.only Expression)]]]] + ["[0]" // "_" + ["[1][0]" runtime]]) (template [<type> <name> <implementation>] [(def: .public <name> diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/reference.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/reference.lux index 10dcfeec9..18d5a1b74 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/reference.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/reference.lux @@ -1,10 +1,10 @@ (.using - [library - [lux "*" - [target - ["_" python {"+" Expression}]]]] - [/// - [reference {"+" System}]]) + [library + [lux "*" + [target + ["_" python (.only Expression)]]]] + [/// + [reference (.only System)]]) (implementation: .public system (System (Expression Any)) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/runtime.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/runtime.lux index ae9c18e2e..6a5969112 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/runtime.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/runtime.lux @@ -2,7 +2,7 @@ [library [lux {"-" ++} [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["[0]" function] ["<>" parser @@ -10,35 +10,35 @@ [data ["[0]" product] ["[0]" text ("[1]#[0]" hash) - ["%" format {"+" format}] + ["%" format (.only format)] [encoding ["[0]" utf8]]] [collection ["[0]" list ("[1]#[0]" functor)] ["[0]" sequence]]] ["[0]" macro - [syntax {"+" syntax:}] + [syntax (.only syntax:)] ["[0]" code]] [math - [number {"+" hex} + [number (.only hex) ["f" frac] ["[0]" i64]]] ["[0]" meta ["[0]" version]] ["@" target - ["_" python {"+" Expression SVar Computation Literal Statement}]]]] + ["_" python (.only Expression SVar Computation Literal Statement)]]]] ["[0]" /// "_" ["[1][0]" reference] ["//[1]" /// "_" - ["[1][0]" synthesis {"+" Synthesis}] + ["[1][0]" synthesis (.only Synthesis)] ["[1][0]" generation] ["//[1]" /// ["[1][0]" phase] [reference - [variable {"+" Register}]] + [variable (.only Register)]] [meta - [archive {"+" Output Archive} - ["[0]" registry {"+" Registry}] + [archive (.only Output Archive) + ["[0]" registry (.only Registry)] ["[0]" unit]]]]]]) (template [<name> <base>] diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/structure.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/structure.lux index fc59e133d..8b2b2ab49 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/structure.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/python/structure.lux @@ -2,16 +2,16 @@ [library [lux {"-" Variant Tuple} [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [target - ["_" python {"+" Expression}]]]] + ["_" python (.only Expression)]]]] ["[0]" // "_" - ["[1][0]" runtime {"+" Operation Phase Generator}] + ["[1][0]" runtime (.only Operation Phase Generator)] ["[1][0]" primitive] ["///[1]" //// "_" [analysis - [complex {"+" Variant Tuple}]] - ["[1][0]" synthesis {"+" Synthesis}] + [complex (.only Variant Tuple)]] + ["[1][0]" synthesis (.only Synthesis)] ["//[1]" /// "_" ["[1][0]" phase ("[1]#[0]" monad)]]]]) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r.lux index ff391b986..9d210e9cd 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r.lux @@ -2,13 +2,13 @@ [library [lux "*" [abstract - [monad {"+" do}]] + [monad (.only do)]] [macro ["^" pattern]] [target ["_" r]]]] ["[0]" / "_" - [runtime {"+" Phase}] + [runtime (.only Phase)] ["[1][0]" primitive] ["[1][0]" structure] ["[1][0]" reference] @@ -20,12 +20,12 @@ ["/[1]" // "_" ["[1][0]" extension] ["/[1]" // "_" - [analysis {"+" }] + [analysis (.only)] ["[1][0]" synthesis] ["//[1]" /// "_" ["[1][0]" phase ("[1]#[0]" monad)] - [reference {"+"} - [variable {"+"}]]]]]]]) + [reference (.only) + [variable (.only)]]]]]]]) (def: .public (generate archive synthesis) Phase diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/case.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/case.lux index 21e45438d..7ea33bdea 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/case.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/case.lux @@ -2,11 +2,11 @@ [library [lux {"-" case let if} [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [data ["[0]" product] ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" functor mix)] ["[0]" set]]] @@ -17,9 +17,9 @@ [number ["i" int]]] [target - ["_" r {"+" Expression SVar}]]]] + ["_" r (.only Expression SVar)]]]] ["[0]" // "_" - ["[1][0]" runtime {"+" Operation Phase Generator}] + ["[1][0]" runtime (.only Operation Phase Generator)] ["[1][0]" reference] ["[1][0]" primitive] ["/[1]" // "_" @@ -28,14 +28,14 @@ ["[1][0]" synthesis "_" ["[1]/[0]" case]] ["/[1]" // "_" - ["[1][0]" synthesis {"+" Member Synthesis Path}] + ["[1][0]" synthesis (.only Member Synthesis Path)] ["[1][0]" generation] ["//[1]" /// "_" [reference - ["[1][0]" variable {"+" Register}]] + ["[1][0]" variable (.only Register)]] ["[1][0]" phase ("[1]#[0]" monad)] [meta - [archive {"+" Archive}]]]]]]]) + [archive (.only Archive)]]]]]]]) (def: .public register (-> Register SVar) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/function.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/function.lux index 11a7de8ab..c5927a154 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/function.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/function.lux @@ -2,32 +2,32 @@ [library [lux {"-" function} [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control pipe] [data ["[0]" product] ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" functor mix)]]] [target - ["_" r {"+" Expression SVar}]]]] + ["_" r (.only Expression SVar)]]]] ["[0]" // "_" - ["[1][0]" runtime {"+" Operation Phase Generator}] + ["[1][0]" runtime (.only Operation Phase Generator)] ["[1][0]" reference] ["[1][0]" case] ["/[1]" // "_" ["[1][0]" reference] ["//[1]" /// "_" - [analysis {"+" Variant Tuple Abstraction Application Analysis}] - [synthesis {"+" Synthesis}] - ["[1][0]" generation {"+" Context}] + [analysis (.only Variant Tuple Abstraction Application Analysis)] + [synthesis (.only Synthesis)] + ["[1][0]" generation (.only Context)] ["//[1]" /// "_" - [arity {"+" Arity}] + [arity (.only Arity)] ["[1][0]" phase ("[1]#[0]" monad)] [reference - [variable {"+" Register Variable}]] + [variable (.only Register Variable)]] [meta [archive ["[0]" artifact]]]]]]]) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/loop.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/loop.lux index 192386b79..79fe2f4db 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/loop.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/loop.lux @@ -2,21 +2,21 @@ [library [lux {"-" Scope} [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [data ["[0]" product] ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" functor)] - ["[0]" set {"+" Set}]]] + ["[0]" set (.only Set)]]] [math [number ["n" nat]]] [target ["_" r]]]] ["[0]" // "_" - [runtime {"+" Operation Phase Generator}] + [runtime (.only Operation Phase Generator)] ["[1][0]" case] ["/[1]" // "_" ["[1][0]" reference] @@ -24,14 +24,14 @@ [synthesis ["[0]" case]] ["/[1]" // "_" - ["[0]"synthesis {"+" Scope Synthesis}] + ["[0]"synthesis (.only Scope Synthesis)] ["[1][0]" generation] ["//[1]" /// "_" ["[1][0]" phase] [meta - [archive {"+" Archive}]] + [archive (.only Archive)]] [reference - [variable {"+" Register}]]]]]]]) + [variable (.only Register)]]]]]]]) (def: .public (scope expression archive [offset initsS+ bodyS]) (Generator (Scope Synthesis)) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/primitive.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/primitive.lux index f79e73f4e..d9547c1c0 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/primitive.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/primitive.lux @@ -1,10 +1,10 @@ (.using - [library - [lux {"-" i64} - [target - ["_" r {"+" Expression}]]]] - ["[0]" // "_" - ["[1][0]" runtime]]) + [library + [lux {"-" i64} + [target + ["_" r (.only Expression)]]]] + ["[0]" // "_" + ["[1][0]" runtime]]) (template [<name> <type> <code>] [(def: .public <name> diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/procedure/common.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/procedure/common.lux index 9993054a4..4ec4330d9 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/procedure/common.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/procedure/common.lux @@ -1,23 +1,23 @@ (.using lux (lux (control [library - [monad {"+" do}]] - ["ex" exception {"+" exception:}] + [monad (.only do)]] + ["ex" exception (.only exception:)] ["p" parser]) (data ["e" error] [text] text/format [number] (coll [list "list/" Functor<List>] - (dictionary ["dict" unordered {"+" Dict}]))) - [macro {"+" with_symbols}] + (dictionary ["dict" unordered (.only Dict)]))) + [macro (.only with_symbols)] (macro [code] - ["s" syntax {"+" syntax:}]) + ["s" syntax (.only syntax:)]) [host]) (luxc ["&" lang] (lang ["la" analysis] ["ls" synthesis] - (host [r {"+" Expression}]))) + (host [r (.only Expression)]))) [///] (/// ["[0]T" runtime] ["[0]T" case] diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/procedure/host.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/procedure/host.lux index e1b8b84e6..ece7d2035 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/procedure/host.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/procedure/host.lux @@ -1,16 +1,16 @@ (.using lux (lux (control [library - [monad {"+" do}]]) + [monad (.only do)]]) (data [text] text/format (coll [list "list/" Functor<List>] - (dictionary ["dict" unordered {"+" Dict}]))) + (dictionary ["dict" unordered (.only Dict)]))) [macro "macro/" Monad<Meta>]) (luxc ["&" lang] (lang ["la" analysis] ["ls" synthesis] - (host [ruby {"+" Ruby Expression Statement}]))) + (host [ruby (.only Ruby Expression Statement)]))) [///] (/// ["[0]T" runtime]) (// ["@" common])) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/reference.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/reference.lux index eaedbb167..fd0d1d563 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/reference.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/reference.lux @@ -1,10 +1,10 @@ (.using - [library - [lux "*" - [target - ["_" r {"+" Expression}]]]] - [/// - [reference {"+" System}]]) + [library + [lux "*" + [target + ["_" r (.only Expression)]]]] + [/// + [reference (.only System)]]) (implementation: .public system (System Expression) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/runtime.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/runtime.lux index acb12a286..50695a8a4 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/runtime.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/runtime.lux @@ -3,7 +3,7 @@ [lux {"-" Location ++ i64} ["[0]" meta] [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["[0]" function] ["<>" parser @@ -11,35 +11,35 @@ [data ["[0]" product] ["[0]" text ("[1]#[0]" hash) - ["%" format {"+" format}] + ["%" format (.only format)] [encoding ["[0]" utf8]]] [collection ["[0]" list ("[1]#[0]" functor)] ["[0]" sequence]]] ["[0]" macro - [syntax {"+" syntax:}] + [syntax (.only syntax:)] ["[0]" code]] [math - [number {"+" hex} + [number (.only hex) ["n" nat] ["i" int ("[1]#[0]" interval)] ["[0]" i64]]] ["@" target - ["_" r {"+" SVar Expression}]]]] + ["_" r (.only SVar Expression)]]]] ["[0]" /// "_" ["[1][0]" reference] ["//[1]" /// "_" - [analysis {"+" Variant}] - ["[1][0]" synthesis {"+" Synthesis}] + [analysis (.only Variant)] + ["[1][0]" synthesis (.only Synthesis)] ["[1][0]" generation] ["//[1]" /// ["[1][0]" phase] [reference - [variable {"+" Register}]] + [variable (.only Register)]] [meta - [archive {"+" Output Archive} - ["[0]" artifact {"+" Registry}]]]]]]) + [archive (.only Output Archive) + ["[0]" artifact (.only Registry)]]]]]]) (def: module_id 0) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/structure.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/structure.lux index 2a11e41dc..1ab7f9a6f 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/structure.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/r/structure.lux @@ -1,21 +1,21 @@ (.using - [library - [lux "*" - [abstract - ["[0]" monad {"+" do}]] - [data - [collection - ["[0]" list]]] - [target - ["_" r {"+" Expression}]]]] - ["[0]" // "_" - ["[1][0]" runtime {"+" Operation Phase Generator}] - ["[1][0]" primitive] - ["///[1]" //// "_" - [analysis {"+" Variant Tuple}] - ["[1][0]" synthesis {"+" Synthesis}] - ["//[1]" /// "_" - ["[1][0]" phase ("[1]#[0]" monad)]]]]) + [library + [lux "*" + [abstract + ["[0]" monad (.only do)]] + [data + [collection + ["[0]" list]]] + [target + ["_" r (.only Expression)]]]] + ["[0]" // "_" + ["[1][0]" runtime (.only Operation Phase Generator)] + ["[1][0]" primitive] + ["///[1]" //// "_" + [analysis (.only Variant Tuple)] + ["[1][0]" synthesis (.only Synthesis)] + ["//[1]" /// "_" + ["[1][0]" phase ("[1]#[0]" monad)]]]]) (def: .public (tuple expression archive elemsS+) (Generator (Tuple Synthesis)) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/reference.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/reference.lux index 79ed4680c..453b73b29 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/reference.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/reference.lux @@ -4,17 +4,17 @@ ["@" target] [data [text - ["%" format {"+" format}]]] + ["%" format (.only format)]]] [meta ["[0]" version]]]] ["[0]" //// "_" ["[1][0]" generation] ["//[1]" /// "_" ["[0]" phase ("[1]#[0]" monad)] - ["[0]" reference {"+" Reference} - ["[0]" variable {"+" Register Variable}]] + ["[0]" reference (.only Reference) + ["[0]" variable (.only Register Variable)]] [meta - [archive {"+" Archive} + [archive (.only Archive) ["[0]" unit]]]]]) ... This universe constant is for languages where one can't just turn all compiled definitions diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby.lux index 8e8da02ef..c330b48e7 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby.lux @@ -2,15 +2,15 @@ [library [lux "*" [abstract - [monad {"+" do}]] + [monad (.only do)]] [control - ["[0]" exception {"+" exception:}]] + ["[0]" exception (.only exception:)]] [macro ["^" pattern]] [target ["_" ruby]]]] ["[0]" / "_" - [runtime {"+" Phase Phase!}] + [runtime (.only Phase Phase!)] ["[1][0]" primitive] ["[1][0]" structure] ["[1][0]" reference] @@ -25,12 +25,12 @@ [ruby ["[1]/[0]" common]]]] ["/[1]" // "_" - [analysis {"+" }] + [analysis (.only)] ["[1][0]" synthesis] ["//[1]" /// "_" ["[1][0]" phase ("[1]#[0]" monad)] - [reference {"+" } - [variable {"+" }]]]]]]]) + [reference (.only) + [variable (.only)]]]]]]]) (exception: .public cannot_recur_as_an_expression) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/case.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/case.lux index 260ca2b06..3f7148bc1 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/case.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/case.lux @@ -2,12 +2,12 @@ [library [lux {"-" case exec let if symbol} [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control - [exception {"+" exception:}]] + [exception (.only exception:)]] [data ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" functor mix)] ["[0]" set]]] @@ -18,9 +18,9 @@ ["n" nat] ["i" int]]] [target - ["_" ruby {"+" Expression LVar Statement}]]]] + ["_" ruby (.only Expression LVar Statement)]]]] ["[0]" // "_" - ["[1][0]" runtime {"+" Operation Phase Generator Phase! Generator!}] + ["[1][0]" runtime (.only Operation Phase Generator Phase! Generator!)] ["[1][0]" reference] ["[1][0]" primitive] ["/[1]" // "_" @@ -30,15 +30,15 @@ ["[0]" case]] ["/[1]" // "_" ["[1][0]" generation] - ["[1][0]" synthesis {"+" Synthesis Path} + ["[1][0]" synthesis (.only Synthesis Path) [access - ["[0]" member {"+" Member}]]] + ["[0]" member (.only Member)]]] ["//[1]" /// "_" [reference - ["[1][0]" variable {"+" Register}]] + ["[1][0]" variable (.only Register)]] ["[1][0]" phase ("[1]#[0]" monad)] [meta - [archive {"+" Archive}]]]]]]]) + [archive (.only Archive)]]]]]]]) (def: .public (symbol prefix) (-> Text (Operation LVar)) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/function.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/function.lux index b8e44b9e9..b56e9bc6e 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/function.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/function.lux @@ -2,31 +2,31 @@ [library [lux {"-" function} [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [data ["[0]" product] [text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" functor mix)]]] [target - ["_" ruby {"+" LVar GVar Expression Statement}]]]] + ["_" ruby (.only LVar GVar Expression Statement)]]]] ["[0]" // "_" - [runtime {"+" Operation Phase Generator Phase! Generator!}] + [runtime (.only Operation Phase Generator Phase! Generator!)] ["[1][0]" reference] ["[1][0]" case] ["[1][0]" loop] ["/[1]" // "_" ["[1][0]" reference] ["//[1]" /// "_" - [synthesis {"+" Synthesis}] - [analysis {"+" Environment Abstraction Reification Analysis}] + [synthesis (.only Synthesis)] + [analysis (.only Environment Abstraction Reification Analysis)] ["[1][0]" generation] ["//[1]" /// "_" - [arity {"+" Arity}] + [arity (.only Arity)] ["[1][0]" phase] [reference - [variable {"+" Register Variable}]] + [variable (.only Register Variable)]] [meta ["[0]" cache "_" [dependency diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/loop.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/loop.lux index e112b7817..417a2808e 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/loop.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/loop.lux @@ -2,11 +2,11 @@ [library [lux {"-" Scope symbol} [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [data ["[0]" product] ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" functor mix)] ["[0]" set]]] @@ -14,9 +14,9 @@ [number ["n" nat]]] [target - ["_" ruby {"+" Expression LVar Statement}]]]] + ["_" ruby (.only Expression LVar Statement)]]]] ["[0]" // "_" - [runtime {"+" Operation Phase Generator Phase! Generator!}] + [runtime (.only Operation Phase Generator Phase! Generator!)] ["[1][0]" case] ["/[1]" // "_" ["[1][0]" reference] @@ -24,12 +24,12 @@ [synthesis ["[0]" case]] ["/[1]" // "_" - ["[0]" synthesis {"+" Scope Synthesis}] + ["[0]" synthesis (.only Scope Synthesis)] ["[1][0]" generation] ["//[1]" /// "_" ["[1][0]" phase] [reference - ["[1][0]" variable {"+" Register}]]]]]]]) + ["[1][0]" variable (.only Register)]]]]]]]) (def: (setup offset bindings body) (-> Register (List Expression) Statement Statement) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/primitive.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/primitive.lux index a8258ccb8..437336792 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/primitive.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/primitive.lux @@ -1,8 +1,8 @@ (.using - [library - [lux {"-" i64} - [target - ["_" ruby {"+" Literal}]]]]) + [library + [lux {"-" i64} + [target + ["_" ruby (.only Literal)]]]]) (template [<type> <name> <implementation>] [(def: .public <name> diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/reference.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/reference.lux index 47c60feac..d5e7535b5 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/reference.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/reference.lux @@ -1,10 +1,10 @@ (.using - [library - [lux "*" - [target - ["_" ruby {"+" Expression}]]]] - [/// - [reference {"+" System}]]) + [library + [lux "*" + [target + ["_" ruby (.only Expression)]]]] + [/// + [reference (.only System)]]) (implementation: .public system (System Expression) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/runtime.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/runtime.lux index f7f217580..fd2dcc906 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/runtime.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/runtime.lux @@ -3,7 +3,7 @@ [lux {"-" i64 left right} ["[0]" meta] [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["[0]" function] ["<>" parser @@ -11,34 +11,34 @@ [data ["[0]" product] ["[0]" text ("[1]#[0]" hash) - ["%" format {"+" format}] + ["%" format (.only format)] [encoding ["[0]" utf8]]] [collection ["[0]" list ("[1]#[0]" functor mix)] ["[0]" sequence]]] ["[0]" macro - [syntax {"+" syntax:}] + [syntax (.only syntax:)] ["[0]" code]] [math - [number {"+" hex} + [number (.only hex) ["[0]" i64] ["[0]" int ("[1]#[0]" interval)]]] ["@" target - ["_" ruby {"+" Expression LVar Computation Literal Statement}]]]] + ["_" ruby (.only Expression LVar Computation Literal Statement)]]]] ["[0]" /// "_" ["[1][0]" reference] ["//[1]" /// "_" - ["[1][0]" synthesis {"+" Synthesis}] + ["[1][0]" synthesis (.only Synthesis)] ["[1][0]" generation] ["//[1]" /// ["[1][0]" phase] [reference - [variable {"+" Register}]] + [variable (.only Register)]] [meta - [archive {"+" Output Archive} + [archive (.only Output Archive) ["[0]" unit] - ["[0]" registry {"+" Registry}]]]]]]) + ["[0]" registry (.only Registry)]]]]]]) (template [<name> <base>] [(type: .public <name> diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/structure.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/structure.lux index 271cf4954..eaca0c092 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/structure.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/ruby/structure.lux @@ -2,16 +2,16 @@ [library [lux {"-" Variant Tuple} [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [target - ["_" ruby {"+" Expression}]]]] + ["_" ruby (.only Expression)]]]] ["[0]" // "_" - ["[1][0]" runtime {"+" Operation Phase Generator}] + ["[1][0]" runtime (.only Operation Phase Generator)] ["[1][0]" primitive] ["///[1]" //// "_" [analysis - [complex {"+" Variant Tuple}]] - ["[1][0]" synthesis {"+" Synthesis}] + [complex (.only Variant Tuple)]] + ["[1][0]" synthesis (.only Synthesis)] ["//[1]" /// "_" ["[1][0]" phase ("[1]#[0]" monad)]]]]) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme.lux index 690ab94b9..a63e6ae62 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme.lux @@ -2,13 +2,13 @@ [library [lux "*" [abstract - [monad {"+" do}]] + [monad (.only do)]] [macro ["^" pattern]] [target ["_" scheme]]]] ["[0]" / "_" - [runtime {"+" Phase}] + [runtime (.only Phase)] ["[1][0]" primitive] ["[1][0]" structure] ["[1][0]" reference] @@ -20,12 +20,12 @@ ["/[1]" // "_" ["[1][0]" extension] ["/[1]" // "_" - [analysis {"+" }] + [analysis (.only)] ["[1][0]" synthesis] ["//[1]" /// "_" ["[1][0]" phase ("[1]#[0]" monad)] - [reference {"+"} - [variable {"+"}]]]]]]]) + [reference (.only) + [variable (.only)]]]]]]]) (def: .public (generate archive synthesis) Phase diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/case.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/case.lux index e5cc0a650..9e577bfc3 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/case.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/case.lux @@ -2,11 +2,11 @@ [library [lux {"-" case let if} [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [data ["[0]" product] ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" functor mix)] ["[0]" set]]] @@ -17,9 +17,9 @@ [number ["i" int]]] [target - ["_" scheme {"+" Expression Computation Var}]]]] + ["_" scheme (.only Expression Computation Var)]]]] ["[0]" // "_" - ["[1][0]" runtime {"+" Operation Phase Generator}] + ["[1][0]" runtime (.only Operation Phase Generator)] ["[1][0]" reference] ["[1][0]" primitive] ["/[1]" // "_" @@ -28,14 +28,14 @@ ["[1][0]" synthesis "_" ["[1]/[0]" case]] ["/[1]" // "_" - ["[1][0]" synthesis {"+" Member Synthesis Path}] + ["[1][0]" synthesis (.only Member Synthesis Path)] ["[1][0]" generation] ["//[1]" /// "_" [reference - ["[1][0]" variable {"+" Register}]] + ["[1][0]" variable (.only Register)]] ["[1][0]" phase ("[1]#[0]" monad)] [meta - [archive {"+" Archive}]]]]]]]) + [archive (.only Archive)]]]]]]]) (def: .public register (-> Register Var) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/extension.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/extension.lux index 1a041edc1..8c2e01506 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/extension.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/extension.lux @@ -1,13 +1,13 @@ (.using - [library - [lux "*" - [data - [collection - ["[0]" dictionary]]]]] - [// - [runtime {"+" Bundle}]] - [/ - ["[0]" common]]) + [library + [lux "*" + [data + [collection + ["[0]" dictionary]]]]] + [// + [runtime (.only Bundle)]] + [/ + ["[0]" common]]) (def: .public bundle Bundle diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/extension/common.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/extension/common.lux index d40d0c4df..8b91b4184 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/extension/common.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/extension/common.lux @@ -2,31 +2,31 @@ [library [lux "*" [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control - ["ex" exception {"+" exception:}] + ["ex" exception (.only exception:)] [parser ["<[0]>" code]]] [data ["[0]" product] ["[0]" text] - [number {"+" hex} + [number (.only hex) ["f" frac]] [collection ["[0]" list ("[1]#[0]" functor)] - ["dict" dictionary {"+" Dictionary}]]] - ["[0]" macro {"+" with_symbols} + ["dict" dictionary (.only Dictionary)]]] + ["[0]" macro (.only with_symbols) ["[0]" code] - [syntax {"+" syntax:}]] + [syntax (.only syntax:)]] [target - ["_" scheme {"+" Expression Computation}]]]] + ["_" scheme (.only Expression Computation)]]]] ["[0]" /// "_" - ["[1][0]" runtime {"+" Operation Phase Handler Bundle}] + ["[1][0]" runtime (.only Operation Phase Handler Bundle)] ["[1]//" /// ["[1][0]" extension ["[0]" bundle]] ["[1]/" // "_" - ["[1][0]" synthesis {"+" Synthesis}]]]]) + ["[1][0]" synthesis (.only Synthesis)]]]]) (syntax: (Vector [size <code>.nat elemT <code>.any]) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/function.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/function.lux index 04560a891..6d4445587 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/function.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/function.lux @@ -2,32 +2,32 @@ [library [lux {"-" function} [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control pipe] [data ["[0]" product] ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" functor)]]] [target - ["_" scheme {"+" Expression Computation Var}]]]] + ["_" scheme (.only Expression Computation Var)]]]] ["[0]" // "_" - ["[1][0]" runtime {"+" Operation Phase Generator}] + ["[1][0]" runtime (.only Operation Phase Generator)] ["[1][0]" reference] ["[1][0]" case] ["/[1]" // "_" ["[1][0]" reference] ["//[1]" /// "_" - [analysis {"+" Variant Tuple Abstraction Application Analysis}] - [synthesis {"+" Synthesis}] - ["[1][0]" generation {"+" Context}] + [analysis (.only Variant Tuple Abstraction Application Analysis)] + [synthesis (.only Synthesis)] + ["[1][0]" generation (.only Context)] ["//[1]" /// "_" - [arity {"+" Arity}] + [arity (.only Arity)] ["[1][0]" phase ("[1]#[0]" monad)] [reference - [variable {"+" Register Variable}]]]]]]) + [variable (.only Register Variable)]]]]]]) (def: .public (apply expression archive [functionS argsS+]) (Generator (Application Synthesis)) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/loop.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/loop.lux index 519d52e1a..d535376de 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/loop.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/loop.lux @@ -2,21 +2,21 @@ [library [lux {"-" Scope} [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [data ["[0]" product] ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" functor)] - ["[0]" set {"+" Set}]]] + ["[0]" set (.only Set)]]] [math [number ["n" nat]]] [target ["_" scheme]]]] ["[0]" // "_" - [runtime {"+" Operation Phase Generator}] + [runtime (.only Operation Phase Generator)] ["[1][0]" case] ["/[1]" // "_" ["[1][0]" reference] @@ -24,14 +24,14 @@ [synthesis ["[0]" case]] ["/[1]" // "_" - ["[0]"synthesis {"+" Scope Synthesis}] + ["[0]"synthesis (.only Scope Synthesis)] ["[1][0]" generation] ["//[1]" /// "_" ["[1][0]" phase] [meta - [archive {"+" Archive}]] + [archive (.only Archive)]] [reference - [variable {"+" Register}]]]]]]]) + [variable (.only Register)]]]]]]]) (def: @scope (_.var "scope")) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/primitive.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/primitive.lux index 3b36ba7d0..1dddd3c1b 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/primitive.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/primitive.lux @@ -1,8 +1,8 @@ (.using - [library - [lux {"-" i64} - [target - ["_" scheme {"+" Expression}]]]]) + [library + [lux {"-" i64} + [target + ["_" scheme (.only Expression)]]]]) (template [<name> <type> <code>] [(def: .public <name> diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/reference.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/reference.lux index a7dbd0397..b53918670 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/reference.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/reference.lux @@ -1,10 +1,10 @@ (.using - [library - [lux "*" - [target - ["_" scheme {"+" Expression}]]]] - [/// - [reference {"+" System}]]) + [library + [lux "*" + [target + ["_" scheme (.only Expression)]]]] + [/// + [reference (.only System)]]) (implementation: .public system (System Expression) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/runtime.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/runtime.lux index dae1bb729..b48a00efc 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/runtime.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/runtime.lux @@ -3,7 +3,7 @@ [lux {"-" Location} ["[0]" meta] [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["[0]" function] ["<>" parser @@ -11,33 +11,33 @@ [data ["[0]" product] ["[0]" text ("[1]#[0]" hash) - ["%" format {"+" format}] + ["%" format (.only format)] [encoding ["[0]" utf8]]] [collection ["[0]" list ("[1]#[0]" functor)] ["[0]" sequence]]] ["[0]" macro - [syntax {"+" syntax:}] + [syntax (.only syntax:)] ["[0]" code]] [math - [number {"+" hex} + [number (.only hex) ["[0]" i64]]] ["@" target - ["_" scheme {"+" Expression Computation Var}]]]] + ["_" scheme (.only Expression Computation Var)]]]] ["[0]" /// "_" ["[1][0]" reference] ["//[1]" /// "_" - [analysis {"+" Variant}] - ["[1][0]" synthesis {"+" Synthesis}] + [analysis (.only Variant)] + ["[1][0]" synthesis (.only Synthesis)] ["[1][0]" generation] ["//[1]" /// ["[1][0]" phase] [reference - [variable {"+" Register}]] + [variable (.only Register)]] [meta - [archive {"+" Output Archive} - ["[0]" artifact {"+" Registry}]]]]]]) + [archive (.only Output Archive) + ["[0]" artifact (.only Registry)]]]]]]) (def: module_id 0) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/structure.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/structure.lux index 41e0a328c..1bf8d5746 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/structure.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/generation/scheme/structure.lux @@ -1,21 +1,21 @@ (.using - [library - [lux "*" - [abstract - ["[0]" monad {"+" do}]] - [data - [collection - ["[0]" list]]] - [target - ["_" scheme {"+" Expression}]]]] - ["[0]" // "_" - ["[1][0]" runtime {"+" Operation Phase Generator}] - ["[1][0]" primitive] - ["///[1]" //// "_" - [analysis {"+" Variant Tuple}] - ["[1][0]" synthesis {"+" Synthesis}] - ["//[1]" /// "_" - ["[1][0]" phase ("[1]#[0]" monad)]]]]) + [library + [lux "*" + [abstract + ["[0]" monad (.only do)]] + [data + [collection + ["[0]" list]]] + [target + ["_" scheme (.only Expression)]]]] + ["[0]" // "_" + ["[1][0]" runtime (.only Operation Phase Generator)] + ["[1][0]" primitive] + ["///[1]" //// "_" + [analysis (.only Variant Tuple)] + ["[1][0]" synthesis (.only Synthesis)] + ["//[1]" /// "_" + ["[1][0]" phase ("[1]#[0]" monad)]]]]) (def: .public (tuple expression archive elemsS+) (Generator (Tuple Synthesis)) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/synthesis.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/synthesis.lux index 38fc993d0..671b0cc8f 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/synthesis.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/synthesis.lux @@ -2,14 +2,14 @@ [library [lux "*" [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["[0]" pipe] ["[0]" try]] [data [collection ["[0]" list ("[1]#[0]" functor)] - ["[0]" dictionary {"+" Dictionary}]]] + ["[0]" dictionary (.only Dictionary)]]] [macro ["^" pattern]]]] ["[0]" / "_" @@ -19,15 +19,15 @@ ["/[1]" // "_" ["[1][0]" extension] ["/[1]" // "_" - ["/" synthesis {"+" Synthesis Phase} + ["/" synthesis (.only Synthesis Phase) ["[1][0]" simple]] - ["[1][0]" analysis {"+" Analysis} + ["[1][0]" analysis (.only Analysis) ["[2][0]" simple] ["[2][0]" complex]] [/// ["[0]" phase ("[1]#[0]" monad)] - [reference {"+"} - [variable {"+"}]]]]]]) + [reference (.only) + [variable (.only)]]]]]]) (def: (simple analysis) (-> ///simple.Simple /simple.Simple) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/synthesis/case.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/synthesis/case.lux index 0f8d92144..b530ca005 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/synthesis/case.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/synthesis/case.lux @@ -2,8 +2,8 @@ [library [lux "*" [abstract - [equivalence {"+" Equivalence}] - ["[0]" monad {"+" do}]] + [equivalence (.only Equivalence)] + ["[0]" monad (.only do)]] [control ["[0]" pipe]] [data @@ -12,7 +12,7 @@ ["[0]" text ("[1]#[0]" equivalence)] [collection ["[0]" list ("[1]#[0]" functor mix monoid)] - ["[0]" set {"+" Set}]]] + ["[0]" set (.only Set)]]] [macro ["^" pattern]] [math @@ -22,20 +22,20 @@ ["[0]" frac]]]]] ["[0]" /// "_" [// - ["[1][0]" analysis {"+" Match Analysis} + ["[1][0]" analysis (.only Match Analysis) ["[2][0]" simple] ["[2][0]" complex] - ["[2][0]" pattern {"+" Pattern}]] - ["/" synthesis {"+" Path Synthesis Operation Phase} + ["[2][0]" pattern (.only Pattern)]] + ["/" synthesis (.only Path Synthesis Operation Phase) ["[1][0]" access ["[2][0]" side] - ["[2][0]" member {"+" Member}]]] + ["[2][0]" member (.only Member)]]] [/// ["[1]" phase ("[1]#[0]" monad)] ["[1][0]" reference - ["[1]/[0]" variable {"+" Register Variable}]] + ["[1]/[0]" variable (.only Register Variable)]] [meta - [archive {"+" Archive}]]]]]) + [archive (.only Archive)]]]]]) (def: clean_up (-> Path Path) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/synthesis/function.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/synthesis/function.lux index e478001a6..27ffa8398 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/synthesis/function.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/synthesis/function.lux @@ -2,15 +2,15 @@ [library [lux "*" [abstract - ["[0]" monad {"+" do}] + ["[0]" monad (.only do)] ["[0]" enum]] [control ["[0]" pipe] ["[0]" maybe ("[1]#[0]" functor)] - ["[0]" exception {"+" exception:}]] + ["[0]" exception (.only exception:)]] [data [text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" functor monoid)]]] [macro @@ -19,16 +19,16 @@ [number ["n" nat]]]]] ["[0]" // "_" - ["[1][0]" loop {"+" Transform}] + ["[1][0]" loop (.only Transform)] ["//[1]" /// "_" - ["[1][0]" analysis {"+" Environment Analysis} + ["[1][0]" analysis (.only Environment Analysis) ["[1]/[0]" complex]] - ["/" synthesis {"+" Path Abstraction Synthesis Operation Phase}] + ["/" synthesis (.only Path Abstraction Synthesis Operation Phase)] [/// - [arity {"+" Arity}] + [arity (.only Arity)] ["[0]" phase ("[1]#[0]" monad)] ["[1][0]" reference - ["[1]/[0]" variable {"+" Register Variable}]]]]]) + ["[1]/[0]" variable (.only Register Variable)]]]]]) (exception: .public (cannot_find_foreign_variable_in_environment [foreign Register environment (Environment Synthesis)]) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/synthesis/loop.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/synthesis/loop.lux index c11213340..0115500cc 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/synthesis/loop.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/synthesis/loop.lux @@ -2,7 +2,7 @@ [library [lux "*" [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["[0]" maybe ("[1]#[0]" monad)]] [data @@ -14,13 +14,13 @@ [number ["n" nat]]]]] [//// - ["[0]" analysis {"+" Environment} + ["[0]" analysis (.only Environment) ["[1]/[0]" complex]] - ["/" synthesis {"+" Path Abstraction Synthesis}] + ["/" synthesis (.only Path Abstraction Synthesis)] [/// - [arity {"+" Arity}] + [arity (.only Arity)] ["[0]" reference - ["[0]" variable {"+" Register Variable}]]]]) + ["[0]" variable (.only Register Variable)]]]]) (type: .public (Transform a) (-> a (Maybe a))) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/phase/synthesis/variable.lux b/stdlib/source/library/lux/tool/compiler/language/lux/phase/synthesis/variable.lux index 366984646..ce8c4bec3 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/phase/synthesis/variable.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/phase/synthesis/variable.lux @@ -2,17 +2,17 @@ [library [lux "*" [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["[0]" maybe ("[1]#[0]" functor)] - ["[0]" try {"+" Try}] - ["[0]" exception {"+" exception:}]] + ["[0]" try (.only Try)] + ["[0]" exception (.only exception:)]] [data ["[0]" product] ["[0]" text ["%" format]] [collection - ["[0]" dictionary {"+" Dictionary}] + ["[0]" dictionary (.only Dictionary)] ["[0]" list ("[1]#[0]" functor mix)] ["[0]" set]]] [macro @@ -23,12 +23,12 @@ [//// ["[0]" analysis ["[1]/[0]" complex]] - ["/" synthesis {"+" Path Synthesis} + ["/" synthesis (.only Path Synthesis) ["[1][0]" access]] [/// - [arity {"+" Arity}] + [arity (.only Arity)] ["[0]" reference - ["[0]" variable {"+" Register Variable}]]]]) + ["[0]" variable (.only Register Variable)]]]]) (def: (prune redundant register) (-> Register Register Register) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/program.lux b/stdlib/source/library/lux/tool/compiler/language/lux/program.lux index f3a2e5d69..ac9155e07 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/program.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/program.lux @@ -2,21 +2,21 @@ [library [lux "*" [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["[0]" maybe] - ["[0]" try {"+" Try}] - ["[0]" exception {"+" exception:}]] + ["[0]" try (.only Try)] + ["[0]" exception (.only exception:)]] [data ["[0]" product] [text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" functor)]]]]] [//// [meta - ["[0]" archive {"+" Archive} - ["[0]" registry {"+" Registry}] + ["[0]" archive (.only Archive) + ["[0]" registry (.only Registry)] ["[0]" unit] [module ["[0]" descriptor]]]]]) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/syntax.lux b/stdlib/source/library/lux/tool/compiler/language/lux/syntax.lux index 93ba961d0..1089264e9 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/syntax.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/syntax.lux @@ -29,18 +29,18 @@ [lux "*" ["@" target] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" maybe] - ["[0]" exception {"+" exception:}] + ["[0]" exception (.only exception:)] [parser - [text {"+" Offset}]]] + [text (.only Offset)]]] [data ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list] - ["[0]" dictionary {"+" Dictionary}]]] + ["[0]" dictionary (.only Dictionary)]]] [macro ["[0]" template]] [meta diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/synthesis.lux b/stdlib/source/library/lux/tool/compiler/language/lux/synthesis.lux index 888ad1793..00cc68f16 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/synthesis.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/synthesis.lux @@ -2,21 +2,21 @@ [library [lux {"-" Scope i64} [abstract - [monad {"+" do}] - [equivalence {"+" Equivalence}] - [hash {"+" Hash}]] + [monad (.only do)] + [equivalence (.only Equivalence)] + [hash (.only Hash)]] [control ["[0]" maybe] - ["[0]" exception {"+" exception:}]] + ["[0]" exception (.only exception:)]] [data ["[0]" sum] ["[0]" product] ["[0]" bit ("[1]#[0]" equivalence)] ["[0]" text ("[1]#[0]" equivalence) - ["%" format {"+" Format format}]] + ["%" format (.only Format format)]] [collection ["[0]" list ("[1]#[0]" functor)] - ["[0]" dictionary {"+" Dictionary}]]] + ["[0]" dictionary (.only Dictionary)]]] [macro ["^" pattern]] [math @@ -26,20 +26,20 @@ ["i" int] ["f" frac]]]]] ["[0]" / "_" - ["[1][0]" simple {"+" Simple}] - ["[1][0]" access {"+" Access} - ["[2][0]" side {"+" Side}] - ["[2][0]" member {"+" Member}]] + ["[1][0]" simple (.only Simple)] + ["[1][0]" access (.only Access) + ["[2][0]" side (.only Side)] + ["[2][0]" member (.only Member)]] [// - ["[0]" analysis {"+" Environment Analysis} - ["[1]/[0]" complex {"+" Complex}]] + ["[0]" analysis (.only Environment Analysis) + ["[1]/[0]" complex (.only Complex)]] [phase - ["[0]" extension {"+" Extension}]] + ["[0]" extension (.only Extension)]] [/// - [arity {"+" Arity}] + [arity (.only Arity)] ["[0]" phase] - ["[0]" reference {"+" Reference} - ["[0]" variable {"+" Register Variable}]]]]]) + ["[0]" reference (.only Reference) + ["[0]" variable (.only Register Variable)]]]]]) (type: .public Resolver (Dictionary Variable Variable)) diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/synthesis/access.lux b/stdlib/source/library/lux/tool/compiler/language/lux/synthesis/access.lux index 236b46980..9426ad094 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/synthesis/access.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/synthesis/access.lux @@ -2,15 +2,15 @@ [library [lux "*" [abstract - [equivalence {"+" Equivalence}] - [hash {"+" Hash}]] + [equivalence (.only Equivalence)] + [hash (.only Hash)]] [data ["[0]" sum] [text - ["%" format {"+" Format}]]]]] + ["%" format (.only Format)]]]]] ["[0]" / "_" - ["[1][0]" side {"+" Side}] - ["[1][0]" member {"+" Member}]]) + ["[1][0]" side (.only Side)] + ["[1][0]" member (.only Member)]]) (type: .public Access (Variant diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/synthesis/access/member.lux b/stdlib/source/library/lux/tool/compiler/language/lux/synthesis/access/member.lux index a01e89668..e795d0467 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/synthesis/access/member.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/synthesis/access/member.lux @@ -2,8 +2,8 @@ [library [lux "*" [abstract - [equivalence {"+" Equivalence}] - [hash {"+" Hash}]] + [equivalence (.only Equivalence)] + [hash (.only Hash)]] [data ["[0]" product] ["[0]" bit] diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/synthesis/access/side.lux b/stdlib/source/library/lux/tool/compiler/language/lux/synthesis/access/side.lux index c0be1fea6..fe3fea477 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/synthesis/access/side.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/synthesis/access/side.lux @@ -2,8 +2,8 @@ [library [lux "*" [abstract - [equivalence {"+" Equivalence}] - [hash {"+" Hash}]] + [equivalence (.only Equivalence)] + [hash (.only Hash)]] [data ["[0]" product] ["[0]" bit] diff --git a/stdlib/source/library/lux/tool/compiler/language/lux/synthesis/simple.lux b/stdlib/source/library/lux/tool/compiler/language/lux/synthesis/simple.lux index 741088fb0..7f2eb7e11 100644 --- a/stdlib/source/library/lux/tool/compiler/language/lux/synthesis/simple.lux +++ b/stdlib/source/library/lux/tool/compiler/language/lux/synthesis/simple.lux @@ -2,8 +2,8 @@ [library [lux "*" [abstract - [equivalence {"+" Equivalence}] - [hash {"+" Hash}]] + [equivalence (.only Equivalence)] + [hash (.only Hash)]] [control ["[0]" pipe]] [data diff --git a/stdlib/source/library/lux/tool/compiler/meta.lux b/stdlib/source/library/lux/tool/compiler/meta.lux index aa506aa08..f98c648a0 100644 --- a/stdlib/source/library/lux/tool/compiler/meta.lux +++ b/stdlib/source/library/lux/tool/compiler/meta.lux @@ -2,7 +2,7 @@ [library [lux "*"]] [// - [version {"+" Version}]]) + [version (.only Version)]]) (def: .public version Version diff --git a/stdlib/source/library/lux/tool/compiler/meta/archive.lux b/stdlib/source/library/lux/tool/compiler/meta/archive.lux index 622a52d82..3df78a712 100644 --- a/stdlib/source/library/lux/tool/compiler/meta/archive.lux +++ b/stdlib/source/library/lux/tool/compiler/meta/archive.lux @@ -2,27 +2,27 @@ [library [lux {"-" Module has} [abstract - ["[0]" equivalence {"+" Equivalence}] - ["[0]" monad {"+" do}]] + ["[0]" equivalence (.only Equivalence)] + ["[0]" monad (.only do)]] [control ["[0]" maybe] - ["[0]" try {"+" Try}] - ["[0]" exception {"+" exception:}] + ["[0]" try (.only Try)] + ["[0]" exception (.only exception:)] ["[0]" function] ["<>" parser - ["<[0]>" binary {"+" Parser}]]] + ["<[0]>" binary (.only Parser)]]] [data - [binary {"+" Binary}] + [binary (.only Binary)] ["[0]" product] ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [format - ["[0]" binary {"+" Writer}]] + ["[0]" binary (.only Writer)]] [collection ["[0]" list ("[1]#[0]" functor mix)] - ["[0]" dictionary {"+" Dictionary}] + ["[0]" dictionary (.only Dictionary)] ["[0]" set] - ["[0]" sequence {"+" Sequence}]]] + ["[0]" sequence (.only Sequence)]]] [math [number ["n" nat ("[1]#[0]" equivalence)]]] @@ -30,14 +30,14 @@ [primitive "*"]]]] [/ ["[0]" artifact] - ["[0]" registry {"+" Registry}] - ["[0]" signature {"+" Signature}] - ["[0]" key {"+" Key}] - ["[0]" module {"+" Module} - ["[0]" descriptor {"+" Descriptor}] - ["[0]" document {"+" Document}]] + ["[0]" registry (.only Registry)] + ["[0]" signature (.only Signature)] + ["[0]" key (.only Key)] + ["[0]" module (.only Module) + ["[0]" descriptor (.only Descriptor)] + ["[0]" document (.only Document)]] [/// - [version {"+" Version}]]]) + [version (.only Version)]]]) (type: .public Output (Sequence [artifact.ID (Maybe Text) Binary])) diff --git a/stdlib/source/library/lux/tool/compiler/meta/archive/artifact.lux b/stdlib/source/library/lux/tool/compiler/meta/archive/artifact.lux index 2aa066db1..cdb9bcf57 100644 --- a/stdlib/source/library/lux/tool/compiler/meta/archive/artifact.lux +++ b/stdlib/source/library/lux/tool/compiler/meta/archive/artifact.lux @@ -2,17 +2,17 @@ [library [lux "*" [abstract - [equivalence {"+" Equivalence}]] + [equivalence (.only Equivalence)]] [data ["[0]" product] ["[0]" bit] [collection - ["[0]" set {"+" Set}]]] + ["[0]" set (.only Set)]]] [math [number ["[0]" nat]]]]] ["[0]" / "_" - ["[1][0]" category {"+" Category}]]) + ["[1][0]" category (.only Category)]]) (type: .public ID Nat) diff --git a/stdlib/source/library/lux/tool/compiler/meta/archive/artifact/category.lux b/stdlib/source/library/lux/tool/compiler/meta/archive/artifact/category.lux index 39bc31a5f..034489e93 100644 --- a/stdlib/source/library/lux/tool/compiler/meta/archive/artifact/category.lux +++ b/stdlib/source/library/lux/tool/compiler/meta/archive/artifact/category.lux @@ -2,7 +2,7 @@ [library [lux {"-" Definition} [abstract - [equivalence {"+" Equivalence}]] + [equivalence (.only Equivalence)]] [control ["[0]" maybe]] [data @@ -14,7 +14,7 @@ [number ["[0]" nat]]]]] [///// - [arity {"+" Arity}]]) + [arity (.only Arity)]]) (type: .public Definition [Text (Maybe [Arity [Nat Nat]])]) diff --git a/stdlib/source/library/lux/tool/compiler/meta/archive/key.lux b/stdlib/source/library/lux/tool/compiler/meta/archive/key.lux index 86d8cfe9e..43f396465 100644 --- a/stdlib/source/library/lux/tool/compiler/meta/archive/key.lux +++ b/stdlib/source/library/lux/tool/compiler/meta/archive/key.lux @@ -4,7 +4,7 @@ [type [primitive "*"]]]] [// - [signature {"+" Signature}]]) + [signature (.only Signature)]]) (primitive: .public (Key k) Signature diff --git a/stdlib/source/library/lux/tool/compiler/meta/archive/module.lux b/stdlib/source/library/lux/tool/compiler/meta/archive/module.lux index 7004302b8..1bea114f6 100644 --- a/stdlib/source/library/lux/tool/compiler/meta/archive/module.lux +++ b/stdlib/source/library/lux/tool/compiler/meta/archive/module.lux @@ -2,8 +2,8 @@ [library [lux {"-" Module}]] [/ - [descriptor {"+" Descriptor}] - [document {"+" Document}]]) + [descriptor (.only Descriptor)] + [document (.only Document)]]) (type: .public ID Nat) diff --git a/stdlib/source/library/lux/tool/compiler/meta/archive/module/descriptor.lux b/stdlib/source/library/lux/tool/compiler/meta/archive/module/descriptor.lux index a03795255..45a4c4bef 100644 --- a/stdlib/source/library/lux/tool/compiler/meta/archive/module/descriptor.lux +++ b/stdlib/source/library/lux/tool/compiler/meta/archive/module/descriptor.lux @@ -2,24 +2,24 @@ [library [lux {"-" Module} [abstract - [equivalence {"+" Equivalence}]] + [equivalence (.only Equivalence)]] [control ["<>" parser - ["<[0]>" binary {"+" Parser}]]] + ["<[0]>" binary (.only Parser)]]] [data ["[0]" product] ["[0]" text] [collection - ["[0]" set {"+" Set}]] + ["[0]" set (.only Set)]] ["[0]" format "_" - ["[1]" binary {"+" Writer}]]] + ["[1]" binary (.only Writer)]]] [macro ["^" pattern]] [math [number ["[0]" nat]]] [world - [file {"+" Path}]]]]) + [file (.only Path)]]]]) (type: .public Module Text) diff --git a/stdlib/source/library/lux/tool/compiler/meta/archive/module/document.lux b/stdlib/source/library/lux/tool/compiler/meta/archive/module/document.lux index 8c1eae9ca..1b4dbe7d4 100644 --- a/stdlib/source/library/lux/tool/compiler/meta/archive/module/document.lux +++ b/stdlib/source/library/lux/tool/compiler/meta/archive/module/document.lux @@ -2,22 +2,22 @@ [library [lux "*" [abstract - [monad {"+" do}]] + [monad (.only do)]] [control - ["[0]" try {"+" Try}] - ["[0]" exception {"+" exception:}] + ["[0]" try (.only Try)] + ["[0]" exception (.only exception:)] ["<>" parser - [binary {"+" Parser}]]] + [binary (.only Parser)]]] [data [collection - ["[0]" dictionary {"+" Dictionary}]] + ["[0]" dictionary (.only Dictionary)]] [format - ["[0]" binary {"+" Writer}]]] - [type {"+" sharing} + ["[0]" binary (.only Writer)]]] + [type (.only sharing) [primitive "*"]]]] [/// - ["[0]" signature {"+" Signature} ("[1]#[0]" equivalence)] - ["[0]" key {"+" Key}]]) + ["[0]" signature (.only Signature) ("[1]#[0]" equivalence)] + ["[0]" key (.only Key)]]) (exception: .public (invalid_signature [expected Signature actual Signature]) diff --git a/stdlib/source/library/lux/tool/compiler/meta/archive/registry.lux b/stdlib/source/library/lux/tool/compiler/meta/archive/registry.lux index 5ebd0f2f3..d331a8022 100644 --- a/stdlib/source/library/lux/tool/compiler/meta/archive/registry.lux +++ b/stdlib/source/library/lux/tool/compiler/meta/archive/registry.lux @@ -2,32 +2,32 @@ [library [lux "*" [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" pipe] ["[0]" maybe ("[1]#[0]" functor)] - ["[0]" exception {"+" exception:}] + ["[0]" exception (.only exception:)] ["<>" parser - ["<[0]>" binary {"+" Parser}]]] + ["<[0]>" binary (.only Parser)]]] [data ["[0]" product] ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection - [set {"+" Set}] + [set (.only Set)] ["[0]" list] - ["[0]" sequence {"+" Sequence} ("[1]#[0]" functor mix)] - ["[0]" dictionary {"+" Dictionary}]] + ["[0]" sequence (.only Sequence) ("[1]#[0]" functor mix)] + ["[0]" dictionary (.only Dictionary)]] [format - ["[0]" binary {"+" Writer}]]] + ["[0]" binary (.only Writer)]]] [macro ["^" pattern]] [type [primitive "*"]]]] ["[0]" // "_" ["[0]" unit] - ["[1]" artifact {"+" Artifact ID} - ["[2][0]" category {"+" Category}]]]) + ["[1]" artifact (.only Artifact ID) + ["[2][0]" category (.only Category)]]]) (primitive: .public Registry (Record diff --git a/stdlib/source/library/lux/tool/compiler/meta/archive/signature.lux b/stdlib/source/library/lux/tool/compiler/meta/archive/signature.lux index a9ade8ed9..4b86838c3 100644 --- a/stdlib/source/library/lux/tool/compiler/meta/archive/signature.lux +++ b/stdlib/source/library/lux/tool/compiler/meta/archive/signature.lux @@ -2,23 +2,23 @@ [library [lux "*" [abstract - [equivalence {"+" Equivalence}]] + [equivalence (.only Equivalence)]] [control ["<>" parser - ["<[0]>" binary {"+" Parser}]]] + ["<[0]>" binary (.only Parser)]]] [data ["[0]" product] ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [format - ["[0]" binary {"+" Writer}]]] + ["[0]" binary (.only Writer)]]] [math [number ["[0]" nat]]] [meta ["[0]" symbol]]]] [//// - ["[0]" version {"+" Version}]]) + ["[0]" version (.only Version)]]) (type: .public Signature (Record diff --git a/stdlib/source/library/lux/tool/compiler/meta/archive/unit.lux b/stdlib/source/library/lux/tool/compiler/meta/archive/unit.lux index 63221895e..3caa41eb9 100644 --- a/stdlib/source/library/lux/tool/compiler/meta/archive/unit.lux +++ b/stdlib/source/library/lux/tool/compiler/meta/archive/unit.lux @@ -2,14 +2,14 @@ [library [lux "*" [abstract - [equivalence {"+" Equivalence}] - [hash {"+" Hash}]] + [equivalence (.only Equivalence)] + [hash (.only Hash)]] [data ["[0]" product] [text ["%" format]] [collection - ["[0]" set {"+" Set}]]] + ["[0]" set (.only Set)]]] [math [number ["[0]" nat]]]]] diff --git a/stdlib/source/library/lux/tool/compiler/meta/cache.lux b/stdlib/source/library/lux/tool/compiler/meta/cache.lux index 72470f228..d3d136fcc 100644 --- a/stdlib/source/library/lux/tool/compiler/meta/cache.lux +++ b/stdlib/source/library/lux/tool/compiler/meta/cache.lux @@ -2,16 +2,16 @@ [library [lux "*" [abstract - [monad {"+" Monad do}]] + [monad (.only Monad do)]] [control - ["[0]" try {"+" Try}]] + ["[0]" try (.only Try)]] [data [text - ["%" format {"+" format}]]] + ["%" format (.only format)]]] [world ["[0]" file]]]] ["[0]" // - ["[0]" context {"+" Context}] + ["[0]" context (.only Context)] [// ["[0]" version]]]) diff --git a/stdlib/source/library/lux/tool/compiler/meta/cache/archive.lux b/stdlib/source/library/lux/tool/compiler/meta/cache/archive.lux index c31f86f25..159c90a8c 100644 --- a/stdlib/source/library/lux/tool/compiler/meta/cache/archive.lux +++ b/stdlib/source/library/lux/tool/compiler/meta/cache/archive.lux @@ -2,7 +2,7 @@ [library [lux "*" [control - [try {"+" Try}]] + [try (.only Try)]] [data [text ["%" format]]] @@ -10,8 +10,8 @@ ["[0]" file]]]] ["[0]" // ["/[1]" // - [context {"+" Context}] - ["[0]" archive {"+" Archive}]]]) + [context (.only Context)] + ["[0]" archive (.only Archive)]]]) (def: .public (descriptor fs context) (All (_ !) (-> (file.System !) Context file.Path)) diff --git a/stdlib/source/library/lux/tool/compiler/meta/cache/artifact.lux b/stdlib/source/library/lux/tool/compiler/meta/cache/artifact.lux index 5917e328b..8d1f1fe8b 100644 --- a/stdlib/source/library/lux/tool/compiler/meta/cache/artifact.lux +++ b/stdlib/source/library/lux/tool/compiler/meta/cache/artifact.lux @@ -1,21 +1,21 @@ (.using [library [lux "*" - [target {"+" Target}] + [target (.only Target)] [control - [try {"+" Try}] + [try (.only Try)] [concurrency - ["[0]" async {"+" Async}]]] + ["[0]" async (.only Async)]]] [data - [binary {"+" Binary}] + [binary (.only Binary)] [text - ["%" format {"+" format}]]] + ["%" format (.only format)]]] [world ["[0]" file]]]] ["[0]" // "_" ["[1][0]" module] [// - ["[0]" context {"+" Context}] + ["[0]" context (.only Context)] [archive ["[0]" module] ["[0]" artifact]]]]) diff --git a/stdlib/source/library/lux/tool/compiler/meta/cache/dependency/artifact.lux b/stdlib/source/library/lux/tool/compiler/meta/cache/dependency/artifact.lux index 78269e9a6..b0908a846 100644 --- a/stdlib/source/library/lux/tool/compiler/meta/cache/dependency/artifact.lux +++ b/stdlib/source/library/lux/tool/compiler/meta/cache/dependency/artifact.lux @@ -3,14 +3,14 @@ [library [lux {"-" all} [abstract - [hash {"+" Hash}] - ["[0]" monad {"+" do}]] + [hash (.only Hash)] + ["[0]" monad (.only do)]] [data ["[0]" product] [collection ["[0]" list ("[1]#[0]" monoid mix monad)] - ["[0]" set {"+" Set}] - ["[0]" dictionary {"+" Dictionary}] + ["[0]" set (.only Set)] + ["[0]" dictionary (.only Dictionary)] ["[0]" sequence]]] [macro ["^" pattern]] @@ -22,17 +22,17 @@ [tool [compiler ["[0]" phase] - ["[0]" reference {"+" Constant}] + ["[0]" reference (.only Constant)] [language [lux - ["[0]" synthesis {"+" Synthesis Path}] - ["[0]" generation {"+" Operation}] + ["[0]" synthesis (.only Synthesis Path)] + ["[0]" generation (.only Operation)] ["[0]" analysis ["[1]/[0]" complex]]]] [meta - ["[0]" archive {"+" Archive} + ["[0]" archive (.only Archive) ["[0]" artifact] - ["[0]" registry {"+" Registry}] + ["[0]" registry (.only Registry)] ["[0]" unit]]]]]]]) (def: (path_references references) diff --git a/stdlib/source/library/lux/tool/compiler/meta/cache/dependency/module.lux b/stdlib/source/library/lux/tool/compiler/meta/cache/dependency/module.lux index 2db68a99d..16dc70b49 100644 --- a/stdlib/source/library/lux/tool/compiler/meta/cache/dependency/module.lux +++ b/stdlib/source/library/lux/tool/compiler/meta/cache/dependency/module.lux @@ -2,26 +2,26 @@ [library [lux "*" [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["[0]" maybe ("[1]#[0]" functor)] - ["[0]" try {"+" Try}] + ["[0]" try (.only Try)] ["[0]" state] [function - ["[0]" memo {"+" Memo}]]] + ["[0]" memo (.only Memo)]]] [data ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" functor mix)] - ["[0]" dictionary {"+" Dictionary}] - ["[0]" set {"+" Set}]]]]] + ["[0]" dictionary (.only Dictionary)] + ["[0]" set (.only Set)]]]]] [//// - ["[0]" archive {"+" Output Archive} - [key {"+" Key}] + ["[0]" archive (.only Output Archive) + [key (.only Key)] ["[0]" module - ["[0]" descriptor {"+" Descriptor}] - ["[0]" document {"+" Document}]]]]) + ["[0]" descriptor (.only Descriptor)] + ["[0]" document (.only Document)]]]]) (type: .public Ancestry (Set descriptor.Module)) diff --git a/stdlib/source/library/lux/tool/compiler/meta/cache/module.lux b/stdlib/source/library/lux/tool/compiler/meta/cache/module.lux index 426a68589..5536850eb 100644 --- a/stdlib/source/library/lux/tool/compiler/meta/cache/module.lux +++ b/stdlib/source/library/lux/tool/compiler/meta/cache/module.lux @@ -3,24 +3,24 @@ [lux "*" ["@" target] [abstract - ["[0]" monad {"+" Monad do}]] + ["[0]" monad (.only Monad do)]] [control ["[0]" pipe] - ["[0]" try {"+" Try}] - ["[0]" exception {"+" exception:}]] + ["[0]" try (.only Try)] + ["[0]" exception (.only exception:)]] [data - [binary {"+" Binary}] + [binary (.only Binary)] ["[0]" product] ["[0]" text ("[1]#[0]" equivalence) - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" functor)] - ["[0]" dictionary {"+" Dictionary}]]] + ["[0]" dictionary (.only Dictionary)]]] [world ["[0]" file]]]] ["[0]" // [// - [context {"+" Context}] + [context (.only Context)] [archive ["[0]" module]]]]) diff --git a/stdlib/source/library/lux/tool/compiler/meta/cache/purge.lux b/stdlib/source/library/lux/tool/compiler/meta/cache/purge.lux index 55701b3f3..cfa21d5e4 100644 --- a/stdlib/source/library/lux/tool/compiler/meta/cache/purge.lux +++ b/stdlib/source/library/lux/tool/compiler/meta/cache/purge.lux @@ -2,17 +2,17 @@ [library [lux "*" [abstract - [predicate {"+" Predicate}] - ["[0]" monad {"+" Monad do}]] + [predicate (.only Predicate)] + ["[0]" monad (.only Monad do)]] [control - ["[0]" try {"+" Try} ("[1]#[0]" functor)] + ["[0]" try (.only Try) ("[1]#[0]" functor)] [concurrency - ["[0]" async {"+" Async}]]] + ["[0]" async (.only Async)]]] [data ["[0]" text ("[1]#[0]" equivalence)] [collection ["[0]" list ("[1]#[0]" mix functor)] - ["[0]" dictionary {"+" Dictionary}] + ["[0]" dictionary (.only Dictionary)] ["[0]" set]]] [math [number @@ -24,12 +24,12 @@ ["[0]" dependency "_" ["[1]" module]] ["/[1]" // "_" - [context {"+" Context}] - ["/[1]" // {"+" Input}] + [context (.only Context)] + ["/[1]" // (.only Input)] ["[0]" archive - [registry {"+" Registry}] + [registry (.only Registry)] ["[0]" module - ["[0]" descriptor {"+" Descriptor}]]]]]) + ["[0]" descriptor (.only Descriptor)]]]]]) (type: .public Cache [Bit descriptor.Module module.ID (module.Module Any) Registry]) diff --git a/stdlib/source/library/lux/tool/compiler/meta/cli.lux b/stdlib/source/library/lux/tool/compiler/meta/cli.lux index 776ed07be..b88f23b0d 100644 --- a/stdlib/source/library/lux/tool/compiler/meta/cli.lux +++ b/stdlib/source/library/lux/tool/compiler/meta/cli.lux @@ -2,12 +2,12 @@ [library [lux {"-" Module Source} [abstract - [monad {"+" do}] - [equivalence {"+" Equivalence}]] + [monad (.only do)] + [equivalence (.only Equivalence)]] [control ["[0]" pipe] ["<>" parser - ["<[0]>" cli {"+" Parser}] + ["<[0]>" cli (.only Parser)] ["<[0]>" text]]] [data ["[0]" product] @@ -18,10 +18,10 @@ [macro ["^" pattern]] [math - [number {"+" hex}]] + [number (.only hex)]] [meta ["[0]" symbol] - ["[0]" configuration {"+" Configuration}]] + ["[0]" configuration (.only Configuration)]] [tool [compiler [meta @@ -29,9 +29,9 @@ [module ["[0]" descriptor]]]]]] [world - [file {"+" Path}]]]] + [file (.only Path)]]]] ["[0]" / "_" - ["[1][0]" compiler {"+" Compiler}]]) + ["[1][0]" compiler (.only Compiler)]]) (type: .public Host_Dependency Path) diff --git a/stdlib/source/library/lux/tool/compiler/meta/cli/compiler.lux b/stdlib/source/library/lux/tool/compiler/meta/cli/compiler.lux index ad3d3f124..886249921 100644 --- a/stdlib/source/library/lux/tool/compiler/meta/cli/compiler.lux +++ b/stdlib/source/library/lux/tool/compiler/meta/cli/compiler.lux @@ -2,11 +2,11 @@ [library [lux {"-" parameter} [abstract - [monad {"+" do}] - [equivalence {"+" Equivalence}]] + [monad (.only do)] + [equivalence (.only Equivalence)]] [control ["<>" parser - ["<[0]>" text {"+" Parser}]]] + ["<[0]>" text (.only Parser)]]] [data ["[0]" product] ["[0]" text @@ -14,7 +14,7 @@ [collection ["[0]" list ("[1]#[0]" functor)]]] [math - [number {"+" hex}]] + [number (.only hex)]] [meta ["[0]" symbol]]]]) diff --git a/stdlib/source/library/lux/tool/compiler/meta/context.lux b/stdlib/source/library/lux/tool/compiler/meta/context.lux index 8ee5e28a0..b22eebd1d 100644 --- a/stdlib/source/library/lux/tool/compiler/meta/context.lux +++ b/stdlib/source/library/lux/tool/compiler/meta/context.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["@" target {"+" Target}] + ["@" target (.only Target)] [world - [file {"+" Path}]]]]) + [file (.only Path)]]]]) (type: .public Extension Text) diff --git a/stdlib/source/library/lux/tool/compiler/meta/export.lux b/stdlib/source/library/lux/tool/compiler/meta/export.lux index 3d1361d10..3af593556 100644 --- a/stdlib/source/library/lux/tool/compiler/meta/export.lux +++ b/stdlib/source/library/lux/tool/compiler/meta/export.lux @@ -2,14 +2,14 @@ [library [lux {"-" Source} [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control - ["[0]" try {"+" Try} ("[1]#[0]" monad)] + ["[0]" try (.only Try) ("[1]#[0]" monad)] [concurrency - ["[0]" async {"+" Async} ("[1]#[0]" functor)]]] + ["[0]" async (.only Async) ("[1]#[0]" functor)]]] [data ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" dictionary] ["[0]" sequence]] @@ -21,7 +21,7 @@ [tool [compiler [meta - [cli {"+" Source Export}] + [cli (.only Source Export)] ["[0]" io "_" ["[1]" context]]]]] [world diff --git a/stdlib/source/library/lux/tool/compiler/meta/import.lux b/stdlib/source/library/lux/tool/compiler/meta/import.lux index f0c390e3a..d1ce94369 100644 --- a/stdlib/source/library/lux/tool/compiler/meta/import.lux +++ b/stdlib/source/library/lux/tool/compiler/meta/import.lux @@ -2,27 +2,27 @@ [library [lux {"-" Module} [abstract - ["[0]" monad {"+" Monad do}]] + ["[0]" monad (.only Monad do)]] [control - ["[0]" try {"+" Try}] - ["[0]" exception {"+" exception:}] + ["[0]" try (.only Try)] + ["[0]" exception (.only exception:)] [concurrency - ["[0]" async {"+" Async}]] + ["[0]" async (.only Async)]] ["<>" parser ["<[0]>" binary]]] [data - [binary {"+" Binary}] + [binary (.only Binary)] ["[0]" text ["%" format]] [collection - ["[0]" dictionary {"+" Dictionary}] + ["[0]" dictionary (.only Dictionary)] ["[0]" sequence]] [format ["[0]" tar]]] [tool [compiler [meta - [cli {"+" Library Module}]]]] + [cli (.only Library Module)]]]] [world ["[0]" file]]]]) diff --git a/stdlib/source/library/lux/tool/compiler/meta/io.lux b/stdlib/source/library/lux/tool/compiler/meta/io.lux index e0262eba8..f2208d52f 100644 --- a/stdlib/source/library/lux/tool/compiler/meta/io.lux +++ b/stdlib/source/library/lux/tool/compiler/meta/io.lux @@ -1,10 +1,10 @@ (.using - [library - [lux {"-" Code} - [data - ["[0]" text]] - [world - [file {"+" Path System}]]]]) + [library + [lux {"-" Code} + [data + ["[0]" text]] + [world + [file (.only Path System)]]]]) (type: .public Context Path) diff --git a/stdlib/source/library/lux/tool/compiler/meta/io/archive.lux b/stdlib/source/library/lux/tool/compiler/meta/io/archive.lux index 37f464b01..22424beb5 100644 --- a/stdlib/source/library/lux/tool/compiler/meta/io/archive.lux +++ b/stdlib/source/library/lux/tool/compiler/meta/io/archive.lux @@ -1,53 +1,53 @@ (.using [library [lux "*" - ["@" target {"+" Target}] + ["@" target (.only Target)] [abstract - ["[0]" monad {"+" Monad do}]] + ["[0]" monad (.only Monad do)]] [control - ["[0]" try {"+" Try}] + ["[0]" try (.only Try)] [concurrency - ["[0]" async {"+" Async} ("[1]#[0]" monad)]] + ["[0]" async (.only Async) ("[1]#[0]" monad)]] ["<>" parser - ["<[0]>" binary {"+" Parser}]]] + ["<[0]>" binary (.only Parser)]]] [data - [binary {"+" Binary}] + [binary (.only Binary)] ["[0]" product] ["[0]" text ("[1]#[0]" equivalence) - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection - [set {"+" Set}] + [set (.only Set)] ["[0]" list ("[1]#[0]" mix)] - ["[0]" dictionary {"+" Dictionary}] - ["[0]" sequence {"+" Sequence}]]] + ["[0]" dictionary (.only Dictionary)] + ["[0]" sequence (.only Sequence)]]] [macro ["^" pattern]] [meta - ["[0]" configuration {"+" Configuration}] + ["[0]" configuration (.only Configuration)] ["[0]" version]] [world ["[0]" file]]]] ["[0]" // ["[1][0]" context] ["/[1]" // - [import {"+" Import}] - ["[0]" context {"+" Context}] - ["[0]" archive {"+" Output Archive} - [key {"+" Key}] - ["[0]" registry {"+" Registry}] + [import (.only Import)] + ["[0]" context (.only Context)] + ["[0]" archive (.only Output Archive) + [key (.only Key)] + ["[0]" registry (.only Registry)] ["[0]" unit] - ["[0]" artifact {"+" Artifact} - ["[0]" category {"+" Category}]] + ["[0]" artifact (.only Artifact) + ["[0]" category (.only Category)]] ["[0]" module - ["[0]" descriptor {"+" Descriptor}] - ["[0]" document {"+" Document}]]] + ["[0]" descriptor (.only Descriptor)] + ["[0]" document (.only Document)]]] ["[0]" cache ["[1]/[0]" archive] ["[1]/[0]" module] - ["[1]/[0]" purge {"+" Cache Purge}] + ["[1]/[0]" purge (.only Cache Purge)] ["[0]" dependency "_" ["[1]" module]]] - [// {"+" Custom} + [// (.only Custom) [language ["$" lux ["[0]" analysis] diff --git a/stdlib/source/library/lux/tool/compiler/meta/io/context.lux b/stdlib/source/library/lux/tool/compiler/meta/io/context.lux index 548a89b36..a5eec2a2a 100644 --- a/stdlib/source/library/lux/tool/compiler/meta/io/context.lux +++ b/stdlib/source/library/lux/tool/compiler/meta/io/context.lux @@ -3,32 +3,32 @@ [lux {"-" Module Code} ["@" target] [abstract - [predicate {"+" Predicate}] - ["[0]" monad {"+" Monad do}]] + [predicate (.only Predicate)] + ["[0]" monad (.only Monad do)]] [control ["[0]" maybe] - ["[0]" try {"+" Try}] - ["[0]" exception {"+" exception:}] + ["[0]" try (.only Try)] + ["[0]" exception (.only exception:)] [concurrency - ["[0]" async {"+" Async} ("[1]#[0]" monad)]]] + ["[0]" async (.only Async) ("[1]#[0]" monad)]]] [data - [binary {"+" Binary}] + [binary (.only Binary)] ["[0]" text ("[1]#[0]" hash) - ["%" format {"+" format}] + ["%" format (.only format)] [encoding ["[0]" utf8]]] [collection - ["[0]" dictionary {"+" Dictionary}] + ["[0]" dictionary (.only Dictionary)] ["[0]" list]]] [world ["[0]" file]]]] - ["[0]" // {"+" Context Code} + ["[0]" // (.only Context Code) ["/[1]" // "_" - [import {"+" Import}] - ["/[1]" // {"+" Input}] + [import (.only Import)] + ["/[1]" // (.only Input)] [archive [module - [descriptor {"+" Module}]]]]]) + [descriptor (.only Module)]]]]]) (exception: .public (cannot_find_module [importer Module module Module]) diff --git a/stdlib/source/library/lux/tool/compiler/meta/packager.lux b/stdlib/source/library/lux/tool/compiler/meta/packager.lux index a92bdbbe1..50edd78a3 100644 --- a/stdlib/source/library/lux/tool/compiler/meta/packager.lux +++ b/stdlib/source/library/lux/tool/compiler/meta/packager.lux @@ -2,12 +2,12 @@ [library [lux "*" [control - [try {"+" Try}]] + [try (.only Try)]] [data - [binary {"+" Binary}] + [binary (.only Binary)] ["[0]" product] [collection - [dictionary {"+" Dictionary}] + [dictionary (.only Dictionary)] ["[0]" sequence] ["[0]" list ("[1]#[0]" functor)]]] [world @@ -16,7 +16,7 @@ ["[0]" cache "_" [dependency ["[1]/[0]" module]]] - ["[0]" archive {"+" Archive} + ["[0]" archive (.only Archive) ["[0]" artifact] ["[0]" registry] ["[0]" unit] diff --git a/stdlib/source/library/lux/tool/compiler/meta/packager/jvm.lux b/stdlib/source/library/lux/tool/compiler/meta/packager/jvm.lux index ac4987646..292586658 100644 --- a/stdlib/source/library/lux/tool/compiler/meta/packager/jvm.lux +++ b/stdlib/source/library/lux/tool/compiler/meta/packager/jvm.lux @@ -1,21 +1,21 @@ (.using [library [lux {"-" Module Definition} - ["[0]" ffi {"+" import: do_to}] + ["[0]" ffi (.only import: do_to)] [abstract - ["[0]" monad {"+" Monad do}]] + ["[0]" monad (.only Monad do)]] [control ["[0]" maybe ("[1]#[0]" functor)] - ["[0]" try {"+" Try}]] + ["[0]" try (.only Try)]] [data - ["[0]" binary {"+" Binary}] + ["[0]" binary (.only Binary)] ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" sequence] ["[0]" list ("[1]#[0]" functor)] ["[0]" dictionary] - ["[0]" set {"+" Set}]]] + ["[0]" set (.only Set)]]] [math [number ["n" nat] @@ -26,14 +26,14 @@ ["[0]" name]]]] [world ["[0]" file]]]] - ["[0]" // {"+" Packager} + ["[0]" // (.only Packager) [// - ["[0]" context {"+" Context}] - ["[0]" archive {"+" Output} + ["[0]" context (.only Context)] + ["[0]" archive (.only Output) ["[0]" artifact] ["[0]" unit] ["[0]" module - ["[0]" descriptor {"+" Module}]]] + ["[0]" descriptor (.only Module)]]] ["[0]" cache "_" [dependency ["[1]/[0]" module] @@ -46,7 +46,7 @@ [phase [generation [jvm - ["[0]" runtime {"+" Definition}]]]]]]]]]) + ["[0]" runtime (.only Definition)]]]]]]]]]) (import: java/lang/Object "[1]::[0]") diff --git a/stdlib/source/library/lux/tool/compiler/meta/packager/ruby.lux b/stdlib/source/library/lux/tool/compiler/meta/packager/ruby.lux index 1f0506a00..f2e9a3bfd 100644 --- a/stdlib/source/library/lux/tool/compiler/meta/packager/ruby.lux +++ b/stdlib/source/library/lux/tool/compiler/meta/packager/ruby.lux @@ -1,23 +1,23 @@ (.using [library [lux "*" - [type {"+" sharing}] + [type (.only sharing)] [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control - ["[0]" try {"+" Try}]] + ["[0]" try (.only Try)]] [data - [binary {"+" Binary}] + [binary (.only Binary)] ["[0]" product] ["[0]" text - ["%" format {"+" format}] + ["%" format (.only format)] [encoding ["[0]" utf8]]] [collection ["[0]" sequence] ["[0]" list ("[1]#[0]" functor mix)] - ["[0]" dictionary {"+" Dictionary}] - ["[0]" set {"+" Set}]]] + ["[0]" dictionary (.only Dictionary)] + ["[0]" set (.only Set)]]] [math [number ["[0]" nat]]] @@ -25,18 +25,18 @@ ["_" ruby]] [world ["[0]" file]]]] - ["[0]" // {"+" Packager} + ["[0]" // (.only Packager) [// - ["[0]" archive {"+" Output} - [registry {"+" Registry}] + ["[0]" archive (.only Output) + [registry (.only Registry)] ["[0]" artifact] ["[0]" unit] ["[0]" module ["[0]" descriptor] - ["[0]" document {"+" Document}]]] + ["[0]" document (.only Document)]]] ["[0]" cache "_" [dependency - ["[1]/[0]" module {"+" Order}] + ["[1]/[0]" module (.only Order)] ["[1]/[0]" artifact]]] ["[0]" io "_" ["[1]" archive]] diff --git a/stdlib/source/library/lux/tool/compiler/meta/packager/scheme.lux b/stdlib/source/library/lux/tool/compiler/meta/packager/scheme.lux index 5c6b6176b..f1b740052 100644 --- a/stdlib/source/library/lux/tool/compiler/meta/packager/scheme.lux +++ b/stdlib/source/library/lux/tool/compiler/meta/packager/scheme.lux @@ -1,21 +1,21 @@ (.using [library [lux {"-" Module} - [type {"+" sharing}] + [type (.only sharing)] [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control - ["[0]" try {"+" Try}]] + ["[0]" try (.only Try)]] [data - [binary {"+" Binary}] + [binary (.only Binary)] ["[0]" product] ["[0]" text - ["%" format {"+" format}] + ["%" format (.only format)] ["[0]" encoding]] [collection ["[0]" sequence] ["[0]" list ("[1]#[0]" functor mix)] - ["[0]" dictionary {"+" Dictionary}] + ["[0]" dictionary (.only Dictionary)] ["[0]" set]] [format ["[0]" tar] @@ -23,18 +23,18 @@ [target ["_" scheme]] [time - ["[0]" instant {"+" Instant}]] + ["[0]" instant (.only Instant)]] [world ["[0]" file]]]] [program [compositor - ["[0]" static {"+" Static}]]] - ["[0]" // {"+" Packager} + ["[0]" static (.only Static)]]] + ["[0]" // (.only Packager) [// - ["[0]" archive {"+" Output} - ["[0]" descriptor {"+" Module Descriptor}] + ["[0]" archive (.only Output) + ["[0]" descriptor (.only Module Descriptor)] ["[0]" artifact] - ["[0]" document {"+" Document}]] + ["[0]" document (.only Document)]] [cache ["[0]" dependency]] ["[0]" io "_" @@ -42,7 +42,7 @@ [// [language ["$" lux - [generation {"+" Context}]]]]]]) + [generation (.only Context)]]]]]]) ... TODO: Delete ASAP (type: (Action ! a) diff --git a/stdlib/source/library/lux/tool/compiler/meta/packager/script.lux b/stdlib/source/library/lux/tool/compiler/meta/packager/script.lux index 37db58b89..34eb0b4ef 100644 --- a/stdlib/source/library/lux/tool/compiler/meta/packager/script.lux +++ b/stdlib/source/library/lux/tool/compiler/meta/packager/script.lux @@ -1,25 +1,25 @@ (.using [library [lux "*" - [type {"+" sharing}] + [type (.only sharing)] [abstract - ["[0]" monad {"+" Monad do}]] + ["[0]" monad (.only Monad do)]] [control - ["[0]" try {"+" Try}]] + ["[0]" try (.only Try)]] [data - [binary {"+" Binary}] + [binary (.only Binary)] ["[0]" product] [text - ["%" format {"+" format}] + ["%" format (.only format)] [encoding ["[0]" utf8]]] [collection ["[0]" sequence] - ["[0]" set {"+" Set}] + ["[0]" set (.only Set)] ["[0]" list ("[1]#[0]" functor)]]]]] - ["[0]" // {"+" Packager} + ["[0]" // (.only Packager) [// - ["[0]" archive {"+" Output} + ["[0]" archive (.only Output) ["[0]" artifact] ["[0]" unit] ["[0]" module diff --git a/stdlib/source/library/lux/tool/compiler/phase.lux b/stdlib/source/library/lux/tool/compiler/phase.lux index ff07d7226..a38199dda 100644 --- a/stdlib/source/library/lux/tool/compiler/phase.lux +++ b/stdlib/source/library/lux/tool/compiler/phase.lux @@ -2,23 +2,23 @@ [library [lux "*" [abstract - [functor {"+" Functor}] - [monad {"+" Monad do}]] + [functor (.only Functor)] + [monad (.only Monad do)]] [control ["[0]" state] - ["[0]" try {"+" Try} ("[1]#[0]" functor)] - ["[0]" exception {"+" Exception}] + ["[0]" try (.only Try) ("[1]#[0]" functor)] + ["[0]" exception (.only Exception)] ["[0]" io]] [data ["[0]" product] [text - ["%" format {"+" format}]]] + ["%" format (.only format)]]] [time ["[0]" instant] ["[0]" duration]]]] [// [meta - [archive {"+" Archive}]]]) + [archive (.only Archive)]]]) (type: .public (Operation s o) (state.+State Try s o)) diff --git a/stdlib/source/library/lux/tool/compiler/reference.lux b/stdlib/source/library/lux/tool/compiler/reference.lux index 083f7e568..696fe9ff9 100644 --- a/stdlib/source/library/lux/tool/compiler/reference.lux +++ b/stdlib/source/library/lux/tool/compiler/reference.lux @@ -2,13 +2,13 @@ [library [lux {"-" local} [abstract - [equivalence {"+" Equivalence}] - [hash {"+" Hash}]] + [equivalence (.only Equivalence)] + [hash (.only Hash)]] [control ["[0]" pipe]] [data [text - ["%" format {"+" Format}]]] + ["%" format (.only Format)]]] [macro ["^" pattern]] [math @@ -17,7 +17,7 @@ [meta ["[0]" symbol]]]] ["[0]" / "_" - ["[1][0]" variable {"+" Variable}]]) + ["[1][0]" variable (.only Variable)]]) (type: .public Constant Symbol) diff --git a/stdlib/source/library/lux/tool/compiler/reference/variable.lux b/stdlib/source/library/lux/tool/compiler/reference/variable.lux index 248398d35..77b13e7de 100644 --- a/stdlib/source/library/lux/tool/compiler/reference/variable.lux +++ b/stdlib/source/library/lux/tool/compiler/reference/variable.lux @@ -2,13 +2,13 @@ [library [lux "*" [abstract - [equivalence {"+" Equivalence}] - [hash {"+" Hash}]] + [equivalence (.only Equivalence)] + [hash (.only Hash)]] [control ["[0]" pipe]] [data [text - ["%" format {"+" Format}]]] + ["%" format (.only Format)]]] [macro ["^" pattern]] [math diff --git a/stdlib/source/library/lux/tool/interpreter.lux b/stdlib/source/library/lux/tool/interpreter.lux index 60f200d18..1870684a7 100644 --- a/stdlib/source/library/lux/tool/interpreter.lux +++ b/stdlib/source/library/lux/tool/interpreter.lux @@ -2,13 +2,13 @@ [library [lux "*" [control - [monad {"+" Monad do}] - ["[0]" try {"+" Try}] - ["ex" exception {"+" exception:}]] + [monad (.only Monad do)] + ["[0]" try (.only Try)] + ["ex" exception (.only exception:)]] [data ["[0]" text ("[1]#[0]" equivalence) - ["%" format {"+" format}]]] - [type {"+" sharing} + ["%" format (.only format)]]] + [type (.only sharing) ["[0]" check]] [compiler ["[0]" phase @@ -16,17 +16,17 @@ ["[0]" module] ["[0]" type]] ["[0]" generation] - ["[0]" directive {"+" State+ Operation} + ["[0]" directive (.only State+ Operation) ["[0]" total]] ["[0]" extension]] ["[0]" default ["[0]" syntax] - ["[0]" platform {"+" Platform}] + ["[0]" platform (.only Platform)] ["[0]" init]] - ["[0]" cli {"+" Configuration}]] + ["[0]" cli (.only Configuration)]] [world - ["[0]" file {"+" File}] - ["[0]" console {"+" Console}]]]] + ["[0]" file (.only File)] + ["[0]" console (.only Console)]]]] ["[0]" /type]) (exception: .public (error [message Text]) diff --git a/stdlib/source/library/lux/tool/mediator.lux b/stdlib/source/library/lux/tool/mediator.lux index 3faf64f95..dda3701f9 100644 --- a/stdlib/source/library/lux/tool/mediator.lux +++ b/stdlib/source/library/lux/tool/mediator.lux @@ -1,14 +1,14 @@ (.using - [library - [lux {"-" Source Module} - [world - ["[0]" binary {"+" Binary}] - ["[0]" file {"+" Path}]]]] - [// - [compiler {"+" Compiler} - [meta - ["[0]" archive {"+" Archive} - [descriptor {"+" Module}]]]]]) + [library + [lux {"-" Source Module} + [world + ["[0]" binary (.only Binary)] + ["[0]" file (.only Path)]]]] + [// + [compiler (.only Compiler) + [meta + ["[0]" archive (.only Archive) + [descriptor (.only Module)]]]]]) (type: .public Source Path) diff --git a/stdlib/source/library/lux/type.lux b/stdlib/source/library/lux/type.lux index 7d3edd65f..d9b6b2867 100644 --- a/stdlib/source/library/lux/type.lux +++ b/stdlib/source/library/lux/type.lux @@ -3,14 +3,14 @@ [lux {"-" function as let} ["@" target] [abstract - [equivalence {"+" Equivalence}] - [monad {"+" Monad do}]] + [equivalence (.only Equivalence)] + [monad (.only Monad do)]] [control ["[0]" function] ["[0]" maybe] - ["[0]" exception {"+" exception:}] + ["[0]" exception (.only exception:)] ["<>" parser - ["<[0]>" code {"+" Parser}]]] + ["<[0]>" code (.only Parser)]]] [data ["[0]" product] ["[0]" text ("[1]#[0]" monoid equivalence)] @@ -18,7 +18,7 @@ ["[0]" array] ["[0]" list ("[1]#[0]" monad monoid mix)]]] ["[0]" macro - [syntax {"+" syntax:}] + [syntax (.only syntax:)] ["^" pattern] ["[0]" code]] [math diff --git a/stdlib/source/library/lux/type/check.lux b/stdlib/source/library/lux/type/check.lux index 9cd171aaf..b38763b02 100644 --- a/stdlib/source/library/lux/type/check.lux +++ b/stdlib/source/library/lux/type/check.lux @@ -3,19 +3,19 @@ [lux {"-" try} ["@" target] [abstract - [functor {"+" Functor}] - [apply {"+" Apply}] - ["[0]" monad {"+" Monad do}]] + [functor (.only Functor)] + [apply (.only Apply)] + ["[0]" monad (.only Monad do)]] [control ["[0]" maybe] - ["[0]" try {"+" Try}] - ["[0]" exception {"+" Exception exception:}]] + ["[0]" try (.only Try)] + ["[0]" exception (.only Exception exception:)]] [data ["[0]" product] ["[0]" text ("[1]#[0]" monoid equivalence)] [collection ["[0]" list ("[1]#[0]" mix)] - ["[0]" set {"+" Set}]]] + ["[0]" set (.only Set)]]] [macro ["^" pattern]] [math diff --git a/stdlib/source/library/lux/type/dynamic.lux b/stdlib/source/library/lux/type/dynamic.lux index d24b16dd4..8f380473f 100644 --- a/stdlib/source/library/lux/type/dynamic.lux +++ b/stdlib/source/library/lux/type/dynamic.lux @@ -3,17 +3,17 @@ [lux {"-" static} ["[0]" debug] [control - ["[0]" try {"+" Try}] - ["[0]" exception {"+" exception:}] + ["[0]" try (.only Try)] + ["[0]" exception (.only exception:)] [parser ["<[0]>" code]]] [data [text ["%" format]]] - [macro {"+" with_symbols} - ["[0]" syntax {"+" syntax:}]] + [macro (.only with_symbols) + ["[0]" syntax (.only syntax:)]] ["[0]" type - ["[0]" primitive {"+" primitive:}]]]]) + ["[0]" primitive (.only primitive:)]]]]) (exception: .public (wrong_type [expected Type actual Type]) diff --git a/stdlib/source/library/lux/type/implicit.lux b/stdlib/source/library/lux/type/implicit.lux index 26cc9cdb3..a0b858a4f 100644 --- a/stdlib/source/library/lux/type/implicit.lux +++ b/stdlib/source/library/lux/type/implicit.lux @@ -2,29 +2,29 @@ [library [lux "*" [abstract - ["[0]" monad {"+" do}] + ["[0]" monad (.only do)] ["[0]" equivalence]] [control ["[0]" maybe] ["[0]" try] ["<>" parser - ["<[0]>" code {"+" Parser}]]] + ["<[0]>" code (.only Parser)]]] [data ["[0]" product] ["[0]" text ("[1]#[0]" equivalence) - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" monad mix)] - ["[0]" dictionary {"+" Dictionary}]]] + ["[0]" dictionary (.only Dictionary)]]] ["[0]" macro ["[0]" code] - [syntax {"+" syntax:}]] + [syntax (.only syntax:)]] [math ["[0]" number ["n" nat]]] ["[0]" meta] ["[0]" type ("[1]#[0]" equivalence) - ["[0]" check {"+" Check}]]]]) + ["[0]" check (.only Check)]]]]) (def: (type_var id env) (-> Nat Type_Context (Meta Type)) diff --git a/stdlib/source/library/lux/type/poly.lux b/stdlib/source/library/lux/type/poly.lux index 53145e4e6..38ff41b36 100644 --- a/stdlib/source/library/lux/type/poly.lux +++ b/stdlib/source/library/lux/type/poly.lux @@ -4,20 +4,20 @@ ["[0]" meta] ["[0]" type] [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["[0]" maybe] ["<>" parser ("[1]#[0]" monad) - ["<[0]>" type {"+" Env}] - ["<[0]>" code {"+" Parser}]]] + ["<[0]>" type (.only Env)] + ["<[0]>" code (.only Parser)]]] [data ["[0]" product] ["[0]" text] [collection ["[0]" list ("[1]#[0]" functor)] ["[0]" dictionary]]] - [macro {"+" with_symbols} - [syntax {"+" syntax:}] + [macro (.only with_symbols) + [syntax (.only syntax:)] ["^" pattern] ["[0]" code]] [math diff --git a/stdlib/source/library/lux/type/primitive.lux b/stdlib/source/library/lux/type/primitive.lux index 28dd48137..870d4c9db 100644 --- a/stdlib/source/library/lux/type/primitive.lux +++ b/stdlib/source/library/lux/type/primitive.lux @@ -3,11 +3,11 @@ [lux "*" ["[0]" meta] [abstract - [monad {"+" Monad do}]] + [monad (.only Monad do)]] [control - ["[0]" exception {"+" exception:}] + ["[0]" exception (.only exception:)] ["<>" parser ("[1]#[0]" monad) - ["<[0]>" code {"+" Parser}]]] + ["<[0]>" code (.only Parser)]]] [data ["[0]" text ("[1]#[0]" equivalence monoid)] [collection @@ -15,7 +15,7 @@ [macro ["^" pattern] ["[0]" code] - [syntax {"+" syntax:} + [syntax (.only syntax:) ["|[0]|" export]]] [meta ["[0]" symbol ("[1]#[0]" codec)]]]] diff --git a/stdlib/source/library/lux/type/quotient.lux b/stdlib/source/library/lux/type/quotient.lux index 3eb7cb6f3..7ffa81b12 100644 --- a/stdlib/source/library/lux/type/quotient.lux +++ b/stdlib/source/library/lux/type/quotient.lux @@ -2,12 +2,12 @@ [library [lux {"-" type} [abstract - [equivalence {"+" Equivalence}]] + [equivalence (.only Equivalence)]] [control [parser ["<[0]>" code]]] - [macro {"+" with_symbols} - [syntax {"+" syntax:}]] + [macro (.only with_symbols) + [syntax (.only syntax:)]] ["[0]" type [primitive "*"]]]]) diff --git a/stdlib/source/library/lux/type/refinement.lux b/stdlib/source/library/lux/type/refinement.lux index 1ae7e761e..f7ea0d542 100644 --- a/stdlib/source/library/lux/type/refinement.lux +++ b/stdlib/source/library/lux/type/refinement.lux @@ -1,13 +1,13 @@ (.using [library - [lux {"-" type} + [lux {"-" type only} [abstract - [predicate {"+" Predicate}]] + [predicate (.only Predicate)]] [control [parser ["<[0]>" code]]] ["[0]" macro - [syntax {"+" syntax:}]] + [syntax (.only syntax:)]] ["[0]" type [primitive "*"]]]]) diff --git a/stdlib/source/library/lux/type/resource.lux b/stdlib/source/library/lux/type/resource.lux index f198e3619..bb2352a86 100644 --- a/stdlib/source/library/lux/type/resource.lux +++ b/stdlib/source/library/lux/type/resource.lux @@ -3,22 +3,22 @@ [lux "*" ["[0]" meta] [abstract - ["[0]" monad {"+" Monad do} - [indexed {"+" IxMonad}]]] + ["[0]" monad (.only Monad do) + [indexed (.only IxMonad)]]] [control ["[0]" maybe] - ["[0]" exception {"+" exception:}] + ["[0]" exception (.only exception:)] ["<>" parser - ["<[0]>" code {"+" Parser}]]] + ["<[0]>" code (.only Parser)]]] [data [text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" set] - ["[0]" sequence {"+" Sequence}] + ["[0]" sequence (.only Sequence)] ["[0]" list ("[1]#[0]" functor mix)]]] ["[0]" macro - [syntax {"+" syntax:}]] + [syntax (.only syntax:)]] [math [number ["n" nat]]] diff --git a/stdlib/source/library/lux/type/unit.lux b/stdlib/source/library/lux/type/unit.lux index e822dcded..50682cdd8 100644 --- a/stdlib/source/library/lux/type/unit.lux +++ b/stdlib/source/library/lux/type/unit.lux @@ -3,26 +3,26 @@ [lux "*" ["[0]" meta] [abstract - [monad {"+" Monad do}] - [equivalence {"+" Equivalence}] - [order {"+" Order}] - [enum {"+" Enum}]] + [monad (.only Monad do)] + [equivalence (.only Equivalence)] + [order (.only Order)] + [enum (.only Enum)]] [control ["<>" parser ("[1]#[0]" monad) - ["<[0]>" code {"+" Parser}]]] + ["<[0]>" code (.only Parser)]]] [data ["[0]" text - ["%" format {"+" format}]]] + ["%" format (.only format)]]] [macro ["[0]" code] ["[0]" template] - [syntax {"+" syntax:} + [syntax (.only syntax:) ["|[0]|" export]]] [math [number ["n" nat] ["i" int] - ["[0]" ratio {"+" Ratio}]]] + ["[0]" ratio (.only Ratio)]]] [type [primitive "*"]]]]) diff --git a/stdlib/source/library/lux/world/console.lux b/stdlib/source/library/lux/world/console.lux index 00346ef03..75d963612 100644 --- a/stdlib/source/library/lux/world/console.lux +++ b/stdlib/source/library/lux/world/console.lux @@ -2,20 +2,20 @@ [library [lux "*" ["@" target] - ["[0]" ffi {"+" import:}] + ["[0]" ffi (.only import:)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" maybe] - ["[0]" try {"+" Try} ("[1]#[0]" functor)] - ["[0]" exception {"+" exception:}] - ["[0]" io {"+" IO io} ("[1]#[0]" functor)] + ["[0]" try (.only Try) ("[1]#[0]" functor)] + ["[0]" exception (.only exception:)] + ["[0]" io (.only IO io) ("[1]#[0]" functor)] [concurrency - ["[0]" async {"+" Async} ("[1]#[0]" monad)] + ["[0]" async (.only Async) ("[1]#[0]" monad)] ["[0]" atom]]] [data - ["[0]" text {"+" Char} - ["%" format {"+" format}]]]]]) + ["[0]" text (.only Char) + ["%" format (.only format)]]]]]) (type: .public (Console !) (Interface diff --git a/stdlib/source/library/lux/world/db/jdbc.lux b/stdlib/source/library/lux/world/db/jdbc.lux index 748f2955d..ad9944425 100644 --- a/stdlib/source/library/lux/world/db/jdbc.lux +++ b/stdlib/source/library/lux/world/db/jdbc.lux @@ -2,28 +2,28 @@ [library [lux {"-" and int} [control - [functor {"+" Functor}] - [apply {"+" Apply}] - [monad {"+" Monad do}] - ["[0]" try {"+" Try}] + [functor (.only Functor)] + [apply (.only Apply)] + [monad (.only Monad do)] + ["[0]" try (.only Try)] ["ex" exception] [concurrency - ["[0]" async {"+" Async} ("[1]#[0]" monad)]] + ["[0]" async (.only Async) ("[1]#[0]" monad)]] [security - ["!" capability {"+" capability:}]]] + ["!" capability (.only capability:)]]] [data ["[0]" product] [text - ["%" format {"+" format}]]] - ["[0]" io {"+" IO}] + ["%" format (.only format)]]] + ["[0]" io (.only IO)] [world - [net {"+" URL}]] - [host {"+" import:}]]] + [net (.only URL)]] + [host (.only import:)]]] [// ["[0]" sql]] ["[0]" / "_" - ["[1][0]" input {"+" Input}] - ["[1][0]" output {"+" Output}]]) + ["[1][0]" input (.only Input)] + ["[1][0]" output (.only Output)]]) (import: java/lang/String) diff --git a/stdlib/source/library/lux/world/db/jdbc/input.lux b/stdlib/source/library/lux/world/db/jdbc/input.lux index 49f7557b1..742467b81 100644 --- a/stdlib/source/library/lux/world/db/jdbc/input.lux +++ b/stdlib/source/library/lux/world/db/jdbc/input.lux @@ -1,16 +1,16 @@ (.using - [library - [lux {"-" and int} - [ffi {"+" import:}] - [control - [functor {"+" Contravariant}] - [monad {"+" Monad do}] - ["[0]" try {"+" Try}]] - [time - ["[0]" instant {"+" Instant}]] - ["[0]" io {"+" IO}] - [world - [binary {"+" Binary}]]]]) + [library + [lux {"-" and int} + [ffi (.only import:)] + [control + [functor (.only Contravariant)] + [monad (.only Monad do)] + ["[0]" try (.only Try)]] + [time + ["[0]" instant (.only Instant)]] + ["[0]" io (.only IO)] + [world + [binary (.only Binary)]]]]) (import: java/lang/String) diff --git a/stdlib/source/library/lux/world/db/jdbc/output.lux b/stdlib/source/library/lux/world/db/jdbc/output.lux index 6de6b9d57..cf195b35c 100644 --- a/stdlib/source/library/lux/world/db/jdbc/output.lux +++ b/stdlib/source/library/lux/world/db/jdbc/output.lux @@ -1,18 +1,18 @@ (.using [library [lux {"-" and int} - [ffi {"+" import:}] + [ffi (.only import:)] [control - [functor {"+" Functor}] - [apply {"+" Apply}] - [monad {"+" Monad do}] + [functor (.only Functor)] + [apply (.only Apply)] + [monad (.only Monad do)] ["ex" exception] - ["[0]" try {"+" Try}]] + ["[0]" try (.only Try)]] [time - ["[0]" instant {"+" Instant}]] - ["[0]" io {"+" IO}] + ["[0]" instant (.only Instant)]] + ["[0]" io (.only IO)] [world - [binary {"+" Binary}]]]]) + [binary (.only Binary)]]]]) (import: java/lang/String) diff --git a/stdlib/source/library/lux/world/db/sql.lux b/stdlib/source/library/lux/world/db/sql.lux index 218d64ccf..952bab958 100644 --- a/stdlib/source/library/lux/world/db/sql.lux +++ b/stdlib/source/library/lux/world/db/sql.lux @@ -2,12 +2,12 @@ [library [lux {"-" Source Definition function and or not type int} [control - [monad {"+" do}]] + [monad (.only do)]] [data [number ["i" int]] ["[0]" text ("[1]#[0]" equivalence) - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" functor)]]] [macro diff --git a/stdlib/source/library/lux/world/file.lux b/stdlib/source/library/lux/world/file.lux index 820ab92e0..300751aaa 100644 --- a/stdlib/source/library/lux/world/file.lux +++ b/stdlib/source/library/lux/world/file.lux @@ -3,27 +3,27 @@ [lux {"-" open} ["@" target] [abstract - ["[0]" monad {"+" Monad do}]] + ["[0]" monad (.only Monad do)]] [control ["[0]" pipe] ["[0]" maybe ("[1]#[0]" functor)] - ["[0]" try {"+" Try} ("[1]#[0]" functor)] - ["[0]" exception {"+" exception:}] - ["[0]" io {"+" IO} ("[1]#[0]" functor)] + ["[0]" try (.only Try) ("[1]#[0]" functor)] + ["[0]" exception (.only exception:)] + ["[0]" io (.only IO) ("[1]#[0]" functor)] ["[0]" function] [concurrency - ["[0]" async {"+" Async}] - ["[0]" stm {"+" Var STM}]]] + ["[0]" async (.only Async)] + ["[0]" stm (.only Var STM)]]] [data ["[0]" bit ("[1]#[0]" equivalence)] ["[0]" product] - ["[0]" binary {"+" Binary}] + ["[0]" binary (.only Binary)] ["[0]" text ("[1]#[0]" equivalence) - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection - ["[0]" array {"+" Array}] + ["[0]" array (.only Array)] ["[0]" list ("[1]#[0]" functor)] - ["[0]" dictionary {"+" Dictionary}]]] + ["[0]" dictionary (.only Dictionary)]]] ["[0]" ffi (~~ (.for "JavaScript" (~~ (.these ["[0]" node_js])) "{old}" (~~ (.these ["node_js" //control/thread])) @@ -35,7 +35,7 @@ ["i" int] ["f" frac]]] [time - ["[0]" instant {"+" Instant}] + ["[0]" instant (.only Instant)] ["[0]" duration]]]]))) (type: .public Path diff --git a/stdlib/source/library/lux/world/file/watch.lux b/stdlib/source/library/lux/world/file/watch.lux index d9c070472..497af0a49 100644 --- a/stdlib/source/library/lux/world/file/watch.lux +++ b/stdlib/source/library/lux/world/file/watch.lux @@ -2,24 +2,24 @@ [library [lux {"-" all} ["@" target] - ["[0]" ffi {"+" import:}] + ["[0]" ffi (.only import:)] [abstract - [predicate {"+" Predicate}] - ["[0]" monad {"+" do}]] + [predicate (.only Predicate)] + ["[0]" monad (.only do)]] [control - ["[0]" io {"+" IO}] + ["[0]" io (.only IO)] ["[0]" maybe] - ["[0]" try {"+" Try}] - ["[0]" exception {"+" exception:}] + ["[0]" try (.only Try)] + ["[0]" exception (.only exception:)] [concurrency - ["[0]" async {"+" Async}] - ["[0]" stm {"+" STM Var}]]] + ["[0]" async (.only Async)] + ["[0]" stm (.only STM Var)]]] [data ["[0]" product] ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection - ["[0]" dictionary {"+" Dictionary}] + ["[0]" dictionary (.only Dictionary)] ["[0]" list ("[1]#[0]" functor monoid mix)] ["[0]" set] ["[0]" array]]] @@ -27,9 +27,9 @@ [number ["n" nat]]] [time - ["[0]" instant {"+" Instant} ("[1]#[0]" equivalence)]] + ["[0]" instant (.only Instant) ("[1]#[0]" equivalence)]] [type - [primitive {"+" primitive: representation abstraction}]]]] + [primitive (.only primitive: representation abstraction)]]]] ["[0]" //]) (primitive: .public Concern diff --git a/stdlib/source/library/lux/world/net/http.lux b/stdlib/source/library/lux/world/net/http.lux index 514f8d6ff..950d1b982 100644 --- a/stdlib/source/library/lux/world/net/http.lux +++ b/stdlib/source/library/lux/world/net/http.lux @@ -1,16 +1,16 @@ (.using - [library - [lux "*" - [control - [try {"+" Try}] - [concurrency - [frp {"+" Channel}]] - [parser - ["[0]" environment {"+" Environment}]]] - [data - [binary {"+" Binary}]]]] - [// {"+" URL} - [uri {"+" URI}]]) + [library + [lux "*" + [control + [try (.only Try)] + [concurrency + [frp (.only Channel)]] + [parser + ["[0]" environment (.only Environment)]]] + [data + [binary (.only Binary)]]]] + [// (.only URL) + [uri (.only URI)]]) (type: .public Version Text) diff --git a/stdlib/source/library/lux/world/net/http/client.lux b/stdlib/source/library/lux/world/net/http/client.lux index 35c6e9cac..da585e503 100644 --- a/stdlib/source/library/lux/world/net/http/client.lux +++ b/stdlib/source/library/lux/world/net/http/client.lux @@ -4,23 +4,23 @@ ["@" target] ["[0]" ffi] [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["[0]" pipe] - ["[0]" io {"+" IO}] + ["[0]" io (.only IO)] ["[0]" maybe ("[1]#[0]" functor)] - ["[0]" try {"+" Try}] + ["[0]" try (.only Try)] [concurrency - ["[0]" async {"+" Async}]] + ["[0]" async (.only Async)]] [parser ["<[0]>" code]]] [data - ["[0]" binary {"+" Binary}] + ["[0]" binary (.only Binary)] ["[0]" text] [collection ["[0]" dictionary]]] [macro - [syntax {"+" syntax:}] + [syntax (.only syntax:)] ["[0]" code] ["[0]" template]] [math @@ -28,7 +28,7 @@ ["n" nat] ["i" int]]]]] ["[0]" // - [// {"+" URL}]]) + [// (.only URL)]]) (type: .public (Client !) (Interface diff --git a/stdlib/source/library/lux/world/net/http/cookie.lux b/stdlib/source/library/lux/world/net/http/cookie.lux index b3143c56e..fe47d45e5 100644 --- a/stdlib/source/library/lux/world/net/http/cookie.lux +++ b/stdlib/source/library/lux/world/net/http/cookie.lux @@ -2,22 +2,22 @@ [library [lux "*" [control - [monad {"+" do}] - ["[0]" try {"+" Try}] + [monad (.only do)] + ["[0]" try (.only Try)] ["p" parser ("[1]#[0]" monad) - ["l" text {"+" Parser}]]] + ["l" text (.only Parser)]]] [data [number ["i" int]] [text - ["%" format {"+" format}]] + ["%" format (.only format)]] [format - ["[0]" context {"+" Context}]] + ["[0]" context (.only Context)]] [collection ["[0]" dictionary]]] [time - ["[0]" duration {"+" Duration}]]]] - ["[0]" // {"+" Header} + ["[0]" duration (.only Duration)]]]] + ["[0]" // (.only Header) ["[0]" header]]) (type: .public Directive diff --git a/stdlib/source/library/lux/world/net/http/header.lux b/stdlib/source/library/lux/world/net/http/header.lux index 61bd78dbc..1af3a8035 100644 --- a/stdlib/source/library/lux/world/net/http/header.lux +++ b/stdlib/source/library/lux/world/net/http/header.lux @@ -5,12 +5,12 @@ ["[0]" pipe]] [data [text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection - ["[0]" dictionary {"+" Dictionary}]]]]] - [// {"+" Header} - ["[0]" mime {"+" MIME}] - [// {"+" URL}]]) + ["[0]" dictionary (.only Dictionary)]]]]] + [// (.only Header) + ["[0]" mime (.only MIME)] + [// (.only URL)]]) (def: .public (has name value) (-> Text Text Header) diff --git a/stdlib/source/library/lux/world/net/http/mime.lux b/stdlib/source/library/lux/world/net/http/mime.lux index a8578015c..45181ebc5 100644 --- a/stdlib/source/library/lux/world/net/http/mime.lux +++ b/stdlib/source/library/lux/world/net/http/mime.lux @@ -3,8 +3,8 @@ [lux "*" [data ["[0]" text - ["%" format {"+" format}] - ["[0]" encoding {"+" Encoding}]]] + ["%" format (.only format)] + ["[0]" encoding (.only Encoding)]]] [type [primitive "*"]]]]) diff --git a/stdlib/source/library/lux/world/net/http/query.lux b/stdlib/source/library/lux/world/net/http/query.lux index 445e28bfe..0f5e7ef45 100644 --- a/stdlib/source/library/lux/world/net/http/query.lux +++ b/stdlib/source/library/lux/world/net/http/query.lux @@ -3,17 +3,17 @@ [lux "*" [control pipe - [monad {"+" do}] - ["[0]" try {"+" Try}] + [monad (.only do)] + ["[0]" try (.only Try)] ["p" parser - ["l" text {"+" Parser}]]] + ["l" text (.only Parser)]]] [data [number ["[0]" nat]] ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [format - ["[0]" context {"+" Context}]] + ["[0]" context (.only Context)]] [collection ["[0]" dictionary]]]]]) diff --git a/stdlib/source/library/lux/world/net/http/request.lux b/stdlib/source/library/lux/world/net/http/request.lux index bea2b0ffc..60e17d9b4 100644 --- a/stdlib/source/library/lux/world/net/http/request.lux +++ b/stdlib/source/library/lux/world/net/http/request.lux @@ -3,11 +3,11 @@ [lux "*" [control pipe - ["[0]" monad {"+" do}] + ["[0]" monad (.only do)] ["[0]" maybe] - ["[0]" try {"+" Try}] + ["[0]" try (.only Try)] [concurrency - ["[0]" async {"+" Async}] + ["[0]" async (.only Async)] ["[0]" frp]] [parser ["<[0]>" json]]] @@ -17,16 +17,16 @@ ["[0]" text ["[0]" encoding]] [format - ["[0]" json {"+" JSON}] - ["[0]" context {"+" Context Property}]] + ["[0]" json (.only JSON)] + ["[0]" context (.only Context Property)]] [collection ["[0]" list ("[1]#[0]" functor mix)] ["[0]" dictionary]]] [macro ["^" pattern]] [world - ["[0]" binary {"+" Binary}]]]] - ["[0]" // {"+" Body Response Server} + ["[0]" binary (.only Binary)]]]] + ["[0]" // (.only Body Response Server) ["[1][0]" response] ["[1][0]" query] ["[1][0]" cookie]]) diff --git a/stdlib/source/library/lux/world/net/http/response.lux b/stdlib/source/library/lux/world/net/http/response.lux index eeb67bcde..074f97cb4 100644 --- a/stdlib/source/library/lux/world/net/http/response.lux +++ b/stdlib/source/library/lux/world/net/http/response.lux @@ -10,17 +10,17 @@ ["[0]" encoding]] [format ["[0]" html] - ["[0]" css {"+" CSS}] + ["[0]" css (.only CSS)] ["[0]" context] - ["[0]" json {"+" JSON} ("[1]#[0]" codec)]]] + ["[0]" json (.only JSON) ("[1]#[0]" codec)]]] ["[0]" io] [world - ["[0]" binary {"+" Binary}]]]] - ["[0]" // {"+" Status Body Response Server} + ["[0]" binary (.only Binary)]]]] + ["[0]" // (.only Status Body Response Server) ["[0]" status] - ["[0]" mime {"+" MIME}] + ["[0]" mime (.only MIME)] ["[0]" header] - [// {"+" URL}]]) + [// (.only URL)]]) (def: .public (static response) (-> Response Server) diff --git a/stdlib/source/library/lux/world/net/http/route.lux b/stdlib/source/library/lux/world/net/http/route.lux index c94dd8235..10d8e37fc 100644 --- a/stdlib/source/library/lux/world/net/http/route.lux +++ b/stdlib/source/library/lux/world/net/http/route.lux @@ -2,7 +2,7 @@ [library [lux {"-" or} [control - [monad {"+" do}] + [monad (.only do)] ["[0]" maybe] [concurrency ["[0]" async]]] @@ -12,7 +12,7 @@ ["n" nat]]] [macro ["^" pattern]]]] - ["[0]" // {"+" URI Server} + ["[0]" // (.only URI Server) ["[1][0]" status] ["[1][0]" response]]) diff --git a/stdlib/source/library/lux/world/net/http/status.lux b/stdlib/source/library/lux/world/net/http/status.lux index af539d381..d949df181 100644 --- a/stdlib/source/library/lux/world/net/http/status.lux +++ b/stdlib/source/library/lux/world/net/http/status.lux @@ -1,7 +1,7 @@ (.using - [library - [lux "*"]] - [// {"+" Status}]) + [library + [lux "*"]] + [// (.only Status)]) ... https://en.wikipedia.org/wiki/List_of_HTTP_status_codes (template [<status> <name>] diff --git a/stdlib/source/library/lux/world/net/http/version.lux b/stdlib/source/library/lux/world/net/http/version.lux index acd7ac9fa..cd9d69217 100644 --- a/stdlib/source/library/lux/world/net/http/version.lux +++ b/stdlib/source/library/lux/world/net/http/version.lux @@ -1,7 +1,7 @@ (.using - [library - [lux "*"]] - [// {"+" Version}]) + [library + [lux "*"]] + [// (.only Version)]) (template [<name> <version>] [(def: .public <name> Version <version>)] diff --git a/stdlib/source/library/lux/world/output/video/resolution.lux b/stdlib/source/library/lux/world/output/video/resolution.lux index 8883460bc..2b4ba2d6b 100644 --- a/stdlib/source/library/lux/world/output/video/resolution.lux +++ b/stdlib/source/library/lux/world/output/video/resolution.lux @@ -2,8 +2,8 @@ [library [lux "*" [abstract - [equivalence {"+" Equivalence}] - [hash {"+" Hash}]] + [equivalence (.only Equivalence)] + [hash (.only Hash)]] [data ["[0]" product]] [math diff --git a/stdlib/source/library/lux/world/program.lux b/stdlib/source/library/lux/world/program.lux index 0561a7c66..6d3c97cf5 100644 --- a/stdlib/source/library/lux/world/program.lux +++ b/stdlib/source/library/lux/world/program.lux @@ -3,27 +3,27 @@ [lux "*" ["@" target] [abstract - ["[0]" monad {"+" Monad do}]] + ["[0]" monad (.only Monad do)]] [control ["[0]" function] - ["[0]" io {"+" IO}] + ["[0]" io (.only IO)] ["[0]" maybe ("[1]#[0]" functor)] - ["[0]" try {"+" Try}] - ["[0]" exception {"+" exception:}] + ["[0]" try (.only Try)] + ["[0]" exception (.only exception:)] [concurrency ["[0]" atom] - ["[0]" async {"+" Async}]] + ["[0]" async (.only Async)]] [parser - ["[0]" environment {"+" Environment}]]] + ["[0]" environment (.only Environment)]]] [data ["[0]" bit ("[1]#[0]" equivalence)] ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection - ["[0]" array {"+" Array}] - ["[0]" dictionary {"+" Dictionary}] + ["[0]" array (.only Array)] + ["[0]" dictionary (.only Dictionary)] ["[0]" list ("[1]#[0]" functor)]]] - ["[0]" ffi {"+" import:} + ["[0]" ffi (.only import:) (~~ (.for "JavaScript" (~~ (.these ["[0]" node_js])) "{old}" (~~ (.these ["node_js" //math])) (~~ (.these))))] @@ -33,8 +33,8 @@ [number ["i" int]]]]] [// - [file {"+" Path}] - [shell {"+" Exit}]]))) + [file (.only Path)] + [shell (.only Exit)]]))) (exception: .public (unknown_environment_variable [name Text]) (exception.report diff --git a/stdlib/source/library/lux/world/shell.lux b/stdlib/source/library/lux/world/shell.lux index 47302a81a..821806946 100644 --- a/stdlib/source/library/lux/world/shell.lux +++ b/stdlib/source/library/lux/world/shell.lux @@ -2,36 +2,36 @@ [library [lux "*" ["@" target] - ["[0]" ffi {"+" import:}] + ["[0]" ffi (.only import:)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" function] - ["[0]" try {"+" Try}] - ["[0]" exception {"+" exception:}] - ["[0]" io {"+" IO}] + ["[0]" try (.only Try)] + ["[0]" exception (.only exception:)] + ["[0]" io (.only IO)] [security - ["?" policy {"+" Context Safety Safe}]] + ["?" policy (.only Context Safety Safe)]] [concurrency - ["[0]" atom {"+" Atom}] - ["[0]" async {"+" Async}]] + ["[0]" atom (.only Atom)] + ["[0]" async (.only Async)]] [parser - [environment {"+" Environment}]]] + [environment (.only Environment)]]] [data ["[0]" product] ["[0]" text - ["%" format {"+" format}] + ["%" format (.only format)] [encoding ["[0]" utf8]]] [collection - ["[0]" array {"+" Array}] + ["[0]" array (.only Array)] ["[0]" list ("[1]#[0]" mix functor)] ["[0]" dictionary]]] [math - [number {"+" hex} + [number (.only hex) ["n" nat]]]]] [// - [file {"+" Path}]]) + [file (.only Path)]]) (type: .public Exit Int) diff --git a/stdlib/source/poly/lux/abstract/equivalence.lux b/stdlib/source/poly/lux/abstract/equivalence.lux index 1e95ec091..39f92e769 100644 --- a/stdlib/source/poly/lux/abstract/equivalence.lux +++ b/stdlib/source/poly/lux/abstract/equivalence.lux @@ -2,7 +2,7 @@ [library [lux "*" [abstract - [monad {"+" Monad do}]] + [monad (.only Monad do)]] [control ["[0]" maybe] ["<>" parser @@ -11,17 +11,17 @@ ["[0]" product] ["[0]" bit] ["[0]" text ("[1]#[0]" monoid) - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" monad)] ["[0]" sequence] ["[0]" array] ["[0]" queue] ["[0]" set] - ["[0]" dictionary {"+" Dictionary}] + ["[0]" dictionary (.only Dictionary)] ["[0]" tree]]] [macro - [syntax {"+" syntax:}] + [syntax (.only syntax:)] ["[0]" code]] [math [number @@ -36,7 +36,7 @@ ["[0]" day] ["[0]" month]] ["[0]" type - ["[0]" poly {"+" poly:}] + ["[0]" poly (.only poly:)] ["[0]" unit]]]] [\\library ["[0]" /]]) diff --git a/stdlib/source/poly/lux/abstract/functor.lux b/stdlib/source/poly/lux/abstract/functor.lux index 97c900493..1251bce88 100644 --- a/stdlib/source/poly/lux/abstract/functor.lux +++ b/stdlib/source/poly/lux/abstract/functor.lux @@ -2,25 +2,25 @@ [library [lux "*" [abstract - [monad {"+" Monad do}]] + [monad (.only Monad do)]] [control ["p" parser ["<[0]>" type] - ["s" code {"+" Parser}]]] + ["s" code (.only Parser)]]] [data ["[0]" product] ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" monad monoid)]]] [macro - [syntax {"+" syntax:}] + [syntax (.only syntax:)] ["[0]" code]] [math [number ["n" nat]]] ["[0]" type - ["[0]" poly {"+" poly:}]]]] + ["[0]" poly (.only poly:)]]]] [\\library ["[0]" /]]) diff --git a/stdlib/source/poly/lux/data/format/json.lux b/stdlib/source/poly/lux/data/format/json.lux index 9e4a6a369..1c35ac334 100644 --- a/stdlib/source/poly/lux/data/format/json.lux +++ b/stdlib/source/poly/lux/data/format/json.lux @@ -3,7 +3,7 @@ [lux "*" ["[0]" debug] [abstract - [monad {"+" do}] + [monad (.only do)] ["[0]" codec]] [control ["[0]" try] @@ -13,13 +13,13 @@ ["<[0]>" code]]] [data ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" monad)] - ["[0]" sequence {"+" sequence}] + ["[0]" sequence (.only sequence)] ["[0]" dictionary]]] [macro - [syntax {"+" syntax:}] + [syntax (.only syntax:)] ["[0]" code]] [math [number @@ -35,9 +35,9 @@ ["[0]" month]] ["[0]" type ["[0]" unit] - ["[0]" poly {"+" poly:}]]]] + ["[0]" poly (.only poly:)]]]] [\\library - ["[0]" / {"+" JSON}]]) + ["[0]" / (.only JSON)]]) (def: tag (-> Nat Frac) diff --git a/stdlib/source/program/aedifex.lux b/stdlib/source/program/aedifex.lux index b964e8fef..afebeb2ec 100644 --- a/stdlib/source/program/aedifex.lux +++ b/stdlib/source/program/aedifex.lux @@ -1,30 +1,30 @@ (.using [library [lux {"-" local} - [program {"+" program:}] + [program (.only program:)] ["[0]" debug] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control - ["[0]" io {"+" IO}] + ["[0]" io (.only IO)] ["[0]" maybe] - ["[0]" try {"+" Try} ("[1]#[0]" functor)] - ["[0]" exception {"+" exception:}] + ["[0]" try (.only Try) ("[1]#[0]" functor)] + ["[0]" exception (.only exception:)] [parser - [environment {"+" Environment}]] + [environment (.only Environment)]] [concurrency - ["[0]" async {"+" Async} ("[1]#[0]" monad)]]] + ["[0]" async (.only Async) ("[1]#[0]" monad)]]] [data - [binary {"+" Binary}] + [binary (.only Binary)] ["[0]" text - ["%" format {"+" format}] + ["%" format (.only format)] [encoding ["[0]" utf8]]] [format ["[0]" xml]] [collection ["[0]" set] - ["[0]" dictionary {"+" Dictionary}] + ["[0]" dictionary (.only Dictionary)] ["[0]" list ("[1]#[0]" functor)]]] [tool [compiler @@ -32,27 +32,27 @@ [lux ["[0]" syntax]]]]] [world - ["[0]" shell {"+" Exit Shell}] - ["[0]" console {"+" Console}] - ["[0]" program {"+" Program}] - ["[0]" file {"+" Path} + ["[0]" shell (.only Exit Shell)] + ["[0]" console (.only Console)] + ["[0]" program (.only Program)] + ["[0]" file (.only Path) ["[0]" watch]] [net ["[0]" http "_" ["[1]" client]]]]]] ["[0]" / "_" ["[1]" profile] - ["[1][0]" action {"+" Action}] - ["[1][0]" project {"+" Project}] + ["[1][0]" action (.only Action)] + ["[1][0]" project (.only Project)] ["[1][0]" input] ["[1][0]" pom] ["[1][0]" cli] ["[1][0]" dependency "_" - ["[1]" resolution {"+" Resolution}]] - ["[1][0]" repository {"+" Repository} - ["[1]/[0]" remote {"+" Address}] + ["[1]" resolution (.only Resolution)]] + ["[1][0]" repository (.only Repository) + ["[1]/[0]" remote (.only Address)] ["[1]/[0]" local]] - ["[1][0]" command {"+" Command} + ["[1][0]" command (.only Command) ["[1]/[0]" version] ["[1]/[0]" clean] ["[1]/[0]" pom] diff --git a/stdlib/source/program/aedifex/action.lux b/stdlib/source/program/aedifex/action.lux index d9e168e9f..451d72cef 100644 --- a/stdlib/source/program/aedifex/action.lux +++ b/stdlib/source/program/aedifex/action.lux @@ -2,11 +2,11 @@ [library [lux "*" [abstract - [monad {"+" Monad}]] + [monad (.only Monad)]] [control - ["[0]" try {"+" Try}] + ["[0]" try (.only Try)] [concurrency - ["[0]" async {"+" Async}]]]]]) + ["[0]" async (.only Async)]]]]]) (type: .public (Action a) (Async (Try a))) diff --git a/stdlib/source/program/aedifex/artifact.lux b/stdlib/source/program/aedifex/artifact.lux index 4d3d9cc87..32e37e293 100644 --- a/stdlib/source/program/aedifex/artifact.lux +++ b/stdlib/source/program/aedifex/artifact.lux @@ -2,19 +2,19 @@ [library [lux {"-" local} [abstract - [equivalence {"+" Equivalence}] - [order {"+" Order}] - [hash {"+" Hash}]] + [equivalence (.only Equivalence)] + [order (.only Order)] + [hash (.only Hash)]] [data ["[0]" product] ["[0]" text ("[1]#[0]" order) - ["%" format {"+" Format}]] + ["%" format (.only Format)]] [collection ["[0]" list ("[1]#[0]" monoid)]]] [world - ["[0]" file {"+" Path}] + ["[0]" file (.only Path)] [net - ["[0]" uri {"+" URI}]]]]]) + ["[0]" uri (.only URI)]]]]]) (type: .public Group Text) diff --git a/stdlib/source/program/aedifex/artifact/extension.lux b/stdlib/source/program/aedifex/artifact/extension.lux index 65d336585..837c536ca 100644 --- a/stdlib/source/program/aedifex/artifact/extension.lux +++ b/stdlib/source/program/aedifex/artifact/extension.lux @@ -1,13 +1,13 @@ (.using - [library - [lux {"-" type} - [data - ["[0]" text - ["%" format {"+" format}]]] - [macro - ["[0]" template]]]] - ["[0]" // "_" - ["[1]" type]]) + [library + [lux {"-" type} + [data + ["[0]" text + ["%" format (.only format)]]] + [macro + ["[0]" template]]]] + ["[0]" // "_" + ["[1]" type]]) (type: .public Extension Text) diff --git a/stdlib/source/program/aedifex/artifact/snapshot.lux b/stdlib/source/program/aedifex/artifact/snapshot.lux index db9fa0891..734d48ab8 100644 --- a/stdlib/source/program/aedifex/artifact/snapshot.lux +++ b/stdlib/source/program/aedifex/artifact/snapshot.lux @@ -2,18 +2,18 @@ [library [lux {"-" Type} [abstract - [equivalence {"+" Equivalence}] - [monad {"+" do}]] + [equivalence (.only Equivalence)] + [monad (.only do)]] [control ["<>" parser - ["<[0]>" xml {"+" Parser}] + ["<[0]>" xml (.only Parser)] ["<[0]>" text]]] [data ["[0]" sum] [format - ["[0]" xml {"+" XML}]]]]] + ["[0]" xml (.only XML)]]]]] ["[0]" / "_" - ["[1][0]" stamp {"+" Stamp}]]) + ["[1][0]" stamp (.only Stamp)]]) (type: .public Snapshot (Variant diff --git a/stdlib/source/program/aedifex/artifact/snapshot/build.lux b/stdlib/source/program/aedifex/artifact/snapshot/build.lux index fbf89fc55..f4b863522 100644 --- a/stdlib/source/program/aedifex/artifact/snapshot/build.lux +++ b/stdlib/source/program/aedifex/artifact/snapshot/build.lux @@ -1,21 +1,21 @@ (.using - [library - [lux "*" - [abstract - [equivalence {"+" Equivalence}] - [monad {"+" do}]] - [control - ["<>" parser - ["<[0]>" xml {"+" Parser}] - ["<[0]>" text]]] - [data - [text - ["%" format]] - [format - ["[0]" xml {"+" XML}]]] - [math - [number - ["[0]" nat]]]]]) + [library + [lux "*" + [abstract + [equivalence (.only Equivalence)] + [monad (.only do)]] + [control + ["<>" parser + ["<[0]>" xml (.only Parser)] + ["<[0]>" text]]] + [data + [text + ["%" format]] + [format + ["[0]" xml (.only XML)]]] + [math + [number + ["[0]" nat]]]]]) (type: .public Build Nat) diff --git a/stdlib/source/program/aedifex/artifact/snapshot/stamp.lux b/stdlib/source/program/aedifex/artifact/snapshot/stamp.lux index 55a3957a9..21867d58f 100644 --- a/stdlib/source/program/aedifex/artifact/snapshot/stamp.lux +++ b/stdlib/source/program/aedifex/artifact/snapshot/stamp.lux @@ -2,19 +2,19 @@ [library [lux "*" [abstract - [equivalence {"+" Equivalence}] - [monad {"+" do}]] + [equivalence (.only Equivalence)] + [monad (.only do)]] [control ["<>" parser - ["<[0]>" xml {"+" Parser}] + ["<[0]>" xml (.only Parser)] ["<[0]>" text]]] [data ["[0]" product] [format - ["[0]" xml {"+" XML}]]]]] + ["[0]" xml (.only XML)]]]]] ["[0]" // "_" - ["[1][0]" time {"+" Time}] - ["[1][0]" build {"+" Build}]]) + ["[1][0]" time (.only Time)] + ["[1][0]" build (.only Build)]]) (type: .public Stamp (Record diff --git a/stdlib/source/program/aedifex/artifact/snapshot/time.lux b/stdlib/source/program/aedifex/artifact/snapshot/time.lux index 8088c5707..0a3337a56 100644 --- a/stdlib/source/program/aedifex/artifact/snapshot/time.lux +++ b/stdlib/source/program/aedifex/artifact/snapshot/time.lux @@ -1,25 +1,25 @@ (.using - [library - [lux "*" - [abstract - [equivalence {"+" Equivalence}] - [monad {"+" do}]] - [control - ["[0]" exception {"+" exception:}] - ["<>" parser - ["<[0]>" text] - ["<[0]>" xml {"+" Parser}]]] - [data - [text - ["%" format]] - [format - ["[0]" xml {"+" XML}]]] - [time - ["[0]" instant {"+" Instant}]]]] - ["[0]" /// "_" - ["[1][0]" time - ["[1]/[0]" date] - ["[1]/[0]" time]]]) + [library + [lux "*" + [abstract + [equivalence (.only Equivalence)] + [monad (.only do)]] + [control + ["[0]" exception (.only exception:)] + ["<>" parser + ["<[0]>" text] + ["<[0]>" xml (.only Parser)]]] + [data + [text + ["%" format]] + [format + ["[0]" xml (.only XML)]]] + [time + ["[0]" instant (.only Instant)]]]] + ["[0]" /// "_" + ["[1][0]" time + ["[1]/[0]" date] + ["[1]/[0]" time]]]) (type: .public Time ///time.Time) diff --git a/stdlib/source/program/aedifex/artifact/snapshot/version.lux b/stdlib/source/program/aedifex/artifact/snapshot/version.lux index e5053ed73..e2c677c42 100644 --- a/stdlib/source/program/aedifex/artifact/snapshot/version.lux +++ b/stdlib/source/program/aedifex/artifact/snapshot/version.lux @@ -2,20 +2,20 @@ [library [lux {"-" Type} [abstract - [equivalence {"+" Equivalence}] - [monad {"+" do}]] + [equivalence (.only Equivalence)] + [monad (.only do)]] [control ["<>" parser - ["<[0]>" xml {"+" Parser}] + ["<[0]>" xml (.only Parser)] ["<[0]>" text]]] [data ["[0]" product] ["[0]" text] [format - ["[0]" xml {"+" XML}]]]]] + ["[0]" xml (.only XML)]]]]] ["[0]" /// "_" - ["[1][0]" type {"+" Type}] - ["[1][0]" time {"+" Time}]]) + ["[1][0]" type (.only Type)] + ["[1][0]" time (.only Time)]]) (type: .public Version (Record diff --git a/stdlib/source/program/aedifex/artifact/snapshot/version/value.lux b/stdlib/source/program/aedifex/artifact/snapshot/version/value.lux index 63bed8532..0e64d52ec 100644 --- a/stdlib/source/program/aedifex/artifact/snapshot/version/value.lux +++ b/stdlib/source/program/aedifex/artifact/snapshot/version/value.lux @@ -2,12 +2,12 @@ [library [lux "*" [abstract - [equivalence {"+" Equivalence}]] + [equivalence (.only Equivalence)]] [data ["[0]" product] ["[0]" text ["%" format]]]]] - ["[0]" /// {"+" Snapshot} + ["[0]" /// (.only Snapshot) ["[1][0]" time] ["[1][0]" stamp]]) diff --git a/stdlib/source/program/aedifex/artifact/time.lux b/stdlib/source/program/aedifex/artifact/time.lux index efd33ca0a..9f6a123f0 100644 --- a/stdlib/source/program/aedifex/artifact/time.lux +++ b/stdlib/source/program/aedifex/artifact/time.lux @@ -1,23 +1,23 @@ (.using - [library - [lux "*" - ["[0]" time] - [abstract - [equivalence {"+" Equivalence}] - [monad {"+" do}]] - [control - ["[0]" try {"+" Try}] - ["<>" parser - ["<[0]>" text {"+" Parser}]]] - [data - ["[0]" product] - [text - ["%" format {"+" Format}]]] - [time - ["[0]" instant {"+" Instant}]]]] - ["[0]" / "_" - ["[1][0]" date] - ["[1][0]" time]]) + [library + [lux "*" + ["[0]" time] + [abstract + [equivalence (.only Equivalence)] + [monad (.only do)]] + [control + ["[0]" try (.only Try)] + ["<>" parser + ["<[0]>" text (.only Parser)]]] + [data + ["[0]" product] + [text + ["%" format (.only Format)]]] + [time + ["[0]" instant (.only Instant)]]]] + ["[0]" / "_" + ["[1][0]" date] + ["[1][0]" time]]) (type: .public Time [/date.Date /time.Time]) diff --git a/stdlib/source/program/aedifex/artifact/time/date.lux b/stdlib/source/program/aedifex/artifact/time/date.lux index d3af4c01b..9962b9ade 100644 --- a/stdlib/source/program/aedifex/artifact/time/date.lux +++ b/stdlib/source/program/aedifex/artifact/time/date.lux @@ -2,13 +2,13 @@ [library [lux "*" [abstract - [monad {"+" do}] - [equivalence {"+" Equivalence}]] + [monad (.only do)] + [equivalence (.only Equivalence)]] [control - ["[0]" try {"+" Try}] - ["[0]" exception {"+" exception:}] + ["[0]" try (.only Try)] + ["[0]" exception (.only exception:)] ["<>" parser - ["<[0]>" text {"+" Parser}]]] + ["<[0]>" text (.only Parser)]]] [data [text ["%" format]]] diff --git a/stdlib/source/program/aedifex/artifact/time/time.lux b/stdlib/source/program/aedifex/artifact/time/time.lux index 15ce0e183..00f0bebe8 100644 --- a/stdlib/source/program/aedifex/artifact/time/time.lux +++ b/stdlib/source/program/aedifex/artifact/time/time.lux @@ -3,10 +3,10 @@ [lux "*" ["[0]" time] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["<>" parser - ["<[0]>" text {"+" Parser}]]] + ["<[0]>" text (.only Parser)]]] [data [text ["%" format]]] diff --git a/stdlib/source/program/aedifex/artifact/versioning.lux b/stdlib/source/program/aedifex/artifact/versioning.lux index 16789996f..d58f9b2e2 100644 --- a/stdlib/source/program/aedifex/artifact/versioning.lux +++ b/stdlib/source/program/aedifex/artifact/versioning.lux @@ -2,32 +2,32 @@ [library [lux "*" [abstract - [equivalence {"+" Equivalence}] - [monad {"+" do}]] + [equivalence (.only Equivalence)] + [monad (.only do)]] [control - ["[0]" exception {"+" exception:}] + ["[0]" exception (.only exception:)] ["<>" parser - ["<[0]>" xml {"+" Parser}] + ["<[0]>" xml (.only Parser)] ["<[0]>" text]]] [data ["[0]" product] ["[0]" text ["%" format]] [format - ["[0]" xml {"+" XML}]] + ["[0]" xml (.only XML)]] [collection ["[0]" list ("[1]#[0]" functor)]]] [math [number ["n" nat]]] - ["[0]" time {"+" Time} - ["[0]" date {"+" Date}] + ["[0]" time (.only Time) + ["[0]" date (.only Date)] ["[0]" year] ["[0]" month]]]] ["[0]" // "_" ["[1][0]" time] - ["[1][0]" snapshot {"+" Snapshot} - ["[1]/[0]" version {"+" Version}]]]) + ["[1][0]" snapshot (.only Snapshot) + ["[1]/[0]" version (.only Version)]]]) (type: .public Versioning (Record diff --git a/stdlib/source/program/aedifex/cli.lux b/stdlib/source/program/aedifex/cli.lux index 135aa0c15..dca35ac86 100644 --- a/stdlib/source/program/aedifex/cli.lux +++ b/stdlib/source/program/aedifex/cli.lux @@ -2,19 +2,19 @@ [library [lux "*" [abstract - [equivalence {"+" Equivalence}] - [monad {"+" do}]] + [equivalence (.only Equivalence)] + [monad (.only do)]] [control ["<>" parser - ["[0]" cli {"+" Parser}]]] + ["[0]" cli (.only Parser)]]] [data ["[0]" sum] ["[0]" product] ["[0]" text]]]] [// [repository - [identity {"+" Identity}]] - ["/" profile {"+" Name}]]) + [identity (.only Identity)]] + ["/" profile (.only Name)]]) (type: .public Compilation (Variant diff --git a/stdlib/source/program/aedifex/command.lux b/stdlib/source/program/aedifex/command.lux index 89b03c25d..5cca59ce3 100644 --- a/stdlib/source/program/aedifex/command.lux +++ b/stdlib/source/program/aedifex/command.lux @@ -1,9 +1,9 @@ (.using - [library - [lux "*"]] - ["[0]" // "_" - ["[1]" profile] - ["[1][0]" action {"+" Action}]]) + [library + [lux "*"]] + ["[0]" // "_" + ["[1]" profile] + ["[1][0]" action (.only Action)]]) (type: .public (Command a) (-> //.Profile (Action a))) diff --git a/stdlib/source/program/aedifex/command/auto.lux b/stdlib/source/program/aedifex/command/auto.lux index 7ae0c53d3..56cf050a6 100644 --- a/stdlib/source/program/aedifex/command/auto.lux +++ b/stdlib/source/program/aedifex/command/auto.lux @@ -2,28 +2,28 @@ [library [lux "*" [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control - ["[0]" try {"+" Try}] + ["[0]" try (.only Try)] [concurrency - ["[0]" async {"+" Async}]]] + ["[0]" async (.only Async)]]] [data [collection ["[0]" list] ["[0]" set]]] [world - [program {"+" Program}] - [shell {"+" Exit Shell}] - [console {"+" Console}] + [program (.only Program)] + [shell (.only Exit Shell)] + [console (.only Console)] ["[0]" file - ["[0]" watch {"+" Watcher}]]]]] + ["[0]" watch (.only Watcher)]]]]] ["[0]" // "_" ["/[1]" // "_" - [command {"+" Command}] + [command (.only Command)] ["[1]" profile] ["[1][0]" action] [dependency - [resolution {"+" Resolution}]]]]) + [resolution (.only Resolution)]]]]) (def: (targets fs path) (-> (file.System Async) file.Path (Async (List file.Path))) diff --git a/stdlib/source/program/aedifex/command/build.lux b/stdlib/source/program/aedifex/command/build.lux index 71eee1347..ecee82fe1 100644 --- a/stdlib/source/program/aedifex/command/build.lux +++ b/stdlib/source/program/aedifex/command/build.lux @@ -1,28 +1,28 @@ (.using [library [lux {"-" Lux} - ["[0]" ffi {"+" import:}] + ["[0]" ffi (.only import:)] [abstract - [order {"+" Order}] - [monad {"+" do}]] + [order (.only Order)] + [monad (.only do)]] [control - ["[0]" try {"+" Try} ("[1]#[0]" functor)] - ["[0]" exception {"+" exception:}] - ["[0]" io {"+" IO}] + ["[0]" try (.only Try) ("[1]#[0]" functor)] + ["[0]" exception (.only exception:)] + ["[0]" io (.only IO)] [concurrency - ["[0]" async {"+" Async} ("[1]#[0]" monad)]]] + ["[0]" async (.only Async) ("[1]#[0]" monad)]]] [data ["[0]" product] ["[0]" text ("[1]#[0]" order) - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" functor mix)] - ["[0]" dictionary {"+" Dictionary}] + ["[0]" dictionary (.only Dictionary)] ["[0]" set]]] [macro ["^" pattern]] [math - [number {"+" hex} + [number (.only hex) ["n" nat] ["i" int]]] [meta @@ -35,22 +35,22 @@ ["[0]" packager ["[0]_[1]" ruby]]]]] [world - ["[0]" program {"+" Program}] - ["[0]" file {"+" Path}] - ["[0]" shell {"+" Exit Process Shell}] - ["[0]" console {"+" Console}] + ["[0]" program (.only Program)] + ["[0]" file (.only Path)] + ["[0]" shell (.only Exit Process Shell)] + ["[0]" console (.only Console)] [net ["[0]" uri]]]]] ["[0]" /// "_" ["[1]" profile] ["[1][0]" action] - ["[1][0]" command {"+" Command}] + ["[1][0]" command (.only Command)] ["[1][0]" local] ["[1][0]" repository] ["[1][0]" runtime] - ["[1][0]" dependency {"+" Dependency} - ["[1]/[0]" resolution {"+" Resolution}]] - ["[1][0]" artifact {"+" Group Name Version Artifact} + ["[1][0]" dependency (.only Dependency) + ["[1]/[0]" resolution (.only Resolution)]] + ["[1][0]" artifact (.only Group Name Version Artifact) ["[1]/[0]" type]]]) (type: Finder diff --git a/stdlib/source/program/aedifex/command/clean.lux b/stdlib/source/program/aedifex/command/clean.lux index 98f1461a8..e398b7bd2 100644 --- a/stdlib/source/program/aedifex/command/clean.lux +++ b/stdlib/source/program/aedifex/command/clean.lux @@ -2,21 +2,21 @@ [library [lux "*" [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control - [try {"+" Try}] + [try (.only Try)] [concurrency - ["[0]" async {"+" Async}]]] + ["[0]" async (.only Async)]]] [data [text - ["%" format {"+" format}]]] + ["%" format (.only format)]]] [world - ["[0]" file {"+" Path}] - ["[0]" console {"+" Console}]]]] + ["[0]" file (.only Path)] + ["[0]" console (.only Console)]]]] ["[0]" /// "_" - [command {"+" Command}] + [command (.only Command)] ["[1]" profile] - ["[1][0]" action {"+" Action}]]) + ["[1][0]" action (.only Action)]]) (def: (clean_files! fs root) (-> (file.System Async) Path (Async (Try Any))) diff --git a/stdlib/source/program/aedifex/command/deploy.lux b/stdlib/source/program/aedifex/command/deploy.lux index 504a9206f..39e1c9815 100644 --- a/stdlib/source/program/aedifex/command/deploy.lux +++ b/stdlib/source/program/aedifex/command/deploy.lux @@ -2,24 +2,24 @@ [library [lux "*" [abstract - [monad {"+" do}]] + [monad (.only do)]] [control - [try {"+" Try}] + [try (.only Try)] [concurrency - [async {"+" Async}]]] + [async (.only Async)]]] [world - [program {"+" Program}] - [shell {"+" Shell}] + [program (.only Program)] + [shell (.only Shell)] ["[0]" file] - ["[0]" console {"+" Console}]]]] + ["[0]" console (.only Console)]]]] ["[0]" / "_" ["[1][0]" snapshot] ["[1][0]" release] ["/[1]" // "_" ["/[1]" // "_" - [command {"+" Command}] - [repository {"+" Repository}] - [artifact {"+" Artifact}] + [command (.only Command)] + [repository (.only Repository)] + [artifact (.only Artifact)] ["/" profile] ["[1][0]" action]]]]) diff --git a/stdlib/source/program/aedifex/command/deploy/release.lux b/stdlib/source/program/aedifex/command/deploy/release.lux index b8b6e2531..51f07d66a 100644 --- a/stdlib/source/program/aedifex/command/deploy/release.lux +++ b/stdlib/source/program/aedifex/command/deploy/release.lux @@ -1,20 +1,20 @@ (.using [library [lux "*" - ["[0]" ffi {"+" import:}] + ["[0]" ffi (.only import:)] [abstract - [predicate {"+" Predicate}] - ["[0]" monad {"+" do}]] + [predicate (.only Predicate)] + ["[0]" monad (.only do)]] [control ["[0]" pipe] - ["[0]" try {"+" Try}] - ["[0]" io {"+" IO}] + ["[0]" try (.only Try)] + ["[0]" io (.only IO)] [concurrency - ["[0]" async {"+" Async}]] + ["[0]" async (.only Async)]] [parser ["[0]" environment]]] [data - ["[0]" binary {"+" Binary}] + ["[0]" binary (.only Binary)] ["[0]" text ["%" format] [encoding @@ -35,16 +35,16 @@ ["[0]" packager "_" ["[1]" jvm]]]]] [world - [program {"+" Program}] - [console {"+" Console}] - ["[0]" shell {"+" Shell}] + [program (.only Program)] + [console (.only Console)] + ["[0]" shell (.only Shell)] ["[0]" file]]]] ["[0]" // "_" ["[1][0]" snapshot] ["/[1]" // "_" ["[1][0]" install] ["/[1]" // "_" - [command {"+" Command}] + [command (.only Command)] ["/" profile] ["[1][0]" action] ["[1][0]" pom] @@ -53,12 +53,12 @@ ["[1][0]" dependency "_" ["[1]/[0]" deployment] ["[1]/[0]" status]] - ["[1][0]" repository {"+" Repository} + ["[1][0]" repository (.only Repository) ["[1]/[0]" origin] ["[1]/[0]" local]] - ["[1][0]" artifact {"+" Artifact} + ["[1][0]" artifact (.only Artifact) ["[1]/[0]" type] - ["[1]/[0]" extension {"+" Extension}]]]]]) + ["[1]/[0]" extension (.only Extension)]]]]]) (import: java/lang/String "[1]::[0]" diff --git a/stdlib/source/program/aedifex/command/deploy/snapshot.lux b/stdlib/source/program/aedifex/command/deploy/snapshot.lux index fa69e8311..dc165a8ad 100644 --- a/stdlib/source/program/aedifex/command/deploy/snapshot.lux +++ b/stdlib/source/program/aedifex/command/deploy/snapshot.lux @@ -2,11 +2,11 @@ [library [lux "*" [abstract - [monad {"+" do}] - [predicate {"+" Predicate}]] + [monad (.only do)] + [predicate (.only Predicate)]] [control [concurrency - ["[0]" async {"+" Async}]]] + ["[0]" async (.only Async)]]] [data ["[0]" text [encoding @@ -22,10 +22,10 @@ [meta ["[0]" export]]]] [world - [console {"+" Console}] + [console (.only Console)] ["[0]" file]]]] ["[0]" //// "_" - [command {"+" Command}] + [command (.only Command)] ["/" profile] ["[1][0]" action] ["[1][0]" pom] @@ -33,9 +33,9 @@ ["[1][0]" dependency "_" ["[1]/[0]" deployment] ["[1]/[0]" status]] - ["[1][0]" repository {"+" Repository} + ["[1][0]" repository (.only Repository) ["[1]/[0]" origin]] - ["[1][0]" artifact {"+" Artifact} + ["[1][0]" artifact (.only Artifact) ["[1]/[0]" type]]]) (def: .public snapshot? diff --git a/stdlib/source/program/aedifex/command/deps.lux b/stdlib/source/program/aedifex/command/deps.lux index b6d07d986..f4c9591ce 100644 --- a/stdlib/source/program/aedifex/command/deps.lux +++ b/stdlib/source/program/aedifex/command/deps.lux @@ -2,33 +2,33 @@ [library [lux "*" [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" exception] [concurrency - ["[0]" async {"+" Async}]]] + ["[0]" async (.only Async)]]] [data [collection - ["[0]" set {"+" Set}] + ["[0]" set (.only Set)] ["[0]" list ("[1]#[0]" mix)] ["[0]" dictionary]] [text ["%" format]]] [world - [net {"+" URL}] - [program {"+" Program}] + [net (.only URL)] + [program (.only Program)] ["[0]" file] - ["[0]" console {"+" Console}]]]] + ["[0]" console (.only Console)]]]] ["[0]" // "_" ["[1][0]" clean] ["/[1]" // "_" - [command {"+" Command}] - [repository {"+" Repository}] + [command (.only Command)] + [repository (.only Repository)] ["[1]" profile] - ["[1][0]" action {"+" Action}] - ["[1][0]" artifact {"+" Artifact}] - ["[1][0]" dependency {"+" Dependency} - ["[1]/[0]" resolution {"+" Resolution}] + ["[1][0]" action (.only Action)] + ["[1][0]" artifact (.only Artifact)] + ["[1][0]" dependency (.only Dependency) + ["[1]/[0]" resolution (.only Resolution)] ["[1]/[0]" deployment]]]]) (def: format diff --git a/stdlib/source/program/aedifex/command/install.lux b/stdlib/source/program/aedifex/command/install.lux index aced7165c..fee072b18 100644 --- a/stdlib/source/program/aedifex/command/install.lux +++ b/stdlib/source/program/aedifex/command/install.lux @@ -2,14 +2,14 @@ [library [lux "*" [abstract - [monad {"+" do}]] + [monad (.only do)]] [control - ["[0]" try {"+" Try}] + ["[0]" try (.only Try)] ["[0]" exception] [concurrency - ["[0]" async {"+" Async}]]] + ["[0]" async (.only Async)]]] [data - [binary {"+" Binary}] + [binary (.only Binary)] [text [encoding ["[0]" utf8]]] @@ -24,24 +24,24 @@ [meta ["[0]" export]]]] [world - [program {"+" Program}] + [program (.only Program)] ["[0]" file] - ["[0]" console {"+" Console}]]]] + ["[0]" console (.only Console)]]]] ["[0]" // "_" ["[1][0]" clean] ["/[1]" // "_" - ["/" profile {"+" Profile}] - ["[1][0]" action {"+" Action}] - ["[1][0]" command {"+" Command}] + ["/" profile (.only Profile)] + ["[1][0]" action (.only Action)] + ["[1][0]" command (.only Command)] ["[1][0]" local] ["[1][0]" pom] ["[1][0]" package] - [repository {"+" Repository} + [repository (.only Repository) ["[1][0]" origin]] ["[1][0]" dependency "_" ["[1]/[0]" deployment] ["[1]/[0]" status]] - ["[1][0]" artifact {"+" Artifact} + ["[1][0]" artifact (.only Artifact) ["[1]/[0]" type]]]]) (def: .public success diff --git a/stdlib/source/program/aedifex/command/pom.lux b/stdlib/source/program/aedifex/command/pom.lux index 23c25e7e1..3b443a178 100644 --- a/stdlib/source/program/aedifex/command/pom.lux +++ b/stdlib/source/program/aedifex/command/pom.lux @@ -2,23 +2,23 @@ [library [lux "*" [abstract - [monad {"+" do}]] + [monad (.only do)]] [control - ["[0]" try {"+" Try} ("[1]#[0]" functor)] + ["[0]" try (.only Try) ("[1]#[0]" functor)] [concurrency - ["[0]" async {"+" Async} ("[1]#[0]" monad)]]] + ["[0]" async (.only Async) ("[1]#[0]" monad)]]] [data [text - ["%" format {"+" format}] + ["%" format (.only format)] [encoding ["[0]" utf8]]] [format ["[0]" xml]]] [world ["[0]" file] - ["[0]" console {"+" Console}]]]] + ["[0]" console (.only Console)]]]] ["[0]" /// "_" - [command {"+" Command}] + [command (.only Command)] ["[1][0]" action] ["[1][0]" pom]]) diff --git a/stdlib/source/program/aedifex/command/test.lux b/stdlib/source/program/aedifex/command/test.lux index 1d4da3262..44cdbc1ed 100644 --- a/stdlib/source/program/aedifex/command/test.lux +++ b/stdlib/source/program/aedifex/command/test.lux @@ -2,11 +2,11 @@ [library [lux "*" [abstract - [monad {"+" do}]] + [monad (.only do)]] [control - [try {"+" Try}] + [try (.only Try)] [concurrency - ["[0]" async {"+" Async} ("[1]#[0]" monad)]]] + ["[0]" async (.only Async) ("[1]#[0]" monad)]]] [data [collection ["[0]" dictionary]]] @@ -16,19 +16,19 @@ [number ["i" int]]] [world - ["[0]" program {"+" Program}] + ["[0]" program (.only Program)] ["[0]" file] - ["[0]" shell {"+" Exit Shell}] - ["[0]" console {"+" Console}]]]] + ["[0]" shell (.only Exit Shell)] + ["[0]" console (.only Console)]]]] ["[0]" // "_" ["[1][0]" build] ["/[1]" // "_" ["[1]" profile] ["[1][0]" action] - ["[1][0]" command {"+" Command}] + ["[1][0]" command (.only Command)] ["[1][0]" runtime] [dependency - [resolution {"+" Resolution}]]]]) + [resolution (.only Resolution)]]]]) (def: .public start "[TEST STARTED]") (def: .public success "[TEST ENDED]") diff --git a/stdlib/source/program/aedifex/command/version.lux b/stdlib/source/program/aedifex/command/version.lux index 9c40edd97..7725dcbc2 100644 --- a/stdlib/source/program/aedifex/command/version.lux +++ b/stdlib/source/program/aedifex/command/version.lux @@ -2,18 +2,18 @@ [library [lux "*" [control - [try {"+" Try}] + [try (.only Try)] [concurrency - ["[0]" async {"+" Async}]]] + ["[0]" async (.only Async)]]] ["[0]" meta "_" ["[1]/[0]" version]] [tool [compiler ["[0]" version]]] [world - ["[0]" console {"+" Console}]]]] + ["[0]" console (.only Console)]]]] [/// - [command {"+" Command}]]) + [command (.only Command)]]) (def: .public (do! console profile) (-> (Console Async) (Command Any)) diff --git a/stdlib/source/program/aedifex/dependency.lux b/stdlib/source/program/aedifex/dependency.lux index edeccc15f..fd5e08bee 100644 --- a/stdlib/source/program/aedifex/dependency.lux +++ b/stdlib/source/program/aedifex/dependency.lux @@ -2,16 +2,16 @@ [library [lux {"-" Type} [abstract - [equivalence {"+" Equivalence}] - [order {"+" Order}] - [hash {"+" Hash}]] + [equivalence (.only Equivalence)] + [order (.only Order)] + [hash (.only Hash)]] [data ["[0]" product] ["[0]" text ("[1]#[0]" order) - ["%" format {"+" format}]]]]] + ["%" format (.only format)]]]]] ["[0]" // "_" - ["[1]" artifact {"+" Artifact} ("[1]#[0]" order) - [type {"+" Type}]]]) + ["[1]" artifact (.only Artifact) ("[1]#[0]" order) + [type (.only Type)]]]) (type: .public Dependency (Record diff --git a/stdlib/source/program/aedifex/dependency/deployment.lux b/stdlib/source/program/aedifex/dependency/deployment.lux index c4adf703b..dd4242192 100644 --- a/stdlib/source/program/aedifex/dependency/deployment.lux +++ b/stdlib/source/program/aedifex/dependency/deployment.lux @@ -2,43 +2,43 @@ [library [lux {"-" all} [abstract - [codec {"+" Codec}] - ["[0]" monad {"+" do}]] + [codec (.only Codec)] + ["[0]" monad (.only do)]] [control - ["[0]" try {"+" Try}] + ["[0]" try (.only Try)] [concurrency - ["[0]" async {"+" Async}]]] + ["[0]" async (.only Async)]]] [data - [binary {"+" Binary}] + [binary (.only Binary)] ["[0]" product] [text - ["%" format {"+" format}] + ["%" format (.only format)] [encoding ["[0]" utf8]]] [collection ["[0]" dictionary] - ["[0]" set {"+" Set}] + ["[0]" set (.only Set)] ["[0]" list ("[1]#[0]" monoid)]]] [time - ["[0]" instant {"+" Instant}]]]] + ["[0]" instant (.only Instant)]]]] ["[0]" /// "_" - [repository {"+" Repository}] - ["[1][0]" hash {"+" Hash}] - ["[1][0]" package {"+" Package}] - ["[1][0]" artifact {"+" Artifact} + [repository (.only Repository)] + ["[1][0]" hash (.only Hash)] + ["[1][0]" package (.only Package)] + ["[1][0]" artifact (.only Artifact) ["[1]/[0]" time] ["[1]/[0]" type] - ["[1]/[0]" extension {"+" Extension}] + ["[1]/[0]" extension (.only Extension)] ["[1]/[0]" versioning] ["[1]/[0]" snapshot ["[1]/[0]" version ["[1]/[0]" value]]]] ["[1][0]" metadata "_" ["[1]/[0]" artifact] - ["[1]/[0]" snapshot {"+" Metadata}]] - ["[1][0]" dependency {"+" Dependency} - [resolution {"+" Resolution}] - ["[1]/[0]" status {"+" Status}]]]) + ["[1]/[0]" snapshot (.only Metadata)]] + ["[1][0]" dependency (.only Dependency) + [resolution (.only Resolution)] + ["[1]/[0]" status (.only Status)]]]) (def: (with_status repository version_template [artifact type] [data status]) (-> (Repository Async) ///artifact.Version Dependency [Binary Status] (Async (Try Any))) diff --git a/stdlib/source/program/aedifex/dependency/resolution.lux b/stdlib/source/program/aedifex/dependency/resolution.lux index 753c7d4a4..0e1e9d291 100644 --- a/stdlib/source/program/aedifex/dependency/resolution.lux +++ b/stdlib/source/program/aedifex/dependency/resolution.lux @@ -3,30 +3,30 @@ [lux {"-" all} ["@" target] ["[0]" debug] - ["[0]" ffi {"+" import:}] + ["[0]" ffi (.only import:)] [abstract - [codec {"+" Codec}] - [equivalence {"+" Equivalence}] - [monad {"+" do}] - ["[0]" predicate {"+" Predicate}]] + [codec (.only Codec)] + [equivalence (.only Equivalence)] + [monad (.only do)] + ["[0]" predicate (.only Predicate)]] [control ["[0]" maybe] - ["[0]" try {"+" Try} ("[1]#[0]" functor)] - ["[0]" exception {"+" Exception exception:}] + ["[0]" try (.only Try) ("[1]#[0]" functor)] + ["[0]" exception (.only Exception exception:)] ["<>" parser - ["<[0]>" xml {"+" Parser}]] + ["<[0]>" xml (.only Parser)]] [concurrency - ["[0]" async {"+" Async}]]] + ["[0]" async (.only Async)]]] [data - ["[0]" binary {"+" Binary}] + ["[0]" binary (.only Binary)] ["[0]" text - ["%" format {"+" format}] + ["%" format (.only format)] [encoding ["[0]" utf8]]] [format - ["[0]" xml {"+" Tag XML}]] + ["[0]" xml (.only Tag XML)]] [collection - ["[0]" dictionary {"+" Dictionary}] + ["[0]" dictionary (.only Dictionary)] ["[0]" set] ["[0]" list ("[1]#[0]" functor monoid)]]] [math @@ -34,27 +34,27 @@ ["n" nat] ["[0]" i64]]] [world - [console {"+" Console}] - [net {"+" URL} + [console (.only Console)] + [net (.only URL) ["[0]" uri] ["[0]" http "_" ["[1]" client]]]]]] - ["[0]" // {"+" Dependency} - ["[1][0]" status {"+" Status}] + ["[0]" // (.only Dependency) + ["[1][0]" status (.only Status)] ["/[1]" // "_" ["/" profile] - ["[1][0]" hash {"+" Hash SHA-1 MD5}] + ["[1][0]" hash (.only Hash SHA-1 MD5)] ["[1][0]" pom] - ["[1][0]" package {"+" Package}] - ["[1][0]" artifact {"+" Version Artifact} - ["[1]/[0]" extension {"+" Extension}] + ["[1][0]" package (.only Package)] + ["[1][0]" artifact (.only Version Artifact) + ["[1]/[0]" extension (.only Extension)] ["[1]/[0]" versioning] ["[0]" snapshot [version ["[0]" value]]]] - ["[1][0]" repository {"+" Repository} - ["[1]/[0]" remote {"+" Address}] - ["[1]/[0]" origin {"+" Origin}]] + ["[1][0]" repository (.only Repository) + ["[1]/[0]" remote (.only Address)] + ["[1]/[0]" origin (.only Origin)]] ["[1][0]" metadata ["[1]/[0]" snapshot]]]]) diff --git a/stdlib/source/program/aedifex/dependency/status.lux b/stdlib/source/program/aedifex/dependency/status.lux index 7c66d0688..2d2bb0f3c 100644 --- a/stdlib/source/program/aedifex/dependency/status.lux +++ b/stdlib/source/program/aedifex/dependency/status.lux @@ -2,13 +2,13 @@ [library [lux "*" [abstract - [equivalence {"+" Equivalence}]] + [equivalence (.only Equivalence)]] [data - [binary {"+" Binary}] + [binary (.only Binary)] ["[0]" sum] ["[0]" product]]]] ["[0]" /// "_" - ["[1][0]" hash {"+" Hash SHA-1 MD5}]]) + ["[1][0]" hash (.only Hash SHA-1 MD5)]]) (type: .public Status (Variant diff --git a/stdlib/source/program/aedifex/format.lux b/stdlib/source/program/aedifex/format.lux index 12f676cc7..c48380af2 100644 --- a/stdlib/source/program/aedifex/format.lux +++ b/stdlib/source/program/aedifex/format.lux @@ -4,9 +4,9 @@ [data ["[0]" text ("[1]#[0]" equivalence)] [collection - ["[0]" dictionary {"+" Dictionary}] + ["[0]" dictionary (.only Dictionary)] ["[0]" list ("[1]#[0]" monad)] - ["[0]" set {"+" Set}]]] + ["[0]" set (.only Set)]]] [macro ["[0]" code] ["[0]" template]] @@ -14,13 +14,13 @@ [compiler [meta [cli - [compiler {"+" Compiler}]]]]]]] + [compiler (.only Compiler)]]]]]]] ["[0]" // "_" ["/" profile] - ["[1][0]" runtime {"+" Runtime}] - ["[1][0]" project {"+" Project}] - ["[1][0]" dependency {"+" Dependency}] - ["[1][0]" artifact {"+" Artifact} + ["[1][0]" runtime (.only Runtime)] + ["[1][0]" project (.only Project)] + ["[1][0]" dependency (.only Dependency)] + ["[1][0]" artifact (.only Artifact) ["[1]/[0]" type]]]) (type: .public (Format a) diff --git a/stdlib/source/program/aedifex/hash.lux b/stdlib/source/program/aedifex/hash.lux index bd78f8fe3..3a7b82ef8 100644 --- a/stdlib/source/program/aedifex/hash.lux +++ b/stdlib/source/program/aedifex/hash.lux @@ -1,18 +1,18 @@ (.using [library [lux "*" - ["[0]" ffi {"+" import:}] + ["[0]" ffi (.only import:)] [abstract - [codec {"+" Codec}] - [equivalence {"+" Equivalence}] - [monad {"+" do}]] + [codec (.only Codec)] + [equivalence (.only Equivalence)] + [monad (.only do)]] [control - ["[0]" try {"+" Try}] - ["[0]" exception {"+" exception:}]] + ["[0]" try (.only Try)] + ["[0]" exception (.only exception:)]] [data - ["[0]" binary {"+" Binary}] + ["[0]" binary (.only Binary)] ["[0]" text - ["%" format {"+" Format format}] + ["%" format (.only Format format)] ["[0]" encoding]]] [macro ["^" pattern]] diff --git a/stdlib/source/program/aedifex/input.lux b/stdlib/source/program/aedifex/input.lux index e15fc6552..c964c6cf0 100644 --- a/stdlib/source/program/aedifex/input.lux +++ b/stdlib/source/program/aedifex/input.lux @@ -2,15 +2,15 @@ [library [lux "*" [abstract - ["[0]" monad {"+" Monad do}] + ["[0]" monad (.only Monad do)] ["[0]" mix]] [control ["[0]" pipe] - ["[0]" try {"+" Try}] + ["[0]" try (.only Try)] [parser ["<[0]>" code]]] [data - [binary {"+" Binary}] + [binary (.only Binary)] ["[0]" text [encoding ["[0]" utf8]]] @@ -26,8 +26,8 @@ [world ["[0]" file]]]] ["[0]" // "_" - ["[1][0]" profile {"+" Name Profile}] - ["[1][0]" project {"+" Project}] + ["[1][0]" profile (.only Name Profile)] + ["[1][0]" project (.only Project)] ["[1][0]" parser]]) (def: (lux_parser source_code) diff --git a/stdlib/source/program/aedifex/local.lux b/stdlib/source/program/aedifex/local.lux index 9eb567570..13bfcfe7a 100644 --- a/stdlib/source/program/aedifex/local.lux +++ b/stdlib/source/program/aedifex/local.lux @@ -1,14 +1,14 @@ (.using - [library - [lux "*" - [data - [text - ["%" format {"+" format}]]] - [world - [net - ["[0]" uri {"+" URI}]]]]] - ["[0]" // "_" - ["[1][0]" artifact {"+" Version Artifact}]]) + [library + [lux "*" + [data + [text + ["%" format (.only format)]]] + [world + [net + ["[0]" uri (.only URI)]]]]] + ["[0]" // "_" + ["[1][0]" artifact (.only Version Artifact)]]) (def: / uri.separator) diff --git a/stdlib/source/program/aedifex/metadata.lux b/stdlib/source/program/aedifex/metadata.lux index be3e17b55..67a8e58ed 100644 --- a/stdlib/source/program/aedifex/metadata.lux +++ b/stdlib/source/program/aedifex/metadata.lux @@ -3,13 +3,13 @@ [lux "*" [data ["[0]" text - ["%" format {"+" format}]]] + ["%" format (.only format)]]] [world - [file {"+" Path}] + [file (.only Path)] [net - ["[0]" uri {"+" URI}]]]]] + ["[0]" uri (.only URI)]]]]] ["[0]" // "_" - ["[1][0]" artifact {"+" Artifact}]]) + ["[1][0]" artifact (.only Artifact)]]) (def: remote_file Path diff --git a/stdlib/source/program/aedifex/metadata/artifact.lux b/stdlib/source/program/aedifex/metadata/artifact.lux index 285e1c980..78290aa3c 100644 --- a/stdlib/source/program/aedifex/metadata/artifact.lux +++ b/stdlib/source/program/aedifex/metadata/artifact.lux @@ -2,16 +2,16 @@ [library [lux "*" [abstract - [monad {"+" do}] - [equivalence {"+" Equivalence}]] + [monad (.only do)] + [equivalence (.only Equivalence)]] [control ["[0]" pipe] - ["[0]" try {"+" Try}] + ["[0]" try (.only Try)] ["<>" parser - ["<[0]>" xml {"+" Parser}] + ["<[0]>" xml (.only Parser)] ["<[0]>" text]] [concurrency - ["[0]" async {"+" Async}]]] + ["[0]" async (.only Async)]]] [data ["[0]" product] ["[0]" text @@ -19,24 +19,24 @@ [encoding ["[0]" utf8]]] [format - ["[0]" xml {"+" XML}]] + ["[0]" xml (.only XML)]] [collection ["[0]" list ("[1]#[0]" functor)]]] [math [number ["n" nat]]] - ["[0]" time {"+" Time} - ["[0]" instant {"+" Instant}] - ["[0]" date {"+" Date}] + ["[0]" time (.only Time) + ["[0]" instant (.only Instant)] + ["[0]" date (.only Date)] ["[0]" year] ["[0]" month]] [world [net - ["[0]" uri {"+" URI}]]]]] + ["[0]" uri (.only URI)]]]]] ["[0]" // ["/[1]" // "_" - [repository {"+" Repository}] - ["[1][0]" artifact {"+" Group Name Version Artifact}]]]) + [repository (.only Repository)] + ["[1][0]" artifact (.only Group Name Version Artifact)]]]) (type: .public Metadata (Record diff --git a/stdlib/source/program/aedifex/metadata/snapshot.lux b/stdlib/source/program/aedifex/metadata/snapshot.lux index 1a4c73059..b53d741e6 100644 --- a/stdlib/source/program/aedifex/metadata/snapshot.lux +++ b/stdlib/source/program/aedifex/metadata/snapshot.lux @@ -2,17 +2,17 @@ [library [lux {"-" Type} [abstract - [monad {"+" do}] - [equivalence {"+" Equivalence}]] + [monad (.only do)] + [equivalence (.only Equivalence)]] [control ["[0]" pipe] - ["[0]" try {"+" Try}] - ["[0]" exception {"+" exception:}] + ["[0]" try (.only Try)] + ["[0]" exception (.only exception:)] ["<>" parser - ["<[0]>" xml {"+" Parser}] + ["<[0]>" xml (.only Parser)] ["<[0]>" text]] [concurrency - ["[0]" async {"+" Async}]]] + ["[0]" async (.only Async)]]] [data ["[0]" product] ["[0]" text @@ -20,27 +20,27 @@ [encoding ["[0]" utf8]]] [format - ["[0]" xml {"+" XML}]] + ["[0]" xml (.only XML)]] [collection ["[0]" list ("[1]#[0]" functor)]]] [math [number ["n" nat]]] - ["[0]" time {"+" Time} - ["[0]" instant {"+" Instant}] - ["[0]" date {"+" Date}] + ["[0]" time (.only Time) + ["[0]" instant (.only Instant)] + ["[0]" date (.only Date)] ["[0]" year] ["[0]" month]] [world [net - ["[0]" uri {"+" URI}]]]]] + ["[0]" uri (.only URI)]]]]] ["[0]" // ["/[1]" // "_" - [repository {"+" Repository}] - ["[1][0]" artifact {"+" Group Name Version Artifact} + [repository (.only Repository)] + ["[1][0]" artifact (.only Group Name Version Artifact) ["[1]/[0]" time] - ["[1]/[0]" type {"+" Type}] - ["[1]/[0]" versioning {"+" Versioning}] + ["[1]/[0]" type (.only Type)] + ["[1]/[0]" versioning (.only Versioning)] ["[1]/[0]" snapshot ["[1]/[0]" version] ["[1]/[0]" stamp]]]]]) diff --git a/stdlib/source/program/aedifex/package.lux b/stdlib/source/program/aedifex/package.lux index 2f2a4a157..845173d9b 100644 --- a/stdlib/source/program/aedifex/package.lux +++ b/stdlib/source/program/aedifex/package.lux @@ -2,31 +2,31 @@ [library [lux {"-" local} [abstract - [equivalence {"+" Equivalence}]] + [equivalence (.only Equivalence)]] [control - ["[0]" try {"+" Try} ("[1]#[0]" functor)] + ["[0]" try (.only Try) ("[1]#[0]" functor)] [parser ["<[0]>" xml]]] [data ["[0]" sum] ["[0]" product] - ["[0]" binary {"+" Binary}] + ["[0]" binary (.only Binary)] [text [encoding ["[0]" utf8]]] [format - ["[0]" xml {"+" XML}]] + ["[0]" xml (.only XML)]] [collection - [set {"+" Set}]]]]] + [set (.only Set)]]]]] ["[0]" // "_" ["/" profile] ["[1][0]" hash] ["[1][0]" pom] - [dependency {"+" Dependency} - ["[1][0]" status {"+" Status}]] + [dependency (.only Dependency) + ["[1][0]" status (.only Status)]] [repository - [remote {"+" Address}] - ["[1][0]" origin {"+" Origin}]]]) + [remote (.only Address)] + ["[1][0]" origin (.only Origin)]]]) (type: .public Package (Record diff --git a/stdlib/source/program/aedifex/parser.lux b/stdlib/source/program/aedifex/parser.lux index 5cc914193..573b12ded 100644 --- a/stdlib/source/program/aedifex/parser.lux +++ b/stdlib/source/program/aedifex/parser.lux @@ -2,36 +2,36 @@ [library [lux {"-" Module type} [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" maybe] ["<>" parser ("[1]#[0]" functor) - ["<[0]>" code {"+" Parser}]]] + ["<[0]>" code (.only Parser)]]] [data ["[0]" text] [collection - ["[0]" set {"+" Set}] - ["[0]" dictionary {"+" Dictionary} - ["[0]" plist {"+" PList}]]]] + ["[0]" set (.only Set)] + ["[0]" dictionary (.only Dictionary) + ["[0]" plist (.only PList)]]]] [tool [compiler [meta [cli - [compiler {"+" Compiler}]] + [compiler (.only Compiler)]] [archive [module - [descriptor {"+" Module}]]]]]] + [descriptor (.only Module)]]]]]] [world - [net {"+" URL}]]]] + [net (.only URL)]]]] ["[0]" // "_" ["/" profile] - ["[1][0]" runtime {"+" Runtime}] - ["[1][0]" project {"+" Project}] + ["[1][0]" runtime (.only Runtime)] + ["[1][0]" project (.only Project)] ["[1][0]" dependency] ["[1][0]" format] ["[1][0]" repository "_" ["[1]" remote]] - ["[1][0]" artifact {"+" Artifact} + ["[1][0]" artifact (.only Artifact) ["[1]/[0]" type]]]) (def: (singular input tag parser) diff --git a/stdlib/source/program/aedifex/pom.lux b/stdlib/source/program/aedifex/pom.lux index 2fe4c6de1..7ca781741 100644 --- a/stdlib/source/program/aedifex/pom.lux +++ b/stdlib/source/program/aedifex/pom.lux @@ -2,18 +2,18 @@ [library [lux "*" [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" pipe] ["[0]" maybe ("[1]#[0]" functor)] - ["[0]" try {"+" Try}] + ["[0]" try (.only Try)] ["[0]" exception] ["<>" parser - ["<[0]>" xml {"+" Parser}]]] + ["<[0]>" xml (.only Parser)]]] [data ["[0]" text] [format - ["_" xml {"+" Tag XML}]] + ["_" xml (.only Tag XML)]] [collection ["[0]" list ("[1]#[0]" monoid functor mix)] ["[0]" set] @@ -24,10 +24,10 @@ ["[0]" file]]]] ["[0]" // "_" ["/" profile] - ["[1][0]" dependency {"+" Dependency}] + ["[1][0]" dependency (.only Dependency)] [repository - [remote {"+" Address}]] - ["[1][0]" artifact {"+" Artifact} + [remote (.only Address)]] + ["[1][0]" artifact (.only Artifact) ["[1]/[0]" type]]]) ... https://maven.apache.org/pom.html diff --git a/stdlib/source/program/aedifex/profile.lux b/stdlib/source/program/aedifex/profile.lux index 0c772a641..e093e0bfc 100644 --- a/stdlib/source/program/aedifex/profile.lux +++ b/stdlib/source/program/aedifex/profile.lux @@ -2,42 +2,42 @@ [library [lux {"-" Info Source Module} [abstract - [monoid {"+" Monoid}] - [equivalence {"+" Equivalence}]] + [monoid (.only Monoid)] + [equivalence (.only Equivalence)]] [control ["[0]" maybe ("[1]#[0]" monoid)] - ["[0]" exception {"+" exception:}]] + ["[0]" exception (.only exception:)]] [data ["[0]" product] ["[0]" text ("[1]#[0]" equivalence)] [collection ["[0]" list ("[1]#[0]" monoid)] - ["[0]" set {"+" Set}] - ["[0]" dictionary {"+" Dictionary} - ["[0]" plist {"+" PList} ("[1]#[0]" monoid)]]]] + ["[0]" set (.only Set)] + ["[0]" dictionary (.only Dictionary) + ["[0]" plist (.only PList) ("[1]#[0]" monoid)]]]] [macro ["^" pattern] ["[0]" template]] [meta ["[0]" symbol]] [world - [net {"+" URL}] - [file {"+" Path}]] + [net (.only URL)] + [file (.only Path)]] [tool [compiler [meta ["[0]" cli - ["[0]" compiler {"+" Compiler}]] + ["[0]" compiler (.only Compiler)]] [archive [module - [descriptor {"+" Module}]]]]]]]] + [descriptor (.only Module)]]]]]]]] [// - ["[0]" runtime {"+" Runtime} ("[1]#[0]" equivalence)] - ["[0]" dependency {"+" Dependency} ("[1]#[0]" equivalence)] - ["[0]" artifact {"+" Artifact} + ["[0]" runtime (.only Runtime) ("[1]#[0]" equivalence)] + ["[0]" dependency (.only Dependency) ("[1]#[0]" equivalence)] + ["[0]" artifact (.only Artifact) ["[0]" type]] [repository - [remote {"+" Address}]]]) + [remote (.only Address)]]]) (def: .public default_lux Dependency diff --git a/stdlib/source/program/aedifex/project.lux b/stdlib/source/program/aedifex/project.lux index 71a9a0381..a1f43c7b8 100644 --- a/stdlib/source/program/aedifex/project.lux +++ b/stdlib/source/program/aedifex/project.lux @@ -2,21 +2,21 @@ [library [lux "*" [abstract - [equivalence {"+" Equivalence}] - [monoid {"+" Monoid}] - ["[0]" monad {"+" do}]] + [equivalence (.only Equivalence)] + [monoid (.only Monoid)] + ["[0]" monad (.only do)]] [control - ["[0]" try {"+" Try}] - ["[0]" exception {"+" exception:}]] + ["[0]" try (.only Try)] + ["[0]" exception (.only exception:)]] [data ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection - ["[0]" dictionary {"+" Dictionary}] - ["[0]" set {"+" Set}] + ["[0]" dictionary (.only Dictionary)] + ["[0]" set (.only Set)] ["[0]" list ("[1]#[0]" mix)]]]]] ["[0]" // "_" - ["[1]" profile {"+" Name Profile}]]) + ["[1]" profile (.only Name Profile)]]) (def: .public file "project.lux") diff --git a/stdlib/source/program/aedifex/repository.lux b/stdlib/source/program/aedifex/repository.lux index b44be720f..900855124 100644 --- a/stdlib/source/program/aedifex/repository.lux +++ b/stdlib/source/program/aedifex/repository.lux @@ -2,18 +2,18 @@ [library [lux "*" [abstract - [monad {"+" do}]] + [monad (.only do)]] [control - [io {"+" IO}] - ["[0]" try {"+" Try}] + [io (.only IO)] + ["[0]" try (.only Try)] [concurrency - ["[0]" async {"+" Async}] + ["[0]" async (.only Async)] ["[0]" stm]]] [data - [binary {"+" Binary}]] + [binary (.only Binary)]] [world [net - [uri {"+" URI}]]]]]) + [uri (.only URI)]]]]]) (type: .public (Repository !) (Interface diff --git a/stdlib/source/program/aedifex/repository/identity.lux b/stdlib/source/program/aedifex/repository/identity.lux index 88664a868..5bea5c2c8 100644 --- a/stdlib/source/program/aedifex/repository/identity.lux +++ b/stdlib/source/program/aedifex/repository/identity.lux @@ -1,13 +1,13 @@ (.using [library [lux "*" - ["[0]" ffi {"+" import:}] + ["[0]" ffi (.only import:)] [abstract - [equivalence {"+" Equivalence}]] + [equivalence (.only Equivalence)]] [data ["[0]" product] ["[0]" text - ["%" format {"+" format}] + ["%" format (.only format)] [encoding ["[0]" utf8]]]]]]) diff --git a/stdlib/source/program/aedifex/repository/local.lux b/stdlib/source/program/aedifex/repository/local.lux index 2c6ff8b9b..0721e8526 100644 --- a/stdlib/source/program/aedifex/repository/local.lux +++ b/stdlib/source/program/aedifex/repository/local.lux @@ -2,19 +2,19 @@ [library [lux "*" [abstract - [monad {"+" do}]] + [monad (.only do)]] [control - ["[0]" try {"+" Try}] + ["[0]" try (.only Try)] [concurrency - ["[0]" async {"+" Async}]]] + ["[0]" async (.only Async)]]] [data ["[0]" text - ["%" format {"+" format}]]] + ["%" format (.only format)]]] [world - [program {"+" Program}] + [program (.only Program)] ["[0]" file] [net - ["[0]" uri {"+" URI}]]]]] + ["[0]" uri (.only URI)]]]]] ["[0]" // ["/[1]" // "_" ["[1][0]" local] diff --git a/stdlib/source/program/aedifex/repository/origin.lux b/stdlib/source/program/aedifex/repository/origin.lux index 624ef1e10..6af12153b 100644 --- a/stdlib/source/program/aedifex/repository/origin.lux +++ b/stdlib/source/program/aedifex/repository/origin.lux @@ -2,13 +2,13 @@ [library [lux "*" [abstract - [equivalence {"+" Equivalence}]] + [equivalence (.only Equivalence)]] [data ["[0]" sum] ["[0]" text]] [world - [file {"+" Path}] - [net {"+" URL}]]]]) + [file (.only Path)] + [net (.only URL)]]]]) (type: .public Origin (Variant diff --git a/stdlib/source/program/aedifex/repository/remote.lux b/stdlib/source/program/aedifex/repository/remote.lux index 313be177b..c3c77f65b 100644 --- a/stdlib/source/program/aedifex/repository/remote.lux +++ b/stdlib/source/program/aedifex/repository/remote.lux @@ -2,32 +2,32 @@ [library [lux "*" [abstract - [monad {"+" do}]] + [monad (.only do)]] [control - ["[0]" io {"+" IO}] - ["[0]" try {"+" Try}] - ["[0]" exception {"+" exception:}]] + ["[0]" io (.only IO)] + ["[0]" try (.only Try)] + ["[0]" exception (.only exception:)]] [data ["[0]" product] [text - ["%" format {"+" format}]]] + ["%" format (.only format)]]] ["[0]" meta "_" ["[1]/[0]" version]] [tool [compiler ["[0]" version]]] [world - [net {"+" URL} - [uri {"+" URI}] + [net (.only URL) + [uri (.only URI)] ["[0]" http "_" ["[1]" client] ["[1]/[0]" status] ["@[1]" /]]]]]] ["[0]" // - ["[1][0]" identity {"+" Identity}] + ["[1][0]" identity (.only Identity)] ["/[1]" // "_" - ["[1][0]" artifact {"+" Version Artifact} - [extension {"+" Extension}]]]]) + ["[1][0]" artifact (.only Version Artifact) + [extension (.only Extension)]]]]) (type: .public Address URL) diff --git a/stdlib/source/program/aedifex/runtime.lux b/stdlib/source/program/aedifex/runtime.lux index 7ba5e8f9b..d67ec0f36 100644 --- a/stdlib/source/program/aedifex/runtime.lux +++ b/stdlib/source/program/aedifex/runtime.lux @@ -2,14 +2,14 @@ [library [lux {"-" for} [abstract - [equivalence {"+" Equivalence}]] + [equivalence (.only Equivalence)]] [data ["[0]" product] ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" monoid)] - ["[0]" dictionary {"+" Dictionary}]]] + ["[0]" dictionary (.only Dictionary)]]] [macro ["[0]" template]] [world diff --git a/stdlib/source/program/compositor.lux b/stdlib/source/program/compositor.lux index 0d5b056d1..b1af66672 100644 --- a/stdlib/source/program/compositor.lux +++ b/stdlib/source/program/compositor.lux @@ -1,24 +1,24 @@ (.using [library [lux {"-" Module} - [type {"+" sharing}] + [type (.only sharing)] ["@" target] ["[0]" debug] [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control - ["[0]" io {"+" IO io}] + ["[0]" io (.only IO io)] ["[0]" maybe] - ["[0]" try {"+" Try}] + ["[0]" try (.only Try)] [concurrency - ["[0]" async {"+" Async} ("[1]#[0]" monad)]]] + ["[0]" async (.only Async) ("[1]#[0]" monad)]]] [data - [binary {"+" Binary}] + [binary (.only Binary)] ["[0]" product] ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection - ["[0]" dictionary {"+" Dictionary}]]] + ["[0]" dictionary (.only Dictionary)]]] [time ["[0]" instant]] ["[0]" world "_" @@ -29,29 +29,29 @@ ["[0]" compiler ["[0]" phase] [default - ["[0]" platform {"+" Platform}]] + ["[0]" platform (.only Platform)]] [language ["$" lux - ["[1]/[0]" program {"+" Program}] + ["[1]/[0]" program (.only Program)] ["[0]" syntax] ["[0]" generation] ["[0]" directive] ["[0]" analysis - [macro {"+" Expander}]] + [macro (.only Expander)]] [phase - [extension {"+" Extender}]]]] + [extension (.only Extender)]]]] [meta - [packager {"+" Packager}] - [context {"+" Context}] - ["[0]" cli {"+" Service}] + [packager (.only Packager)] + [context (.only Context)] + ["[0]" cli (.only Service)] ["[0]" import] ["[0]" export] ["[0]" cache "_" ["[1]" archive]] - [archive {"+" Archive} + [archive (.only Archive) ["[0]" unit] [module - [descriptor {"+" Module}]]] + [descriptor (.only Module)]]] [io ["ioW" archive]]]] ... ["[0]" interpreter] diff --git a/stdlib/source/specification/aedifex/repository.lux b/stdlib/source/specification/aedifex/repository.lux index 699a6cc52..d3a674857 100644 --- a/stdlib/source/specification/aedifex/repository.lux +++ b/stdlib/source/specification/aedifex/repository.lux @@ -1,13 +1,13 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control - ["[0]" try {"+" Try}] + ["[0]" try (.only Try)] [concurrency - ["[0]" async {"+" Async}]]] + ["[0]" async (.only Async)]]] [data ["[0]" binary ["_[1]" \\test]]] @@ -17,7 +17,7 @@ ["[0]" / ["[1][0]" remote] ["/[1]" // "_" - ["[1][0]" artifact {"+" Artifact} + ["[1][0]" artifact (.only Artifact) ["[1]/[0]" extension]]]]] [\\test ["_[0]" // "_" diff --git a/stdlib/source/specification/compositor.lux b/stdlib/source/specification/compositor.lux index ebf509498..8d17e5f48 100644 --- a/stdlib/source/specification/compositor.lux +++ b/stdlib/source/specification/compositor.lux @@ -1,10 +1,10 @@ (.using [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control - ["[0]" io {"+" IO}] + ["[0]" io (.only IO)] ["[0]" try]] [math ["r" random]] @@ -13,12 +13,12 @@ ["[0]" analysis] ["[0]" directive] [phase - [macro {"+" Expander}] - [generation {"+" Bundle}]] + [macro (.only Expander)] + [generation (.only Bundle)]] [default - [platform {"+" Platform}]]]]] + [platform (.only Platform)]]]]] ["[0]" / "_" - ["[1][0]" common {"+" Runner Definer}] + ["[1][0]" common (.only Runner Definer)] ["[1]./" analysis "_" ["[1][0]" type]] ["[1]./" generation "_" diff --git a/stdlib/source/specification/compositor/analysis/type.lux b/stdlib/source/specification/compositor/analysis/type.lux index 2cbc93cea..0f1be3da9 100644 --- a/stdlib/source/specification/compositor/analysis/type.lux +++ b/stdlib/source/specification/compositor/analysis/type.lux @@ -1,21 +1,21 @@ (.using [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" pipe] ["[0]" io] ["[0]" try]] [math - ["r" random {"+" Random}]] + ["r" random (.only Random)]] [macro ["[0]" code]] [tool [compiler - [analysis {"+" State+}] + [analysis (.only State+)] ["[0]" phase - [macro {"+" Expander}] + [macro (.only Expander)] ["[0]" analysis ["[1]/[0]" scope] ["[1]/[0]" type]]]]]]) diff --git a/stdlib/source/specification/compositor/common.lux b/stdlib/source/specification/compositor/common.lux index 58546822c..483468015 100644 --- a/stdlib/source/specification/compositor/common.lux +++ b/stdlib/source/specification/compositor/common.lux @@ -1,23 +1,23 @@ (.using [lux "*" [abstract - [monad {"+" do}]] + [monad (.only do)]] [control - ["[0]" io {"+" IO}] - ["[0]" try {"+" Try}]] + ["[0]" io (.only IO)] + ["[0]" try (.only Try)]] [tool [compiler ["[0]" reference] ["[0]" analysis] - ["[0]" synthesis {"+" Synthesis}] + ["[0]" synthesis (.only Synthesis)] ["[0]" directive] ["[0]" phase - ["[0]" macro {"+" Expander}] - ["[0]" generation {"+" Operation}] - [extension {"+" Extender} + ["[0]" macro (.only Expander)] + ["[0]" generation (.only Operation)] + [extension (.only Extender) ["[0]" bundle]]] [default - ["[0]" platform {"+" Platform}]]]]]) + ["[0]" platform (.only Platform)]]]]]) (type: .public Runner (-> Text Synthesis (Try Any))) diff --git a/stdlib/source/specification/compositor/generation/case.lux b/stdlib/source/specification/compositor/generation/case.lux index 1e5502e17..bfc499232 100644 --- a/stdlib/source/specification/compositor/generation/case.lux +++ b/stdlib/source/specification/compositor/generation/case.lux @@ -1,32 +1,32 @@ (.using [lux {"-" case} - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" pipe] - ["[0]" try {"+" Try}]] + ["[0]" try (.only Try)]] [data ["[0]" text ("[1]#[0]" equivalence) - ["%" format {"+" format}]] + ["%" format (.only format)]] [number ["n" nat] ["f" frac]] [collection ["[0]" list ("[1]#[0]" mix)]]] [math - ["r" random {"+" Random}]] + ["r" random (.only Random)]] [tool [compiler ["[0]" reference] ["[0]" analysis] - ["[0]" synthesis {"+" Path Synthesis}] + ["[0]" synthesis (.only Path Synthesis)] ["[0]" phase ["[1]/[0]" synthesis ["[0]" case]] ["[0]" extension/synthesis]]]]] [/// - [common {"+" Runner}]]) + [common (.only Runner)]]) (def: limit Nat 10) diff --git a/stdlib/source/specification/compositor/generation/common.lux b/stdlib/source/specification/compositor/generation/common.lux index e93a46c29..b20c2e646 100644 --- a/stdlib/source/specification/compositor/generation/common.lux +++ b/stdlib/source/specification/compositor/generation/common.lux @@ -1,11 +1,11 @@ (.using [lux {"-" i64} - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" pipe] - ["[0]" try {"+" Try}]] + ["[0]" try (.only Try)]] [data ["[0]" bit ("[1]#[0]" equivalence)] [number @@ -14,13 +14,13 @@ ["i" int] ["f" frac]] ["[0]" text ("[1]#[0]" equivalence) - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list]]] [macro ["^" pattern]] [math - ["r" random {"+" Random}]] + ["r" random (.only Random)]] [tool [compiler ["[0]" reference] @@ -28,7 +28,7 @@ ["[0]" // "_" ["[1][0]" case] [// - [common {"+" Runner}]]]) + [common (.only Runner)]]]) (def: safe (-> Text Text) diff --git a/stdlib/source/specification/compositor/generation/function.lux b/stdlib/source/specification/compositor/generation/function.lux index 33db49436..b49305c50 100644 --- a/stdlib/source/specification/compositor/generation/function.lux +++ b/stdlib/source/specification/compositor/generation/function.lux @@ -1,8 +1,8 @@ (.using [lux {"-" function} - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] ["[0]" enum]] [control ["[0]" maybe]] @@ -12,16 +12,16 @@ [collection ["[0]" list ("[1]#[0]" functor)]]] [math - ["r" random {"+" Random} ("[1]#[0]" monad)]] + ["r" random (.only Random) ("[1]#[0]" monad)]] [tool [compiler - [analysis {"+" Arity}] - ["[0]" reference {"+" Register}] - ["[0]" synthesis {"+" Synthesis}]]]] + [analysis (.only Arity)] + ["[0]" reference (.only Register)] + ["[0]" synthesis (.only Synthesis)]]]] ["[0]" // "_" ["[1][0]" case] [// - [common {"+" Runner}]]]) + [common (.only Runner)]]]) (def: max_arity Arity diff --git a/stdlib/source/specification/compositor/generation/primitive.lux b/stdlib/source/specification/compositor/generation/primitive.lux index d79b226c3..6e61088c4 100644 --- a/stdlib/source/specification/compositor/generation/primitive.lux +++ b/stdlib/source/specification/compositor/generation/primitive.lux @@ -1,8 +1,8 @@ (.using [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" pipe] ["[0]" try]] @@ -11,14 +11,14 @@ [number ["f" frac]] ["[0]" text ("[1]#[0]" equivalence) - ["%" format {"+" format}]]] + ["%" format (.only format)]]] [math ["r" random]] [tool [compiler ["[0]" synthesis]]]] [/// - [common {"+" Runner}]]) + [common (.only Runner)]]) (def: (f/=' reference subject) (-> Frac Frac Bit) diff --git a/stdlib/source/specification/compositor/generation/reference.lux b/stdlib/source/specification/compositor/generation/reference.lux index f0893573f..56bb78a2f 100644 --- a/stdlib/source/specification/compositor/generation/reference.lux +++ b/stdlib/source/specification/compositor/generation/reference.lux @@ -1,8 +1,8 @@ (.using [lux {"-" symbol} - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" pipe] ["[0]" try]] @@ -15,9 +15,9 @@ ["[0]" reference] ["[0]" synthesis]]] [math - ["r" random {"+" Random}]]] + ["r" random (.only Random)]]] [/// - [common {"+" Runner Definer}]]) + [common (.only Runner Definer)]]) (def: symbol (Random Symbol) diff --git a/stdlib/source/specification/compositor/generation/structure.lux b/stdlib/source/specification/compositor/generation/structure.lux index 3080f6abd..79e6374fb 100644 --- a/stdlib/source/specification/compositor/generation/structure.lux +++ b/stdlib/source/specification/compositor/generation/structure.lux @@ -1,8 +1,8 @@ (.using [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" pipe] ["[0]" maybe] @@ -12,19 +12,19 @@ ["n" nat] ["i" int]] ["[0]" text ("[1]#[0]" equivalence) - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection - ["[0]" array {"+" Array}] + ["[0]" array (.only Array)] ["[0]" list ("[1]#[0]" functor)]]] [math ["r" random]] - ["[0]" ffi {"+" import:}] + ["[0]" ffi (.only import:)] [tool [compiler ["[0]" analysis] ["[0]" synthesis]]]] [/// - [common {"+" Runner}]]) + [common (.only Runner)]]) (import: java/lang/Integer) diff --git a/stdlib/source/specification/lux/abstract/apply.lux b/stdlib/source/specification/lux/abstract/apply.lux index 3266925ce..b60c62b35 100644 --- a/stdlib/source/specification/lux/abstract/apply.lux +++ b/stdlib/source/specification/lux/abstract/apply.lux @@ -1,20 +1,20 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] ["[0]" type] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" function]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat]]]]] [\\library - ["[0]" / {"+" Apply}]] + ["[0]" / (.only Apply)]] [// - [functor {"+" Injection Comparison}]]) + [functor (.only Injection Comparison)]]) (def: (identity injection comparison (open "/#[0]")) (All (_ f) (-> (Injection f) (Comparison f) (Apply f) Test)) diff --git a/stdlib/source/specification/lux/abstract/codec.lux b/stdlib/source/specification/lux/abstract/codec.lux index af4a3b157..b191fe625 100644 --- a/stdlib/source/specification/lux/abstract/codec.lux +++ b/stdlib/source/specification/lux/abstract/codec.lux @@ -1,17 +1,17 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" try]] [math - ["[0]" random {"+" Random}]]]] + ["[0]" random (.only Random)]]]] [\\library ["[0]" / [// - [equivalence {"+" Equivalence}]]]]) + [equivalence (.only Equivalence)]]]]) (def: .public (spec (open "@//[0]") (open "@//[0]") generator) (All (_ m a) (-> (Equivalence a) (/.Codec m a) (Random a) Test)) diff --git a/stdlib/source/specification/lux/abstract/comonad.lux b/stdlib/source/specification/lux/abstract/comonad.lux index 4ef7f6b22..54abaf10a 100644 --- a/stdlib/source/specification/lux/abstract/comonad.lux +++ b/stdlib/source/specification/lux/abstract/comonad.lux @@ -1,17 +1,17 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [math ["[0]" random] [number ["n" nat]]]]] [\\library - ["[0]" / {"+" CoMonad}]] + ["[0]" / (.only CoMonad)]] [// - [functor {"+" Injection Comparison}]]) + [functor (.only Injection Comparison)]]) (def: (left_identity injection (open "_//[0]")) (All (_ f) (-> (Injection f) (CoMonad f) Test)) diff --git a/stdlib/source/specification/lux/abstract/enum.lux b/stdlib/source/specification/lux/abstract/enum.lux index 572550645..28fb43653 100644 --- a/stdlib/source/specification/lux/abstract/enum.lux +++ b/stdlib/source/specification/lux/abstract/enum.lux @@ -1,11 +1,11 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [math - ["[0]" random {"+" Random}]]]] + ["[0]" random (.only Random)]]]] [\\library ["[0]" /]]) diff --git a/stdlib/source/specification/lux/abstract/equivalence.lux b/stdlib/source/specification/lux/abstract/equivalence.lux index 21b425f3d..6088ac6d3 100644 --- a/stdlib/source/specification/lux/abstract/equivalence.lux +++ b/stdlib/source/specification/lux/abstract/equivalence.lux @@ -1,15 +1,15 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [data ["[0]" bit ("[1]#[0]" equivalence)]] [math - ["[0]" random {"+" Random}]]]] + ["[0]" random (.only Random)]]]] [\\library - ["[0]" / {"+" Equivalence}]]) + ["[0]" / (.only Equivalence)]]) (def: .public (spec (open "/#[0]") random) (All (_ a) (-> (Equivalence a) (Random a) Test)) diff --git a/stdlib/source/specification/lux/abstract/functor.lux b/stdlib/source/specification/lux/abstract/functor.lux index 9e2110a97..f01646fbe 100644 --- a/stdlib/source/specification/lux/abstract/functor.lux +++ b/stdlib/source/specification/lux/abstract/functor.lux @@ -1,10 +1,10 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [equivalence {"+" Equivalence}] - [monad {"+" do}]] + [equivalence (.only Equivalence)] + [monad (.only do)]] [control ["[0]" function]] [math @@ -12,7 +12,7 @@ [number ["n" nat]]]]] [\\library - ["[0]" / {"+" Functor}]]) + ["[0]" / (.only Functor)]]) (type: .public (Injection f) (All (_ a) (-> a (f a)))) diff --git a/stdlib/source/specification/lux/abstract/functor/contravariant.lux b/stdlib/source/specification/lux/abstract/functor/contravariant.lux index 291476eb4..9256f6019 100644 --- a/stdlib/source/specification/lux/abstract/functor/contravariant.lux +++ b/stdlib/source/specification/lux/abstract/functor/contravariant.lux @@ -1,10 +1,10 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [equivalence {"+" Equivalence}] - [monad {"+" do}]] + [equivalence (.only Equivalence)] + [monad (.only do)]] [control ["[0]" function]] [math @@ -12,7 +12,7 @@ [number ["n" nat]]]]] [\\library - ["[0]" / {"+" Functor}]]) + ["[0]" / (.only Functor)]]) (def: (identity equivalence value (open "@//[0]")) (All (_ f a) (-> (Equivalence (f a)) (f a) (Functor f) Test)) diff --git a/stdlib/source/specification/lux/abstract/hash.lux b/stdlib/source/specification/lux/abstract/hash.lux index 29b5a2a2f..0bc4e5e24 100644 --- a/stdlib/source/specification/lux/abstract/hash.lux +++ b/stdlib/source/specification/lux/abstract/hash.lux @@ -1,11 +1,11 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat]]]]] [\\library diff --git a/stdlib/source/specification/lux/abstract/interval.lux b/stdlib/source/specification/lux/abstract/interval.lux index 10e18cd81..d146570fa 100644 --- a/stdlib/source/specification/lux/abstract/interval.lux +++ b/stdlib/source/specification/lux/abstract/interval.lux @@ -1,12 +1,12 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] ["[0]" order]] [math - ["[0]" random {"+" Random}]]]] + ["[0]" random (.only Random)]]]] [\\library ["[0]" /]]) diff --git a/stdlib/source/specification/lux/abstract/mix.lux b/stdlib/source/specification/lux/abstract/mix.lux index 57b900a03..877715bfc 100644 --- a/stdlib/source/specification/lux/abstract/mix.lux +++ b/stdlib/source/specification/lux/abstract/mix.lux @@ -1,15 +1,15 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [math ["[0]" random] [number ["n" nat]]]]] [// - [functor {"+" Injection Comparison}]] + [functor (.only Injection Comparison)]] [\\library ["[0]" /]]) diff --git a/stdlib/source/specification/lux/abstract/monad.lux b/stdlib/source/specification/lux/abstract/monad.lux index 4344e5236..e7b894663 100644 --- a/stdlib/source/specification/lux/abstract/monad.lux +++ b/stdlib/source/specification/lux/abstract/monad.lux @@ -1,15 +1,15 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [math ["[0]" random] [number ["n" nat]]]]] [\\library - ["[0]" / {"+" do}]] + ["[0]" / (.only do)]] [// - [functor {"+" Injection Comparison}]]) + [functor (.only Injection Comparison)]]) (def: (left_identity injection comparison (open "_//[0]")) (All (_ f) (-> (Injection f) (Comparison f) (/.Monad f) Test)) diff --git a/stdlib/source/specification/lux/abstract/monoid.lux b/stdlib/source/specification/lux/abstract/monoid.lux index 815cf8c4d..dfed33ce8 100644 --- a/stdlib/source/specification/lux/abstract/monoid.lux +++ b/stdlib/source/specification/lux/abstract/monoid.lux @@ -1,15 +1,15 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [math - ["[0]" random {"+" Random}]]]] + ["[0]" random (.only Random)]]]] [\\library ["[0]" / [// - [equivalence {"+" Equivalence}]]]]) + [equivalence (.only Equivalence)]]]]) (def: .public (spec (open "_#[0]") (open "_#[0]") gen_sample) (All (_ a) (-> (Equivalence a) (/.Monoid a) (Random a) Test)) diff --git a/stdlib/source/specification/lux/abstract/order.lux b/stdlib/source/specification/lux/abstract/order.lux index 18d6b845f..e36c9ea61 100644 --- a/stdlib/source/specification/lux/abstract/order.lux +++ b/stdlib/source/specification/lux/abstract/order.lux @@ -1,11 +1,11 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [math - ["[0]" random {"+" Random}]]]] + ["[0]" random (.only Random)]]]] [\\library ["[0]" /]]) diff --git a/stdlib/source/specification/lux/world/console.lux b/stdlib/source/specification/lux/world/console.lux index 38bb5ed8b..c767d5e71 100644 --- a/stdlib/source/specification/lux/world/console.lux +++ b/stdlib/source/specification/lux/world/console.lux @@ -1,17 +1,17 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control - [io {"+" IO}] + [io (.only IO)] ["[0]" try] [concurrency - ["[0]" async {"+" Async}]]] + ["[0]" async (.only Async)]]] [data ["[0]" text - ["%" format {"+" format}]]] + ["%" format (.only format)]]] [math ["[0]" random]]]] [\\library diff --git a/stdlib/source/specification/lux/world/file.lux b/stdlib/source/specification/lux/world/file.lux index da20b8d30..27464c304 100644 --- a/stdlib/source/specification/lux/world/file.lux +++ b/stdlib/source/specification/lux/world/file.lux @@ -1,23 +1,23 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] ["[0]" predicate]] [control - [io {"+" IO}] + [io (.only IO)] ["[0]" maybe ("[1]#[0]" functor)] ["[0]" try ("[1]#[0]" functor)] ["[0]" exception] [concurrency - ["[0]" async {"+" Async}]]] + ["[0]" async (.only Async)]]] [data ["[0]" text ("[1]#[0]" equivalence) - ["%" format {"+" format}] + ["%" format (.only format)] [encoding ["[0]" utf8 ("[1]#[0]" codec)]]] - ["[0]" binary {"+" Binary} ("[1]#[0]" equivalence monoid) + ["[0]" binary (.only Binary) ("[1]#[0]" equivalence monoid) ["$[1]" \\test]] [collection ["[0]" list]]] @@ -26,7 +26,7 @@ [number ["n" nat]]] [time - ["[0]" instant {"+" Instant} ("[1]#[0]" equivalence)]]]] + ["[0]" instant (.only Instant) ("[1]#[0]" equivalence)]]]] [\\library ["[0]" /]]) diff --git a/stdlib/source/specification/lux/world/program.lux b/stdlib/source/specification/lux/world/program.lux index 08392541c..5302deca4 100644 --- a/stdlib/source/specification/lux/world/program.lux +++ b/stdlib/source/specification/lux/world/program.lux @@ -1,13 +1,13 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" try] [concurrency - ["[0]" async {"+" Async}]]] + ["[0]" async (.only Async)]]] [data ["[0]" text] [collection diff --git a/stdlib/source/specification/lux/world/shell.lux b/stdlib/source/specification/lux/world/shell.lux index 7d136b7e1..8a173d696 100644 --- a/stdlib/source/specification/lux/world/shell.lux +++ b/stdlib/source/specification/lux/world/shell.lux @@ -1,19 +1,19 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" try ("[1]#[0]" functor)] [concurrency - ["[0]" async {"+" Async} ("[1]#[0]" monad)]] + ["[0]" async (.only Async) ("[1]#[0]" monad)]] [parser - ["[0]" environment {"+" Environment}]]] + ["[0]" environment (.only Environment)]]] [data ["[0]" product] ["[0]" text ("[1]#[0]" equivalence) - ["%" format {"+" format}]]] + ["%" format (.only format)]]] [math ["[0]" random] [number @@ -22,7 +22,7 @@ [\\library ["[0]" / [// - [file {"+" Path}]]]]) + [file (.only Path)]]]]) (template [<name> <command> <type> <prep>] [(def: <name> diff --git a/stdlib/source/test/aedifex.lux b/stdlib/source/test/aedifex.lux index ed891d815..2015da3d7 100644 --- a/stdlib/source/test/aedifex.lux +++ b/stdlib/source/test/aedifex.lux @@ -1,8 +1,8 @@ (.using [library [lux "*" - [program {"+" program:}] - ["_" test {"+" Test}] + [program (.only program:)] + ["_" test (.only Test)] [control ["[0]" io]]]] ["[0]" / "_" diff --git a/stdlib/source/test/aedifex/artifact.lux b/stdlib/source/test/aedifex/artifact.lux index 150724ade..7cbf804c5 100644 --- a/stdlib/source/test/aedifex/artifact.lux +++ b/stdlib/source/test/aedifex/artifact.lux @@ -1,10 +1,10 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] - [hash {"+" Hash}] + [monad (.only do)] + [hash (.only Hash)] [\\specification ["$[0]" equivalence] ["$[0]" order] @@ -12,7 +12,7 @@ [data ["[0]" text ("[1]#[0]" equivalence)]] [math - ["[0]" random {"+" Random}]] + ["[0]" random (.only Random)]] [world ["[0]" file] [net diff --git a/stdlib/source/test/aedifex/artifact/extension.lux b/stdlib/source/test/aedifex/artifact/extension.lux index ab6bc4949..b9184c15a 100644 --- a/stdlib/source/test/aedifex/artifact/extension.lux +++ b/stdlib/source/test/aedifex/artifact/extension.lux @@ -1,16 +1,16 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [data ["[0]" text ("[1]#[0]" equivalence)] [collection ["[0]" set] ["[0]" list]]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat]]]]] [\\program diff --git a/stdlib/source/test/aedifex/artifact/snapshot.lux b/stdlib/source/test/aedifex/artifact/snapshot.lux index e44ba514c..b09095646 100644 --- a/stdlib/source/test/aedifex/artifact/snapshot.lux +++ b/stdlib/source/test/aedifex/artifact/snapshot.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence]]] [control @@ -11,7 +11,7 @@ [parser ["<[0]>" xml]]] [math - ["[0]" random {"+" Random} ("[1]#[0]" monad)]]]] + ["[0]" random (.only Random) ("[1]#[0]" monad)]]]] ["$[0]" / "_" ["[1][0]" build] ["[1][0]" stamp] diff --git a/stdlib/source/test/aedifex/artifact/snapshot/build.lux b/stdlib/source/test/aedifex/artifact/snapshot/build.lux index 36267e060..8a722c72a 100644 --- a/stdlib/source/test/aedifex/artifact/snapshot/build.lux +++ b/stdlib/source/test/aedifex/artifact/snapshot/build.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence]]] [control @@ -11,7 +11,7 @@ [parser ["<[0]>" xml]]] [math - ["[0]" random {"+" Random}]]]] + ["[0]" random (.only Random)]]]] [\\program ["[0]" /]]) diff --git a/stdlib/source/test/aedifex/artifact/snapshot/stamp.lux b/stdlib/source/test/aedifex/artifact/snapshot/stamp.lux index 25134c0cb..54aa5d8af 100644 --- a/stdlib/source/test/aedifex/artifact/snapshot/stamp.lux +++ b/stdlib/source/test/aedifex/artifact/snapshot/stamp.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence]]] [control @@ -11,7 +11,7 @@ [parser ["<[0]>" xml]]] [math - ["[0]" random {"+" Random}]] + ["[0]" random (.only Random)]] [time ["[0]" instant]]]] [\\program diff --git a/stdlib/source/test/aedifex/artifact/snapshot/time.lux b/stdlib/source/test/aedifex/artifact/snapshot/time.lux index cde73c729..1e40d43d7 100644 --- a/stdlib/source/test/aedifex/artifact/snapshot/time.lux +++ b/stdlib/source/test/aedifex/artifact/snapshot/time.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence]]] [control @@ -11,7 +11,7 @@ [parser ["<[0]>" text]]] [math - ["[0]" random {"+" Random}]]]] + ["[0]" random (.only Random)]]]] [\\program ["[0]" /]] ["$[0]" /// "_" diff --git a/stdlib/source/test/aedifex/artifact/snapshot/version.lux b/stdlib/source/test/aedifex/artifact/snapshot/version.lux index 53e45aa9e..951e78380 100644 --- a/stdlib/source/test/aedifex/artifact/snapshot/version.lux +++ b/stdlib/source/test/aedifex/artifact/snapshot/version.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence]]] [control @@ -11,7 +11,7 @@ [parser ["<[0]>" xml]]] [math - ["[0]" random {"+" Random}]]]] + ["[0]" random (.only Random)]]]] [\\program ["[0]" /]] ["[0]" / "_" diff --git a/stdlib/source/test/aedifex/artifact/snapshot/version/value.lux b/stdlib/source/test/aedifex/artifact/snapshot/version/value.lux index 81df110ce..511abf693 100644 --- a/stdlib/source/test/aedifex/artifact/snapshot/version/value.lux +++ b/stdlib/source/test/aedifex/artifact/snapshot/version/value.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence]]] [control @@ -12,9 +12,9 @@ ["<[0]>" text]]] [data ["[0]" text ("[1]#[0]" equivalence) - ["%" format {"+" format}]]] + ["%" format (.only format)]]] [math - ["[0]" random {"+" Random} ("[1]#[0]" monad)] + ["[0]" random (.only Random) ("[1]#[0]" monad)] [number ["n" nat] ["i" int]]] diff --git a/stdlib/source/test/aedifex/artifact/time.lux b/stdlib/source/test/aedifex/artifact/time.lux index 521b07e9e..e3e853a86 100644 --- a/stdlib/source/test/aedifex/artifact/time.lux +++ b/stdlib/source/test/aedifex/artifact/time.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence]]] [control @@ -13,7 +13,7 @@ [time ["[0]" instant ("[1]#[0]" equivalence)]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["i" int]]]]] [\\program diff --git a/stdlib/source/test/aedifex/artifact/time/date.lux b/stdlib/source/test/aedifex/artifact/time/date.lux index 48e4188a4..1180f66b2 100644 --- a/stdlib/source/test/aedifex/artifact/time/date.lux +++ b/stdlib/source/test/aedifex/artifact/time/date.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence]]] [control @@ -12,7 +12,7 @@ [parser ["<[0]>" text]]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat] ["i" int]]] diff --git a/stdlib/source/test/aedifex/artifact/time/time.lux b/stdlib/source/test/aedifex/artifact/time/time.lux index 70fc9dddf..b666871fd 100644 --- a/stdlib/source/test/aedifex/artifact/time/time.lux +++ b/stdlib/source/test/aedifex/artifact/time/time.lux @@ -1,16 +1,16 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] ["[0]" time] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" try ("[1]#[0]" functor)] [parser ["<[0]>" text]]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat] ["i" int]]]]] diff --git a/stdlib/source/test/aedifex/artifact/type.lux b/stdlib/source/test/aedifex/artifact/type.lux index 4166828f8..631538bc4 100644 --- a/stdlib/source/test/aedifex/artifact/type.lux +++ b/stdlib/source/test/aedifex/artifact/type.lux @@ -1,16 +1,16 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [data ["[0]" text] [collection ["[0]" set] ["[0]" list]]] [math - ["[0]" random {"+" Random} ("[1]#[0]" monad)] + ["[0]" random (.only Random) ("[1]#[0]" monad)] [number ["n" nat]]]]] [\\program diff --git a/stdlib/source/test/aedifex/artifact/versioning.lux b/stdlib/source/test/aedifex/artifact/versioning.lux index 683468bcf..3a05977e2 100644 --- a/stdlib/source/test/aedifex/artifact/versioning.lux +++ b/stdlib/source/test/aedifex/artifact/versioning.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence]]] [control @@ -11,7 +11,7 @@ [parser ["<[0]>" xml]]] [math - ["[0]" random {"+" Random}]]]] + ["[0]" random (.only Random)]]]] [\\program ["[0]" /]] ["$[0]" // "_" diff --git a/stdlib/source/test/aedifex/cache.lux b/stdlib/source/test/aedifex/cache.lux index 690ff01ff..8b2843709 100644 --- a/stdlib/source/test/aedifex/cache.lux +++ b/stdlib/source/test/aedifex/cache.lux @@ -1,25 +1,25 @@ (.using [library [lux {"-" Type type} - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["[0]" try] [concurrency - ["[0]" async {"+" Async}]] + ["[0]" async (.only Async)]] [parser ["[0]" environment]]] [data - [binary {"+" Binary}] + [binary (.only Binary)] ["[0]" text] [format - [xml {"+" XML}]] + [xml (.only XML)]] [collection ["[0]" set] ["[0]" dictionary]]] [math - ["[0]" random {"+" Random} ("[1]#[0]" monad)] + ["[0]" random (.only Random) ("[1]#[0]" monad)] [number ["n" nat]]] [world @@ -35,13 +35,13 @@ [\\program ["[0]" / ["/[1]" // "_" - ["[1]" profile {"+" Profile}] - ["[1][0]" package {"+" Package}] + ["[1]" profile (.only Profile)] + ["[1][0]" package (.only Package)] ["[1][0]" pom] - ["[1][0]" dependency {"+" Dependency} - ["[1]/[0]" resolution {"+" Resolution}]] - ["[1][0]" artifact {"+" Artifact} - ["[1]/[0]" type {"+" Type}]] + ["[1][0]" dependency (.only Dependency) + ["[1]/[0]" resolution (.only Resolution)]] + ["[1][0]" artifact (.only Artifact) + ["[1]/[0]" type (.only Type)]] ["[1][0]" repository "_" ["[1]/[0]" origin]]]]]) diff --git a/stdlib/source/test/aedifex/cli.lux b/stdlib/source/test/aedifex/cli.lux index 4f4de026a..adaf85064 100644 --- a/stdlib/source/test/aedifex/cli.lux +++ b/stdlib/source/test/aedifex/cli.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence]]] [control @@ -16,7 +16,7 @@ [collection ["[0]" list]]] [math - ["[0]" random {"+" Random} ("[1]#[0]" monad)]]]] + ["[0]" random (.only Random) ("[1]#[0]" monad)]]]] [\\program ["[0]" / ["/[1]" // "_" diff --git a/stdlib/source/test/aedifex/command.lux b/stdlib/source/test/aedifex/command.lux index 496e1cd78..3dd0a2dc5 100644 --- a/stdlib/source/test/aedifex/command.lux +++ b/stdlib/source/test/aedifex/command.lux @@ -1,7 +1,7 @@ (.using [library [lux "*" - ["_" test {"+" Test}]]] + ["_" test (.only Test)]]] ["[0]" / "_" ["[1][0]" version] ["[1][0]" pom] diff --git a/stdlib/source/test/aedifex/command/auto.lux b/stdlib/source/test/aedifex/command/auto.lux index 7a1e7dc35..b014162ea 100644 --- a/stdlib/source/test/aedifex/command/auto.lux +++ b/stdlib/source/test/aedifex/command/auto.lux @@ -1,21 +1,21 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" pipe] ["[0]" try] [parser ["[0]" environment]] [concurrency - ["[0]" atom {"+" Atom}] - ["[0]" async {"+" Async}]]] + ["[0]" atom (.only Atom)] + ["[0]" async (.only Async)]]] [data ["[0]" binary] ["[0]" text - ["%" format {"+" format}] + ["%" format (.only format)] [encoding ["[0]" utf8]]] [collection @@ -27,9 +27,9 @@ [time ["[0]" instant]] [world - [console {"+" Console}] - ["[0]" shell {"+" Exit Shell}] - ["[0]" program {"+" Program}] + [console (.only Console)] + ["[0]" shell (.only Exit Shell)] + ["[0]" program (.only Program)] ["[0]" file ["[0]" watch]]]]] ["[0]" // "_" @@ -38,11 +38,11 @@ [\\program ["[0]" / ["//[1]" /// "_" - [command {"+" Command}] - ["[1]" profile {"+" Profile}] + [command (.only Command)] + ["[1]" profile (.only Profile)] ["[1][0]" action] [dependency - [resolution {"+" Resolution}]]]]]) + [resolution (.only Resolution)]]]]]) (def: (command expected_runs end_signal fs dummy_file) (-> Nat Text (file.System Async) file.Path diff --git a/stdlib/source/test/aedifex/command/build.lux b/stdlib/source/test/aedifex/command/build.lux index 4d813a8ad..ac25c782f 100644 --- a/stdlib/source/test/aedifex/command/build.lux +++ b/stdlib/source/test/aedifex/command/build.lux @@ -1,16 +1,16 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control - [io {"+" IO}] + [io (.only IO)] ["[0]" pipe] ["[0]" try] ["[0]" exception] [concurrency - ["[0]" async {"+" Async}]] + ["[0]" async (.only Async)]] [parser ["[0]" environment]]] [data @@ -18,10 +18,10 @@ [collection ["[0]" dictionary]]] [math - ["[0]" random {"+" Random}]] + ["[0]" random (.only Random)]] [world ["[0]" file] - ["[0]" shell {"+" Shell}] + ["[0]" shell (.only Shell)] ["[0]" program]]]] ["[0]" // "_" ["@[0]" version] @@ -30,12 +30,12 @@ [\\program ["[0]" / ["//[1]" /// "_" - ["[1]" profile {"+" Profile}] + ["[1]" profile (.only Profile)] ["[1][0]" action] ["[1][0]" artifact ["[1]/[0]" type]] - ["[1][0]" dependency {"+" Dependency} - ["[1]/[0]" resolution {"+" Resolution}]]]]]) + ["[1][0]" dependency (.only Dependency) + ["[1]/[0]" resolution (.only Resolution)]]]]]) (def: .public good_shell (-> Any (Shell IO)) diff --git a/stdlib/source/test/aedifex/command/clean.lux b/stdlib/source/test/aedifex/command/clean.lux index 90dd9c8b9..12c563343 100644 --- a/stdlib/source/test/aedifex/command/clean.lux +++ b/stdlib/source/test/aedifex/command/clean.lux @@ -1,27 +1,27 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control - ["[0]" try {"+" Try}] + ["[0]" try (.only Try)] [concurrency - ["[0]" async {"+" Async}]]] + ["[0]" async (.only Async)]]] [data - [binary {"+" Binary}] + [binary (.only Binary)] ["[0]" product] ["[0]" text ("[1]#[0]" equivalence) - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" functor)] ["[0]" set]]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat]]] [world - ["[0]" file {"+" Path}]]]] + ["[0]" file (.only Path)]]]] [// ["@[0]" version] [// @@ -34,7 +34,7 @@ ["[0]" / ["//[1]" /// "_" ["[1]" profile] - ["[1][0]" action {"+" Action}]]]]) + ["[1][0]" action (.only Action)]]]]) (def: node_name (Random Text) diff --git a/stdlib/source/test/aedifex/command/deploy.lux b/stdlib/source/test/aedifex/command/deploy.lux index 67e1bf702..a1d55a274 100644 --- a/stdlib/source/test/aedifex/command/deploy.lux +++ b/stdlib/source/test/aedifex/command/deploy.lux @@ -1,20 +1,20 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" maybe] - ["[0]" try {"+" Try}] + ["[0]" try (.only Try)] [concurrency - ["[0]" async {"+" Async}]] + ["[0]" async (.only Async)]] [parser ["[0]" environment]]] [data ["[0]" binary ("[1]#[0]" equivalence)] ["[0]" text ("[1]#[0]" equivalence) - ["%" format {"+" format}] + ["%" format (.only format)] [encoding ["[0]" utf8]]] ["[0]" format "_" @@ -31,7 +31,7 @@ ["[0]" export]]]] [world ["[0]" file] - ["[0]" program {"+" Program}] + ["[0]" program (.only Program)] ["[0]" shell]]]] [// ["$[0]" build] @@ -47,10 +47,10 @@ ["[1][0]" action] ["[1][0]" pom] ["[1][0]" hash] - ["[1][0]" repository {"+" Repository} + ["[1][0]" repository (.only Repository) ["[1]/[0]" local] ["[1]/[0]" remote]] - ["[1][0]" artifact {"+" Artifact} + ["[1][0]" artifact (.only Artifact) ["[1]/[0]" extension]]]]]) (def: (execute! program local remote fs artifact profile) diff --git a/stdlib/source/test/aedifex/command/deps.lux b/stdlib/source/test/aedifex/command/deps.lux index aeffb80f5..f4a30323e 100644 --- a/stdlib/source/test/aedifex/command/deps.lux +++ b/stdlib/source/test/aedifex/command/deps.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] ["[0]" predicate]] [control ["[0]" try] @@ -13,7 +13,7 @@ ["[0]" environment]]] [data ["[0]" text ("[1]#[0]" equivalence) - ["%" format {"+" format}] + ["%" format (.only format)] [encoding ["[0]" utf8]]] [collection @@ -22,7 +22,7 @@ [format ["[0]" xml]]] [math - ["[0]" random {"+" Random}]] + ["[0]" random (.only Random)]] [world ["[0]" program] ["[0]" file]]]] diff --git a/stdlib/source/test/aedifex/command/install.lux b/stdlib/source/test/aedifex/command/install.lux index e0392fd56..e60f7d06c 100644 --- a/stdlib/source/test/aedifex/command/install.lux +++ b/stdlib/source/test/aedifex/command/install.lux @@ -1,27 +1,27 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control - ["[0]" try {"+" Try} ("[1]#[0]" functor)] + ["[0]" try (.only Try) ("[1]#[0]" functor)] ["[0]" exception] [concurrency - ["[0]" async {"+" Async}]] + ["[0]" async (.only Async)]] [parser ["[0]" environment]]] [data ["[0]" binary] ["[0]" text ("[1]#[0]" equivalence) - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection - ["[0]" set {"+" Set}]]] + ["[0]" set (.only Set)]]] [math ["[0]" random]] [world ["[0]" file] - ["[0]" program {"+" Program}]]]] + ["[0]" program (.only Program)]]]] [// ["$[0]" version] [// @@ -32,7 +32,7 @@ ["/[1]" // "_" ["/[1]" // "_" ["[1]" profile] - ["[1][0]" action {"+" Action}] + ["[1][0]" action (.only Action)] ["[1][0]" local] ["[1][0]" artifact ["[1]/[0]" extension]] diff --git a/stdlib/source/test/aedifex/command/pom.lux b/stdlib/source/test/aedifex/command/pom.lux index 54312e388..84e225678 100644 --- a/stdlib/source/test/aedifex/command/pom.lux +++ b/stdlib/source/test/aedifex/command/pom.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" try ("[1]#[0]" functor)] [concurrency diff --git a/stdlib/source/test/aedifex/command/test.lux b/stdlib/source/test/aedifex/command/test.lux index eec957702..520609c43 100644 --- a/stdlib/source/test/aedifex/command/test.lux +++ b/stdlib/source/test/aedifex/command/test.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" try] ["[0]" exception] @@ -32,7 +32,7 @@ ["/[1]" // "_" ["[1][0]" build] ["/[1]" // "_" - ["[1]" profile {"+" Profile}] + ["[1]" profile (.only Profile)] ["[1][0]" action] ["[1][0]" artifact ["[1]/[0]" type]] diff --git a/stdlib/source/test/aedifex/command/version.lux b/stdlib/source/test/aedifex/command/version.lux index 5a0fbf681..b8792434a 100644 --- a/stdlib/source/test/aedifex/command/version.lux +++ b/stdlib/source/test/aedifex/command/version.lux @@ -1,18 +1,18 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" maybe] ["[0]" try] - ["[0]" exception {"+" exception:}] + ["[0]" exception (.only exception:)] [concurrency - ["[0]" async {"+" Async}]]] + ["[0]" async (.only Async)]]] [data ["[0]" text ("[1]#[0]" equivalence) - ["%" format {"+" format}]]] + ["%" format (.only format)]]] [math ["[0]" random]] [meta @@ -21,7 +21,7 @@ [compiler ["[0]" version]]] [world - ["[0]" console {"+" Console Mock}]]]] + ["[0]" console (.only Console Mock)]]]] [/// ["@[0]" profile]] [\\program diff --git a/stdlib/source/test/aedifex/dependency.lux b/stdlib/source/test/aedifex/dependency.lux index bdc26bd7b..01fb3f6dc 100644 --- a/stdlib/source/test/aedifex/dependency.lux +++ b/stdlib/source/test/aedifex/dependency.lux @@ -1,15 +1,15 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence] ["$[0]" order] ["$[0]" hash]]] [math - ["[0]" random {"+" Random}]]]] + ["[0]" random (.only Random)]]]] [// ["@[0]" artifact]] [\\program diff --git a/stdlib/source/test/aedifex/dependency/deployment.lux b/stdlib/source/test/aedifex/dependency/deployment.lux index f9f5e6763..d647ad815 100644 --- a/stdlib/source/test/aedifex/dependency/deployment.lux +++ b/stdlib/source/test/aedifex/dependency/deployment.lux @@ -1,33 +1,33 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] - ["[0]" hash {"+" Hash}]] + [monad (.only do)] + ["[0]" hash (.only Hash)]] [control - ["[0]" io {"+" IO}] + ["[0]" io (.only IO)] ["[0]" maybe ("[1]#[0]" functor)] ["[0]" try ("[1]#[0]" functor)] [concurrency - ["[0]" atom {"+" Atom}] + ["[0]" atom (.only Atom)] ["[0]" async]]] [data ["[0]" product] - ["[0]" binary {"+" Binary} ("[1]#[0]" equivalence)] + ["[0]" binary (.only Binary) ("[1]#[0]" equivalence)] ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection - ["[0]" dictionary {"+" Dictionary}] + ["[0]" dictionary (.only Dictionary)] ["[0]" set] ["[0]" list ("[1]#[0]" mix)]]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat]]] [world - [net {"+" URL} - ["[0]" uri {"+" URI}] + [net (.only URL) + ["[0]" uri (.only URI)] ["[0]" http "_" ["[1]" client] ["[1]/[0]" status] @@ -37,13 +37,13 @@ ["[1][0]" package]]] [\\program ["[0]" / - [// {"+" Dependency} + [// (.only Dependency) ["[0]" resolution] [// ["[0]" profile] ["[0]" metadata] - ["[0]" package {"+" Package}] - ["[0]" artifact {"+" Artifact} ("[1]#[0]" equivalence) + ["[0]" package (.only Package)] + ["[0]" artifact (.only Artifact) ("[1]#[0]" equivalence) ["[1]/[0]" type] ["[1]/[0]" extension]] ["[0]" repository diff --git a/stdlib/source/test/aedifex/dependency/resolution.lux b/stdlib/source/test/aedifex/dependency/resolution.lux index e5db7fe3c..2455043f4 100644 --- a/stdlib/source/test/aedifex/dependency/resolution.lux +++ b/stdlib/source/test/aedifex/dependency/resolution.lux @@ -1,9 +1,9 @@ (.using [library [lux {"-" all} - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] ["[0]" predicate] [\\specification ["$[0]" equivalence]]] @@ -13,10 +13,10 @@ [concurrency ["[0]" async]]] [data - [binary {"+" Binary}] + [binary (.only Binary)] ["[0]" product] ["[0]" text - ["%" format {"+" format}] + ["%" format (.only format)] [encoding ["[0]" utf8]]] [format @@ -26,7 +26,7 @@ ["[0]" set] ["[0]" list]]] [math - ["[0]" random {"+" Random}]]]] + ["[0]" random (.only Random)]]]] ["$[0]" /// "_" ["[1][0]" package] ["[1][0]" repository] @@ -37,15 +37,15 @@ ["[0]" / ["//[1]" /// "_" ["[1]" profile] - ["[1][0]" package {"+" Package}] + ["[1][0]" package (.only Package)] ["[1][0]" hash] - ["[1][0]" dependency {"+" Dependency} ("[1]#[0]" equivalence) + ["[1][0]" dependency (.only Dependency) ("[1]#[0]" equivalence) ["[1]/[0]" status]] ["[1][0]" pom] - ["[1][0]" artifact {"+" Artifact} + ["[1][0]" artifact (.only Artifact) ["[1]/[0]" type] ["[1]/[0]" extension]] - ["[1][0]" repository {"+" Mock} + ["[1][0]" repository (.only Mock) ["[1]/[0]" origin]]]]]) (def: random diff --git a/stdlib/source/test/aedifex/dependency/status.lux b/stdlib/source/test/aedifex/dependency/status.lux index 5f221b4e4..f41c64825 100644 --- a/stdlib/source/test/aedifex/dependency/status.lux +++ b/stdlib/source/test/aedifex/dependency/status.lux @@ -1,16 +1,16 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence]]] [data ["[0]" binary "_" ["[1]T" \\test]]] [math - ["[0]" random {"+" Random} ("[1]#[0]" monad)]]]] + ["[0]" random (.only Random) ("[1]#[0]" monad)]]]] ["$[0]" /// "_" ["[1][0]" hash]] [\\program diff --git a/stdlib/source/test/aedifex/hash.lux b/stdlib/source/test/aedifex/hash.lux index 339c7c3b4..880d721b3 100644 --- a/stdlib/source/test/aedifex/hash.lux +++ b/stdlib/source/test/aedifex/hash.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence] ["$[0]" codec]]] @@ -11,11 +11,11 @@ ["[0]" try] ["[0]" exception]] [data - ["[0]" binary {"+" Binary}] + ["[0]" binary (.only Binary)] [text - ["%" format {"+" format}]]] + ["%" format (.only format)]]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat]]]]] [\\program diff --git a/stdlib/source/test/aedifex/input.lux b/stdlib/source/test/aedifex/input.lux index 5cc687a7b..87d9daa51 100644 --- a/stdlib/source/test/aedifex/input.lux +++ b/stdlib/source/test/aedifex/input.lux @@ -1,20 +1,20 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control - ["[0]" try {"+" Try}] + ["[0]" try (.only Try)] [concurrency - ["[0]" async {"+" Async}]]] + ["[0]" async (.only Async)]]] [data [text ["%" format] [encoding ["[0]" utf8]]] [collection - ["[0]" set {"+" Set}]]] + ["[0]" set (.only Set)]]] [math ["[0]" random]] [world @@ -24,12 +24,12 @@ [\\program ["[0]" / ["/[1]" // "_" - ["[1]" profile {"+" Profile}] + ["[1]" profile (.only Profile)] ["[1][0]" project] ["[1][0]" action] ["[1][0]" format] [repository - [remote {"+" Address}]]]]]) + [remote (.only Address)]]]]]) (def: (with_default_source sources) (-> (Set //.Source) (Set //.Source)) diff --git a/stdlib/source/test/aedifex/local.lux b/stdlib/source/test/aedifex/local.lux index 58f1c019e..effbbfffb 100644 --- a/stdlib/source/test/aedifex/local.lux +++ b/stdlib/source/test/aedifex/local.lux @@ -1,13 +1,13 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [data ["[0]" text]] [math - ["[0]" random {"+" Random}]]]] + ["[0]" random (.only Random)]]]] [// ["@[0]" artifact]] [\\program diff --git a/stdlib/source/test/aedifex/metadata.lux b/stdlib/source/test/aedifex/metadata.lux index 20c67f929..d4919de21 100644 --- a/stdlib/source/test/aedifex/metadata.lux +++ b/stdlib/source/test/aedifex/metadata.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [data ["[0]" text ("[1]#[0]" equivalence)]] [math diff --git a/stdlib/source/test/aedifex/metadata/artifact.lux b/stdlib/source/test/aedifex/metadata/artifact.lux index 02f1a6611..ed3690608 100644 --- a/stdlib/source/test/aedifex/metadata/artifact.lux +++ b/stdlib/source/test/aedifex/metadata/artifact.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence]]] [control @@ -21,7 +21,7 @@ [macro ["[0]" code]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat]]] ["[0]" time diff --git a/stdlib/source/test/aedifex/metadata/snapshot.lux b/stdlib/source/test/aedifex/metadata/snapshot.lux index 27cffb1f0..3c4bb2395 100644 --- a/stdlib/source/test/aedifex/metadata/snapshot.lux +++ b/stdlib/source/test/aedifex/metadata/snapshot.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence]]] [control @@ -21,14 +21,14 @@ [macro ["[0]" code]] [math - ["[0]" random {"+" Random} ("[1]#[0]" monad)] + ["[0]" random (.only Random) ("[1]#[0]" monad)] [number ["n" nat]]] ["[0]" time ["[0]" date] ["[0]" year] ["[0]" month] - ["[0]" instant {"+" Instant}] + ["[0]" instant (.only Instant)] ["[0]" duration]] [world ["[0]" file] @@ -44,7 +44,7 @@ ["/[1]" // ["/[1]" // "_" [artifact - [versioning {"+" Versioning}] + [versioning (.only Versioning)] ["[1][0]" snapshot]] ["[1][0]" repository "_" ["[1]/[0]" local]]]]]]) diff --git a/stdlib/source/test/aedifex/package.lux b/stdlib/source/test/aedifex/package.lux index 4b95cd250..84e3005c5 100644 --- a/stdlib/source/test/aedifex/package.lux +++ b/stdlib/source/test/aedifex/package.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence]]] [control @@ -14,11 +14,11 @@ [encoding ["[0]" utf8]]] [format - ["[0]" xml {"+" XML}]] + ["[0]" xml (.only XML)]] [collection - ["[0]" set {"+" Set}]]] + ["[0]" set (.only Set)]]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat]]] [world diff --git a/stdlib/source/test/aedifex/parser.lux b/stdlib/source/test/aedifex/parser.lux index c63d1701c..038037372 100644 --- a/stdlib/source/test/aedifex/parser.lux +++ b/stdlib/source/test/aedifex/parser.lux @@ -1,10 +1,10 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] - [hash {"+" Hash}]] + [monad (.only do)] + [hash (.only Hash)]] [control ["[0]" pipe] ["[0]" try] @@ -13,11 +13,11 @@ [data ["[0]" text] [collection - ["[0]" set {"+" Set}] - ["[0]" dictionary {"+" Dictionary}] + ["[0]" set (.only Set)] + ["[0]" dictionary (.only Dictionary)] ["[0]" list ("[1]#[0]" functor)]]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat]]] [macro @@ -28,9 +28,9 @@ ["[0]" / ["/[1]" // "_" ["[1]" profile] - ["[1][0]" project {"+" Project}] - ["[1][0]" artifact {"+" Artifact}] - ["[1][0]" dependency {"+" Dependency}] + ["[1][0]" project (.only Project)] + ["[1][0]" artifact (.only Artifact)] + ["[1][0]" dependency (.only Dependency)] ["[1][0]" format]]]]) (def: name diff --git a/stdlib/source/test/aedifex/pom.lux b/stdlib/source/test/aedifex/pom.lux index ac8869c54..edaeca6cc 100644 --- a/stdlib/source/test/aedifex/pom.lux +++ b/stdlib/source/test/aedifex/pom.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" try] ["[0]" exception] diff --git a/stdlib/source/test/aedifex/profile.lux b/stdlib/source/test/aedifex/profile.lux index 8bccf4459..7dd2981bf 100644 --- a/stdlib/source/test/aedifex/profile.lux +++ b/stdlib/source/test/aedifex/profile.lux @@ -1,10 +1,10 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] - [hash {"+" Hash}] + [monad (.only do)] + [hash (.only Hash)] [\\specification ["$[0]" equivalence] ["$[0]" monoid]]] @@ -15,10 +15,10 @@ [data ["[0]" text ("[1]#[0]" equivalence)] [collection - ["[0]" set {"+" Set}] - ["[0]" dictionary {"+" Dictionary}]]] + ["[0]" set (.only Set)] + ["[0]" dictionary (.only Dictionary)]]] [math - ["[0]" random {"+" Random} ("[1]#[0]" monad)] + ["[0]" random (.only Random) ("[1]#[0]" monad)] [number ["n" nat]]] [tool @@ -34,10 +34,10 @@ ["[0]" / ["/[1]" // "_" ["[1][0]" runtime] - ["[1][0]" dependency {"+" Dependency}] + ["[1][0]" dependency (.only Dependency)] ["[1][0]" format] [repository - [remote {"+" Address}]]]]]) + [remote (.only Address)]]]]]) (def: distribution (Random /.Distribution) diff --git a/stdlib/source/test/aedifex/project.lux b/stdlib/source/test/aedifex/project.lux index 748ea922d..68e3c0e6d 100644 --- a/stdlib/source/test/aedifex/project.lux +++ b/stdlib/source/test/aedifex/project.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence] ["$[0]" monoid]]] @@ -14,7 +14,7 @@ ["[0]" product] ["[0]" text ("[1]#[0]" equivalence)]] [math - ["[0]" random {"+" Random} ("[1]#[0]" monad)] + ["[0]" random (.only Random) ("[1]#[0]" monad)] [number ["n" nat]]]]] [// diff --git a/stdlib/source/test/aedifex/repository.lux b/stdlib/source/test/aedifex/repository.lux index 80d3f43e9..465d46709 100644 --- a/stdlib/source/test/aedifex/repository.lux +++ b/stdlib/source/test/aedifex/repository.lux @@ -1,27 +1,27 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [equivalence {"+" Equivalence}] - [hash {"+" Hash}] - ["[0]" monad {"+" do}]] + [equivalence (.only Equivalence)] + [hash (.only Hash)] + ["[0]" monad (.only do)]] [control ["[0]" io] ["[0]" try] - ["[0]" exception {"+" exception:}]] + ["[0]" exception (.only exception:)]] [data ["[0]" product] - ["[0]" binary {"+" Binary}] + ["[0]" binary (.only Binary)] ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection - ["[0]" dictionary {"+" Dictionary}]]] + ["[0]" dictionary (.only Dictionary)]]] [math - ["[0]" random {"+" Random}]] + ["[0]" random (.only Random)]] [world [net - ["[0]" uri {"+" URI}]]]]] + ["[0]" uri (.only URI)]]]]] ["[0]" / "_" ["[1][0]" identity] ["[1][0]" origin] @@ -35,8 +35,8 @@ ["[0]" / ["[0]" remote] ["/[1]" // "_" - ["[1][0]" artifact {"+" Version Artifact} - ["[1]/[0]" extension {"+" Extension}]]]]]) + ["[1][0]" artifact (.only Version Artifact) + ["[1]/[0]" extension (.only Extension)]]]]]) (def: artifact (-> Version Artifact) diff --git a/stdlib/source/test/aedifex/repository/identity.lux b/stdlib/source/test/aedifex/repository/identity.lux index e1b67e424..9dbd6a858 100644 --- a/stdlib/source/test/aedifex/repository/identity.lux +++ b/stdlib/source/test/aedifex/repository/identity.lux @@ -1,12 +1,12 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract [\\specification ["$[0]" equivalence]]] [math - ["[0]" random {"+" Random}]]]] + ["[0]" random (.only Random)]]]] [\\program ["[0]" /]]) diff --git a/stdlib/source/test/aedifex/repository/local.lux b/stdlib/source/test/aedifex/repository/local.lux index 9c9703d55..d8867b598 100644 --- a/stdlib/source/test/aedifex/repository/local.lux +++ b/stdlib/source/test/aedifex/repository/local.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" try ("[1]#[0]" functor)] [parser diff --git a/stdlib/source/test/aedifex/repository/origin.lux b/stdlib/source/test/aedifex/repository/origin.lux index 90a0f89dd..2f652b513 100644 --- a/stdlib/source/test/aedifex/repository/origin.lux +++ b/stdlib/source/test/aedifex/repository/origin.lux @@ -1,12 +1,12 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract [\\specification ["$[0]" equivalence]]] [math - ["[0]" random {"+" Random}]]]] + ["[0]" random (.only Random)]]]] [\\program ["[0]" /]]) diff --git a/stdlib/source/test/aedifex/repository/remote.lux b/stdlib/source/test/aedifex/repository/remote.lux index c20722d4c..79c4987a0 100644 --- a/stdlib/source/test/aedifex/repository/remote.lux +++ b/stdlib/source/test/aedifex/repository/remote.lux @@ -1,11 +1,11 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control - ["[0]" io {"+" IO}] + ["[0]" io (.only IO)] ["[0]" maybe ("[1]#[0]" functor)] ["[0]" try ("[1]#[0]" monad)] ["[0]" exception] @@ -13,15 +13,15 @@ [data ["[0]" binary ("[1]#[0]" equivalence)] ["[0]" text ("[1]#[0]" equivalence) - ["%" format {"+" format}] + ["%" format (.only format)] [encoding ["[0]" utf8]]] [collection ["[0]" dictionary]]] [math - ["[0]" random {"+" Random}]] + ["[0]" random (.only Random)]] [world - [net {"+" URL} + [net (.only URL) ["[0]" http "_" ["[1]" client] ["[1]/[0]" status] diff --git a/stdlib/source/test/aedifex/runtime.lux b/stdlib/source/test/aedifex/runtime.lux index 690657d70..a324b2dd4 100644 --- a/stdlib/source/test/aedifex/runtime.lux +++ b/stdlib/source/test/aedifex/runtime.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence]]] [control @@ -14,7 +14,7 @@ ["[0]" list ("[1]#[0]" functor)] ["[0]" set]]] [math - ["[0]" random {"+" Random} ("[1]#[0]" monad)] + ["[0]" random (.only Random) ("[1]#[0]" monad)] [number ["n" nat]]]]] [\\program diff --git a/stdlib/source/test/lux.lux b/stdlib/source/test/lux.lux index 79265e7b3..a4416f38d 100644 --- a/stdlib/source/test/lux.lux +++ b/stdlib/source/test/lux.lux @@ -1,39 +1,39 @@ (.`` (.`` (.using [library ["/" lux "*" - [program {"+" program:}] - ["_" test {"+" Test}] + [program (.only program:)] + ["_" test (.only Test)] ["@" target] ["[0]" static] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" io] ["[0]" maybe ("[1]#[0]" functor)] [concurrency - ["[0]" atom {"+" Atom}]] + ["[0]" atom (.only Atom)]] [parser ["<[0]>" code]]] [data ["[0]" product] ["[0]" bit ("[1]#[0]" equivalence)] ["[0]" text ("[1]#[0]" equivalence) - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" functor)] - ["[0]" set {"+" Set} ("[1]#[0]" equivalence)] + ["[0]" set (.only Set) ("[1]#[0]" equivalence)] [dictionary ["[0]" plist]]]] ["[0]" macro - [syntax {"+" syntax:}] + [syntax (.only syntax:)] ["^" pattern] ["[0]" code ("[1]#[0]" equivalence)] ["[0]" template]] ["[0]" math ["[0]" random ("[1]#[0]" functor)] [number - [i8 {"+"}] - [i16 {"+"}] + [i8 (.only)] + [i16 (.only)] ["n" nat] ["i" int] ["r" rev] @@ -479,9 +479,9 @@ ("lux def module" [[<module/0> <alias>]]) [(<referral> <module/0> "*")]] - [(.using [<alias> <module/0>' {"+" <definition>}]) + [(.using [<alias> <module/0>' (.only <definition>)]) ("lux def module" [[<module/0> <alias>]]) - [(<referral> <module/0> {"+" <definition>})]] + [(<referral> <module/0> (.only <definition>))]] [(.using [<alias> <module/0>' {"-" <definition>}]) ("lux def module" [[<module/0> <alias>]]) diff --git a/stdlib/source/test/lux/abstract.lux b/stdlib/source/test/lux/abstract.lux index bd6cd3e03..1ebfc2e15 100644 --- a/stdlib/source/test/lux/abstract.lux +++ b/stdlib/source/test/lux/abstract.lux @@ -1,7 +1,7 @@ (.using [library [lux "*" - ["_" test {"+" Test}]]] + ["_" test (.only Test)]]] ["[0]" / "_" ["[1][0]" apply] ["[1][0]" codec] diff --git a/stdlib/source/test/lux/abstract/apply.lux b/stdlib/source/test/lux/abstract/apply.lux index 04c0a1e7f..b3246f5ae 100644 --- a/stdlib/source/test/lux/abstract/apply.lux +++ b/stdlib/source/test/lux/abstract/apply.lux @@ -2,7 +2,7 @@ [library [lux "*" [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" maybe]] [data @@ -12,9 +12,9 @@ ["[0]" random] [number ["n" nat]]] - ["_" test {"+" Test}]]] + ["_" test (.only Test)]]] [\\library - ["[0]" / {"+" Apply}]]) + ["[0]" / (.only Apply)]]) (def: .public test Test diff --git a/stdlib/source/test/lux/abstract/codec.lux b/stdlib/source/test/lux/abstract/codec.lux index ecc1c7ca3..309defeda 100644 --- a/stdlib/source/test/lux/abstract/codec.lux +++ b/stdlib/source/test/lux/abstract/codec.lux @@ -1,21 +1,21 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" try]] [data ["[0]" bit ("[1]#[0]" equivalence)] [format - ["[0]" json {"+" JSON}]]] + ["[0]" json (.only JSON)]]] [math - ["[0]" random {"+" Random}]]]] + ["[0]" random (.only Random)]]]] [\\library - ["[0]" / {"+" Codec} + ["[0]" / (.only Codec) [// - [equivalence {"+" Equivalence}]]]]) + [equivalence (.only Equivalence)]]]]) (def: json (Codec JSON Bit) diff --git a/stdlib/source/test/lux/abstract/comonad.lux b/stdlib/source/test/lux/abstract/comonad.lux index fce193ce1..fc93d760a 100644 --- a/stdlib/source/test/lux/abstract/comonad.lux +++ b/stdlib/source/test/lux/abstract/comonad.lux @@ -2,14 +2,14 @@ [library [lux "*" [abstract - [monad {"+" do}]] + [monad (.only do)]] [data - ["[0]" identity {"+" Identity}]] + ["[0]" identity (.only Identity)]] [math ["[0]" random] [number ["n" nat]]] - ["_" test {"+" Test}]]] + ["_" test (.only Test)]]] [\\library ["[0]" /]]) diff --git a/stdlib/source/test/lux/abstract/comonad/cofree.lux b/stdlib/source/test/lux/abstract/comonad/cofree.lux index 32b6b2fa2..5ac04557f 100644 --- a/stdlib/source/test/lux/abstract/comonad/cofree.lux +++ b/stdlib/source/test/lux/abstract/comonad/cofree.lux @@ -1,19 +1,19 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [functor {"+" Functor}] - [comonad {"+" CoMonad}] + [functor (.only Functor)] + [comonad (.only CoMonad)] [\\specification - ["$[0]" functor {"+" Injection Comparison}] + ["$[0]" functor (.only Injection Comparison)] ["$[0]" comonad]]] [control ["//" continuation]] [data [collection ["[0]" list] - ["[0]" stream {"+" Stream} ("[1]#[0]" comonad)]]] + ["[0]" stream (.only Stream) ("[1]#[0]" comonad)]]] [math ["[0]" random]]]] [\\library diff --git a/stdlib/source/test/lux/abstract/enum.lux b/stdlib/source/test/lux/abstract/enum.lux index 24992013b..e55be76cd 100644 --- a/stdlib/source/test/lux/abstract/enum.lux +++ b/stdlib/source/test/lux/abstract/enum.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" maybe ("[1]#[0]" functor)]] [data @@ -11,7 +11,7 @@ [collection ["[0]" list ("[1]#[0]" mix)]]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat]]]]] [\\library diff --git a/stdlib/source/test/lux/abstract/equivalence.lux b/stdlib/source/test/lux/abstract/equivalence.lux index 0168babc8..459f16c0f 100644 --- a/stdlib/source/test/lux/abstract/equivalence.lux +++ b/stdlib/source/test/lux/abstract/equivalence.lux @@ -1,21 +1,21 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification [functor ["$[0]" contravariant]]]] [data ["[0]" bit ("[1]#[0]" equivalence)]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat] ["i" int]]]]] [\\library - ["[0]" / {"+" Equivalence}]]) + ["[0]" / (.only Equivalence)]]) (def: .public test Test diff --git a/stdlib/source/test/lux/abstract/functor.lux b/stdlib/source/test/lux/abstract/functor.lux index ac42df1ba..26994248c 100644 --- a/stdlib/source/test/lux/abstract/functor.lux +++ b/stdlib/source/test/lux/abstract/functor.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" maybe]] [data @@ -14,7 +14,7 @@ [number ["n" nat]]]]] [\\library - ["[0]" / {"+" Functor}]]) + ["[0]" / (.only Functor)]]) (def: .public test Test diff --git a/stdlib/source/test/lux/abstract/functor/contravariant.lux b/stdlib/source/test/lux/abstract/functor/contravariant.lux index b491b1817..ee3af6607 100644 --- a/stdlib/source/test/lux/abstract/functor/contravariant.lux +++ b/stdlib/source/test/lux/abstract/functor/contravariant.lux @@ -1,9 +1,9 @@ (.using - [library - [lux "*" - ["_" test {"+" Test}]]] - [\\library - ["[0]" /]]) + [library + [lux "*" + ["_" test (.only Test)]]] + [\\library + ["[0]" /]]) (def: .public test Test diff --git a/stdlib/source/test/lux/abstract/hash.lux b/stdlib/source/test/lux/abstract/hash.lux index 7b8f549ae..07359bc18 100644 --- a/stdlib/source/test/lux/abstract/hash.lux +++ b/stdlib/source/test/lux/abstract/hash.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification [functor ["$[0]" contravariant]]]] @@ -14,9 +14,9 @@ [number ["[0]" nat]]]]] [\\library - ["[0]" / {"+" Hash} + ["[0]" / (.only Hash) [// - [equivalence {"+" Equivalence}]]]]) + [equivalence (.only Equivalence)]]]]) (def: .public test Test diff --git a/stdlib/source/test/lux/abstract/interval.lux b/stdlib/source/test/lux/abstract/interval.lux index 8ad90d781..c3228b5a9 100644 --- a/stdlib/source/test/lux/abstract/interval.lux +++ b/stdlib/source/test/lux/abstract/interval.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] ["[0]" order] [\\specification ["$[0]" equivalence]]] @@ -14,11 +14,11 @@ ["[0]" set] ["[0]" list]]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat]]]]] [\\library - ["[0]" / {"+" Interval} ("#[0]" equivalence)]]) + ["[0]" / (.only Interval) ("#[0]" equivalence)]]) (template [<name> <cmp>] [(def: .public <name> diff --git a/stdlib/source/test/lux/abstract/mix.lux b/stdlib/source/test/lux/abstract/mix.lux index 96a870aa3..10c1db5c9 100644 --- a/stdlib/source/test/lux/abstract/mix.lux +++ b/stdlib/source/test/lux/abstract/mix.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [data [collection ["[0]" list]]] @@ -12,7 +12,7 @@ [number ["n" nat]]]]] [\\library - ["[0]" / {"+" Mix}]]) + ["[0]" / (.only Mix)]]) (def: .public test Test diff --git a/stdlib/source/test/lux/abstract/monad.lux b/stdlib/source/test/lux/abstract/monad.lux index 91cdf402f..6a5d68ce4 100644 --- a/stdlib/source/test/lux/abstract/monad.lux +++ b/stdlib/source/test/lux/abstract/monad.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [data - ["[0]" identity {"+" Identity}] + ["[0]" identity (.only Identity)] [collection ["[0]" list ("[1]#[0]" functor mix)]]] [math @@ -11,7 +11,7 @@ [number ["n" nat]]]]] [\\library - ["[0]" / {"+" Monad do}]]) + ["[0]" / (.only Monad do)]]) (def: .public test Test diff --git a/stdlib/source/test/lux/abstract/monad/free.lux b/stdlib/source/test/lux/abstract/monad/free.lux index 9f53dfe2e..f39a7fb09 100644 --- a/stdlib/source/test/lux/abstract/monad/free.lux +++ b/stdlib/source/test/lux/abstract/monad/free.lux @@ -1,13 +1,13 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [functor {"+" Functor}] - [apply {"+" Apply}] - [monad {"+" Monad do}] + [functor (.only Functor)] + [apply (.only Apply)] + [monad (.only Monad do)] [\\specification - ["$[0]" functor {"+" Injection Comparison}] + ["$[0]" functor (.only Injection Comparison)] ["$[0]" apply] ["$[0]" monad]]] [data diff --git a/stdlib/source/test/lux/abstract/monoid.lux b/stdlib/source/test/lux/abstract/monoid.lux index c52ebcc36..094ad814b 100644 --- a/stdlib/source/test/lux/abstract/monoid.lux +++ b/stdlib/source/test/lux/abstract/monoid.lux @@ -1,18 +1,18 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["[0]" nat] ["[0]" int]]]]] [\\library ["[0]" / [// - [equivalence {"+" Equivalence}]]]]) + [equivalence (.only Equivalence)]]]]) (def: .public test Test diff --git a/stdlib/source/test/lux/abstract/order.lux b/stdlib/source/test/lux/abstract/order.lux index e6d30b8f9..22b390b40 100644 --- a/stdlib/source/test/lux/abstract/order.lux +++ b/stdlib/source/test/lux/abstract/order.lux @@ -1,22 +1,22 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification [functor ["$[0]" contravariant]]]] [data ["[0]" bit ("[1]#[0]" equivalence)]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat]]]]] [\\library ["[0]" / [// - [equivalence {"+" Equivalence}]]]]) + [equivalence (.only Equivalence)]]]]) (def: .public test Test diff --git a/stdlib/source/test/lux/abstract/predicate.lux b/stdlib/source/test/lux/abstract/predicate.lux index 78e6167a8..fa1ad503d 100644 --- a/stdlib/source/test/lux/abstract/predicate.lux +++ b/stdlib/source/test/lux/abstract/predicate.lux @@ -1,10 +1,10 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [equivalence {"+" Equivalence}] - [monad {"+" do}] + [equivalence (.only Equivalence)] + [monad (.only do)] [\\specification ["$[0]" monoid] [functor @@ -16,7 +16,7 @@ [collection ["[0]" list]]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat]]]]] [\\library diff --git a/stdlib/source/test/lux/control.lux b/stdlib/source/test/lux/control.lux index bbb3d869d..3761a6e11 100644 --- a/stdlib/source/test/lux/control.lux +++ b/stdlib/source/test/lux/control.lux @@ -1,7 +1,7 @@ (.using [library [lux {"-" function} - ["_" test {"+" Test}]]] + ["_" test (.only Test)]]] ["[0]" / "_" ["[1][0]" concatenative] ["[1][0]" concurrency "_" diff --git a/stdlib/source/test/lux/control/concatenative.lux b/stdlib/source/test/lux/control/concatenative.lux index 1edbeccf4..fc2bfcd3e 100644 --- a/stdlib/source/test/lux/control/concatenative.lux +++ b/stdlib/source/test/lux/control/concatenative.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [data ["[0]" sum] ["[0]" bit ("[1]#[0]" equivalence)]] @@ -17,7 +17,7 @@ ["r" rev] ["f" frac]]]]] [\\library - ["[0]" / {"+" word: => ||>}]]) + ["[0]" / (.only word: => ||>)]]) (def: stack_shuffling Test diff --git a/stdlib/source/test/lux/control/concurrency/actor.lux b/stdlib/source/test/lux/control/concurrency/actor.lux index fd99d624d..535e66bb4 100644 --- a/stdlib/source/test/lux/control/concurrency/actor.lux +++ b/stdlib/source/test/lux/control/concurrency/actor.lux @@ -1,28 +1,28 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control - ["[0]" try {"+" Try}] - ["[0]" exception {"+" exception:}] - ["[0]" io {"+" IO io}]] + ["[0]" try (.only Try)] + ["[0]" exception (.only exception:)] + ["[0]" io (.only IO io)]] [data [text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list] - ["[0]" sequence {"+" Sequence}]]] + ["[0]" sequence (.only Sequence)]]] [math ["[0]" random] [number ["n" nat]]]]] [\\library - ["[0]" / {"+" actor: message:} + ["[0]" / (.only actor: message:) [// - ["[0]" atom {"+" Atom}] - ["[0]" async {"+" Async Resolver} ("[1]#[0]" monad)] + ["[0]" atom (.only Atom)] + ["[0]" async (.only Async Resolver) ("[1]#[0]" monad)] ["[0]" frp]]]]) (exception: got_wrecked) diff --git a/stdlib/source/test/lux/control/concurrency/async.lux b/stdlib/source/test/lux/control/concurrency/async.lux index 0e59faf3d..39d2c8a28 100644 --- a/stdlib/source/test/lux/control/concurrency/async.lux +++ b/stdlib/source/test/lux/control/concurrency/async.lux @@ -1,12 +1,12 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] ["@" target] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification - ["$[0]" functor {"+" Injection Comparison}] + ["$[0]" functor (.only Injection Comparison)] ["$[0]" apply] ["$[0]" monad]]] [control @@ -23,7 +23,7 @@ [\\library ["[0]" / [// - ["[0]" atom {"+" Atom}]]]]) + ["[0]" atom (.only Atom)]]]]) (def: injection (Injection /.Async) diff --git a/stdlib/source/test/lux/control/concurrency/atom.lux b/stdlib/source/test/lux/control/concurrency/atom.lux index 04b80f7ca..48614cdac 100644 --- a/stdlib/source/test/lux/control/concurrency/atom.lux +++ b/stdlib/source/test/lux/control/concurrency/atom.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" io]] [math diff --git a/stdlib/source/test/lux/control/concurrency/frp.lux b/stdlib/source/test/lux/control/concurrency/frp.lux index c5c84f492..9c552c888 100644 --- a/stdlib/source/test/lux/control/concurrency/frp.lux +++ b/stdlib/source/test/lux/control/concurrency/frp.lux @@ -1,21 +1,21 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification - ["$[0]" functor {"+" Injection Comparison}] + ["$[0]" functor (.only Injection Comparison)] ["$[0]" apply] ["$[0]" monad]]] [control ["[0]" try] ["[0]" exception] - ["[0]" io {"+" IO io}]] + ["[0]" io (.only IO io)]] [data [collection ["[0]" list ("[1]#[0]" mix monoid)] - ["[0]" sequence {"+" Sequence}]]] + ["[0]" sequence (.only Sequence)]]] [math ["[0]" random] [number @@ -25,8 +25,8 @@ [\\library ["[0]" / [// - ["[0]" async {"+" Async} ("[1]#[0]" monad)] - ["[0]" atom {"+" Atom atom}]]]]) + ["[0]" async (.only Async) ("[1]#[0]" monad)] + ["[0]" atom (.only Atom atom)]]]]) (def: injection (Injection /.Channel) diff --git a/stdlib/source/test/lux/control/concurrency/semaphore.lux b/stdlib/source/test/lux/control/concurrency/semaphore.lux index 275613ebd..710084670 100644 --- a/stdlib/source/test/lux/control/concurrency/semaphore.lux +++ b/stdlib/source/test/lux/control/concurrency/semaphore.lux @@ -1,22 +1,22 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] ["@" target] [abstract - ["[0]" monad {"+" do}] + ["[0]" monad (.only do)] ["[0]" enum]] [control ["[0]" io] ["[0]" maybe] ["[0]" try] - ["[0]" exception {"+" exception:}] + ["[0]" exception (.only exception:)] [concurrency - ["[0]" async {"+" Async}] - ["[0]" atom {"+" Atom}]]] + ["[0]" async (.only Async)] + ["[0]" atom (.only Atom)]]] [data ["[0]" text ("[1]#[0]" equivalence) - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" functor)]]] [math diff --git a/stdlib/source/test/lux/control/concurrency/stm.lux b/stdlib/source/test/lux/control/concurrency/stm.lux index 6b0e64a57..9826808f3 100644 --- a/stdlib/source/test/lux/control/concurrency/stm.lux +++ b/stdlib/source/test/lux/control/concurrency/stm.lux @@ -1,15 +1,15 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - ["[0]" monad {"+" Monad do}] + ["[0]" monad (.only Monad do)] [\\specification - ["$[0]" functor {"+" Injection Comparison}] + ["$[0]" functor (.only Injection Comparison)] ["$[0]" apply] ["$[0]" monad]]] [control - ["[0]" io {"+" IO}]] + ["[0]" io (.only IO)]] [data ["[0]" product] [collection @@ -21,9 +21,9 @@ [\\library ["[0]" / [// - ["[0]" atom {"+" Atom atom}] + ["[0]" atom (.only Atom atom)] ["[0]" async] - ["[0]" frp {"+" Channel}]]]]) + ["[0]" frp (.only Channel)]]]]) (def: injection (Injection /.STM) diff --git a/stdlib/source/test/lux/control/concurrency/thread.lux b/stdlib/source/test/lux/control/concurrency/thread.lux index cebb90dd8..ef41bdc14 100644 --- a/stdlib/source/test/lux/control/concurrency/thread.lux +++ b/stdlib/source/test/lux/control/concurrency/thread.lux @@ -1,13 +1,13 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" io]] [time - ["[0]" instant {"+" Instant}] + ["[0]" instant (.only Instant)] ["[0]" duration]] [math ["[0]" random] @@ -17,7 +17,7 @@ [\\library ["[0]" / [// - ["[0]" atom {"+" Atom}] + ["[0]" atom (.only Atom)] ["[0]" async]]]]) (def: .public test diff --git a/stdlib/source/test/lux/control/continuation.lux b/stdlib/source/test/lux/control/continuation.lux index 062142453..8da80291a 100644 --- a/stdlib/source/test/lux/control/continuation.lux +++ b/stdlib/source/test/lux/control/continuation.lux @@ -1,11 +1,11 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification - ["$[0]" functor {"+" Injection Comparison}] + ["$[0]" functor (.only Injection Comparison)] ["$[0]" apply] ["$[0]" monad]]] [data diff --git a/stdlib/source/test/lux/control/exception.lux b/stdlib/source/test/lux/control/exception.lux index fb69ebee8..225915128 100644 --- a/stdlib/source/test/lux/control/exception.lux +++ b/stdlib/source/test/lux/control/exception.lux @@ -1,20 +1,20 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [data ["[0]" text ("[1]#[0]" equivalence) - ["%" format {"+" format}]]] + ["%" format (.only format)]]] [math ["[0]" random] [number ["n" nat]]]]] [\\library - ["[0]" / {"+" exception:} + ["[0]" / (.only exception:) [// - ["[0]" try {"+" Try}]]]]) + ["[0]" try (.only Try)]]]]) (exception: an_exception) (exception: another_exception) diff --git a/stdlib/source/test/lux/control/function.lux b/stdlib/source/test/lux/control/function.lux index e6a9eb5b4..510fae5f4 100644 --- a/stdlib/source/test/lux/control/function.lux +++ b/stdlib/source/test/lux/control/function.lux @@ -1,14 +1,14 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [equivalence {"+" Equivalence}] - [monad {"+" do}] + [equivalence (.only Equivalence)] + [monad (.only do)] [\\specification ["$[0]" monoid]]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat]]]]] [\\library diff --git a/stdlib/source/test/lux/control/function/contract.lux b/stdlib/source/test/lux/control/function/contract.lux index cf12b1fbf..e6ad2ce29 100644 --- a/stdlib/source/test/lux/control/function/contract.lux +++ b/stdlib/source/test/lux/control/function/contract.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" try] ["[0]" exception]] diff --git a/stdlib/source/test/lux/control/function/inline.lux b/stdlib/source/test/lux/control/function/inline.lux index 98bc73c3b..a992b6cb4 100644 --- a/stdlib/source/test/lux/control/function/inline.lux +++ b/stdlib/source/test/lux/control/function/inline.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [math ["[0]" random] [number diff --git a/stdlib/source/test/lux/control/function/memo.lux b/stdlib/source/test/lux/control/function/memo.lux index 84abe3905..c01040b34 100644 --- a/stdlib/source/test/lux/control/function/memo.lux +++ b/stdlib/source/test/lux/control/function/memo.lux @@ -1,16 +1,16 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control - ["[0]" io {"+" IO}] - ["[0]" state {"+" State} ("[1]#[0]" monad)]] + ["[0]" io (.only IO)] + ["[0]" state (.only State) ("[1]#[0]" monad)]] [data ["[0]" product] [collection - ["[0]" dictionary {"+" Dictionary}] + ["[0]" dictionary (.only Dictionary)] ["[0]" list ("[1]#[0]" functor mix)]]] [macro ["^" pattern]] @@ -21,7 +21,7 @@ ["[0]" i64]]] [time ["[0]" instant] - ["[0]" duration {"+" Duration}]]]] + ["[0]" duration (.only Duration)]]]] [\\library ["[0]" / ["/[1]" // "_" diff --git a/stdlib/source/test/lux/control/function/mixin.lux b/stdlib/source/test/lux/control/function/mixin.lux index 8cb2ae3c6..6cabe7a62 100644 --- a/stdlib/source/test/lux/control/function/mixin.lux +++ b/stdlib/source/test/lux/control/function/mixin.lux @@ -1,15 +1,15 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [equivalence {"+" Equivalence}] - [predicate {"+" Predicate}] - [monad {"+" do}] + [equivalence (.only Equivalence)] + [predicate (.only Predicate)] + [monad (.only do)] [\\specification ["$[0]" monoid]]] [control - ["[0]" state {"+" State}]] + ["[0]" state (.only State)]] [data ["[0]" product] [collection @@ -17,7 +17,7 @@ [macro ["^" pattern]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat]]]]] [\\library diff --git a/stdlib/source/test/lux/control/function/mutual.lux b/stdlib/source/test/lux/control/function/mutual.lux index 1b5c38f78..badf850a0 100644 --- a/stdlib/source/test/lux/control/function/mutual.lux +++ b/stdlib/source/test/lux/control/function/mutual.lux @@ -1,15 +1,15 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [data ["[0]" bit ("[1]#[0]" equivalence)] [text - ["%" format {"+" format}]]] + ["%" format (.only format)]]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat]]]]] [\\library diff --git a/stdlib/source/test/lux/control/io.lux b/stdlib/source/test/lux/control/io.lux index 52cdf2b8c..df063a508 100644 --- a/stdlib/source/test/lux/control/io.lux +++ b/stdlib/source/test/lux/control/io.lux @@ -1,11 +1,11 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification - ["$[0]" functor {"+" Injection Comparison}] + ["$[0]" functor (.only Injection Comparison)] ["$[0]" apply] ["$[0]" monad]]] [math @@ -13,7 +13,7 @@ [number ["n" nat]]]]] [\\library - ["[0]" / {"+" IO} + ["[0]" / (.only IO) [// ["[0]" function]]]]) diff --git a/stdlib/source/test/lux/control/lazy.lux b/stdlib/source/test/lux/control/lazy.lux index 0c00be310..cc79c4b46 100644 --- a/stdlib/source/test/lux/control/lazy.lux +++ b/stdlib/source/test/lux/control/lazy.lux @@ -1,22 +1,22 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification - ["$[0]" functor {"+" Injection Comparison}] + ["$[0]" functor (.only Injection Comparison)] ["$[0]" apply] ["$[0]" monad] ["$[0]" equivalence]]] [data ["[0]" product]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat]]]]] [\\library - ["[0]" / {"+" Lazy}]]) + ["[0]" / (.only Lazy)]]) (def: injection (Injection Lazy) diff --git a/stdlib/source/test/lux/control/maybe.lux b/stdlib/source/test/lux/control/maybe.lux index e980121b7..b12b76f92 100644 --- a/stdlib/source/test/lux/control/maybe.lux +++ b/stdlib/source/test/lux/control/maybe.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence] ["$[0]" hash] @@ -19,7 +19,7 @@ [collection ["[0]" list]]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat]]]]] [\\library diff --git a/stdlib/source/test/lux/control/parser.lux b/stdlib/source/test/lux/control/parser.lux index fcb84271d..567a825b8 100644 --- a/stdlib/source/test/lux/control/parser.lux +++ b/stdlib/source/test/lux/control/parser.lux @@ -1,21 +1,21 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] - [equivalence {"+" Equivalence}] + [monad (.only do)] + [equivalence (.only Equivalence)] [\\specification - ["$[0]" functor {"+" Injection Comparison}] + ["$[0]" functor (.only Injection Comparison)] ["$[0]" apply] ["$[0]" monad]]] [control - ["[0]" try {"+" Try}] + ["[0]" try (.only Try)] [parser ["<[0]>" code]]] [data ["[0]" text ("[1]#[0]" equivalence) - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" functor)]]] [math @@ -23,10 +23,10 @@ [number ["n" nat]]] [macro - [syntax {"+" syntax:}] + [syntax (.only syntax:)] ["[0]" code]]]] [\\library - ["[0]" / {"+" Parser}]] + ["[0]" / (.only Parser)]] ["[0]" / "_" ["[1][0]" analysis] ["[1][0]" binary] diff --git a/stdlib/source/test/lux/control/parser/analysis.lux b/stdlib/source/test/lux/control/parser/analysis.lux index 92be5bc35..453138aaa 100644 --- a/stdlib/source/test/lux/control/parser/analysis.lux +++ b/stdlib/source/test/lux/control/parser/analysis.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" pipe] ["[0]" try] @@ -15,7 +15,7 @@ [collection ["[0]" list]]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat] ["i" int] @@ -25,8 +25,8 @@ ["[0]" symbol ("[1]#[0]" equivalence)]] [tool [compiler - [reference {"+" Constant} - [variable {"+"}]] + [reference (.only Constant) + [variable (.only)]] [language [lux ["[0]" analysis]]]]]]] diff --git a/stdlib/source/test/lux/control/parser/binary.lux b/stdlib/source/test/lux/control/parser/binary.lux index 50f1bea42..9ede7e084 100644 --- a/stdlib/source/test/lux/control/parser/binary.lux +++ b/stdlib/source/test/lux/control/parser/binary.lux @@ -1,12 +1,12 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] ["[0]" type] [abstract - [equivalence {"+" Equivalence}] - [predicate {"+" Predicate}] - [monad {"+" do}]] + [equivalence (.only Equivalence)] + [predicate (.only Predicate)] + [monad (.only do)]] [control ["[0]" pipe] ["[0]" maybe] @@ -18,7 +18,7 @@ ["[0]" sum] ["[0]" bit] ["[0]" text ("[1]#[0]" equivalence) - ["%" format {"+" format}] + ["%" format (.only format)] [encoding ["[0]" utf8]]] ["[0]" format "_" @@ -31,7 +31,7 @@ ["^" pattern] ["[0]" code]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat] ["[0]" i64] diff --git a/stdlib/source/test/lux/control/parser/cli.lux b/stdlib/source/test/lux/control/parser/cli.lux index 69d9a20e7..5cfb0e2a2 100644 --- a/stdlib/source/test/lux/control/parser/cli.lux +++ b/stdlib/source/test/lux/control/parser/cli.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" try] ["<>" parser]] diff --git a/stdlib/source/test/lux/control/parser/code.lux b/stdlib/source/test/lux/control/parser/code.lux index c4e202aba..10202231e 100644 --- a/stdlib/source/test/lux/control/parser/code.lux +++ b/stdlib/source/test/lux/control/parser/code.lux @@ -1,9 +1,9 @@ (.using [library [lux {"-" local global} - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" function] ["[0]" try] @@ -17,7 +17,7 @@ ["^" pattern] ["[0]" code]] [math - ["[0]" random {"+" Random} ("[1]#[0]" functor)] + ["[0]" random (.only Random) ("[1]#[0]" functor)] [number ["[0]" nat] ["[0]" int] diff --git a/stdlib/source/test/lux/control/parser/environment.lux b/stdlib/source/test/lux/control/parser/environment.lux index 3f1c4bd6d..5cf714641 100644 --- a/stdlib/source/test/lux/control/parser/environment.lux +++ b/stdlib/source/test/lux/control/parser/environment.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" try] ["[0]" exception]] diff --git a/stdlib/source/test/lux/control/parser/json.lux b/stdlib/source/test/lux/control/parser/json.lux index 40d48afab..775e03093 100644 --- a/stdlib/source/test/lux/control/parser/json.lux +++ b/stdlib/source/test/lux/control/parser/json.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" pipe] ["[0]" maybe] @@ -17,13 +17,13 @@ ["[0]" list ("[1]#[0]" functor)] ["[0]" set] ["[0]" dictionary] - ["[0]" sequence {"+" sequence} ("[1]#[0]" functor)]] + ["[0]" sequence (.only sequence) ("[1]#[0]" functor)]] [format ["[0]" json]]] [macro ["^" pattern]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat] ["[0]" frac]]]]] diff --git a/stdlib/source/test/lux/control/parser/synthesis.lux b/stdlib/source/test/lux/control/parser/synthesis.lux index 4cf859a46..901821c1f 100644 --- a/stdlib/source/test/lux/control/parser/synthesis.lux +++ b/stdlib/source/test/lux/control/parser/synthesis.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["<>" parser] ["[0]" try] @@ -16,7 +16,7 @@ [macro ["^" pattern]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat] ["[0]" i64] @@ -25,12 +25,12 @@ ["[0]" symbol]] [tool [compiler - [reference {"+" } - ["[0]" variable {"+" Variable}]] + [reference (.only) + ["[0]" variable (.only Variable)]] [language [lux - [analysis {"+" Environment}] - ["[0]" synthesis {"+" Synthesis}]]]]]]] + [analysis (.only Environment)] + ["[0]" synthesis (.only Synthesis)]]]]]]] [\\library ["[0]" /]]) diff --git a/stdlib/source/test/lux/control/parser/text.lux b/stdlib/source/test/lux/control/parser/text.lux index 94f067ef7..b1ba8f9f7 100644 --- a/stdlib/source/test/lux/control/parser/text.lux +++ b/stdlib/source/test/lux/control/parser/text.lux @@ -1,17 +1,17 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" maybe] - ["[0]" try {"+" Try}] - ["[0]" exception {"+" Exception}] + ["[0]" try (.only Try)] + ["[0]" exception (.only Exception)] ["[0]" function]] [data ["[0]" text ("[1]#[0]" equivalence) - ["%" format {"+" format}] + ["%" format (.only format)] ["[0]" unicode "_" ["[1]" set] ["[1]/[0]" block]]] @@ -22,7 +22,7 @@ ["[0]" finger]]]] [math ["[0]" random] - [number {"+" hex} + [number (.only hex) ["n" nat]]] [macro ["^" pattern] diff --git a/stdlib/source/test/lux/control/parser/tree.lux b/stdlib/source/test/lux/control/parser/tree.lux index 391e90014..5ba170c13 100644 --- a/stdlib/source/test/lux/control/parser/tree.lux +++ b/stdlib/source/test/lux/control/parser/tree.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" try] ["[0]" exception]] diff --git a/stdlib/source/test/lux/control/parser/type.lux b/stdlib/source/test/lux/control/parser/type.lux index 66f5114db..da05ecdc9 100644 --- a/stdlib/source/test/lux/control/parser/type.lux +++ b/stdlib/source/test/lux/control/parser/type.lux @@ -1,22 +1,22 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] ["[0]" type ("[1]#[0]" equivalence)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" try] ["[0]" exception]] [data [text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list]]] [macro ["^" pattern]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat]]] [meta diff --git a/stdlib/source/test/lux/control/parser/xml.lux b/stdlib/source/test/lux/control/parser/xml.lux index f3e19d428..b2bc6a83b 100644 --- a/stdlib/source/test/lux/control/parser/xml.lux +++ b/stdlib/source/test/lux/control/parser/xml.lux @@ -1,10 +1,10 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] ["[0]" type ("[1]#[0]" equivalence)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" try ("[1]#[0]" functor)] ["[0]" exception]] @@ -19,7 +19,7 @@ ["^" pattern] ["[0]" template]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat]]] [meta diff --git a/stdlib/source/test/lux/control/pipe.lux b/stdlib/source/test/lux/control/pipe.lux index 3c1c53232..8644e36d7 100644 --- a/stdlib/source/test/lux/control/pipe.lux +++ b/stdlib/source/test/lux/control/pipe.lux @@ -1,14 +1,14 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] ["[0]" debug] [abstract - [monad {"+" do}]] + [monad (.only do)]] [data ["[0]" identity] ["[0]" text ("[1]#[0]" equivalence) - ["%" format {"+" format}]]] + ["%" format (.only format)]]] [math ["[0]" random] [number diff --git a/stdlib/source/test/lux/control/reader.lux b/stdlib/source/test/lux/control/reader.lux index fead04bfa..9471e2f93 100644 --- a/stdlib/source/test/lux/control/reader.lux +++ b/stdlib/source/test/lux/control/reader.lux @@ -1,11 +1,11 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification - ["$[0]" functor {"+" Injection Comparison}] + ["$[0]" functor (.only Injection Comparison)] ["$[0]" apply] ["$[0]" monad]]] [math @@ -13,9 +13,9 @@ [number ["n" nat]]]]] [\\library - ["[0]" / {"+" Reader} + ["[0]" / (.only Reader) [// - ["[0]" io {"+" IO}]]]]) + ["[0]" io (.only IO)]]]]) (def: (injection value) (Injection (All (_ a r) (Reader r a))) diff --git a/stdlib/source/test/lux/control/region.lux b/stdlib/source/test/lux/control/region.lux index da40cde51..4a257cce6 100644 --- a/stdlib/source/test/lux/control/region.lux +++ b/stdlib/source/test/lux/control/region.lux @@ -1,20 +1,20 @@ (.using [library [lux "*" - [type {"+" sharing}] - ["_" test {"+" Test}] + [type (.only sharing)] + ["_" test (.only Test)] [abstract - [equivalence {"+" Equivalence}] - [functor {"+" Functor}] - [apply {"+" Apply}] - ["[0]" monad {"+" Monad do}] + [equivalence (.only Equivalence)] + [functor (.only Functor)] + [apply (.only Apply)] + ["[0]" monad (.only Monad do)] ["[0]" enum] [\\specification - ["$[0]" functor {"+" Injection Comparison}] + ["$[0]" functor (.only Injection Comparison)] ["$[0]" apply] ["$[0]" monad]]] [control - ["[0]" try {"+" Try}]] + ["[0]" try (.only Try)]] [data [collection ["[0]" list]]] @@ -23,10 +23,10 @@ [number ["n" nat]]]]] [\\library - ["[0]" / {"+" Region} + ["[0]" / (.only Region) [// - ["[0]" thread {"+" Thread}] - ["[0]" exception {"+" Exception exception:}]]]]) + ["[0]" thread (.only Thread)] + ["[0]" exception (.only Exception exception:)]]]]) (exception: oops) diff --git a/stdlib/source/test/lux/control/remember.lux b/stdlib/source/test/lux/control/remember.lux index 575e99aac..0fcd8833c 100644 --- a/stdlib/source/test/lux/control/remember.lux +++ b/stdlib/source/test/lux/control/remember.lux @@ -1,30 +1,30 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] ["[0]" meta] [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["[0]" io] - ["[0]" try {"+" Try}] + ["[0]" try (.only Try)] ["[0]" exception] [parser ["<[0]>" code]]] [data ["[0]" product] ["[0]" text - ["%" format {"+" format}]]] + ["%" format (.only format)]]] [math - [number {"+" hex}] - ["[0]" random {"+" Random} ("[1]#[0]" monad)]] + [number (.only hex)] + ["[0]" random (.only Random) ("[1]#[0]" monad)]] [time - ["[0]" date {"+" Date}] + ["[0]" date (.only Date)] ["[0]" instant] ["[0]" duration]] ["[0]" macro ["[0]" code] - ["[0]" syntax {"+" syntax:}]]]] + ["[0]" syntax (.only syntax:)]]]] [\\library ["[0]" /]]) diff --git a/stdlib/source/test/lux/control/security/capability.lux b/stdlib/source/test/lux/control/security/capability.lux index aa25ebd6c..c68e5454c 100644 --- a/stdlib/source/test/lux/control/security/capability.lux +++ b/stdlib/source/test/lux/control/security/capability.lux @@ -1,11 +1,11 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control - ["[0]" io {"+" IO}] + ["[0]" io (.only IO)] [concurrency ["[0]" async]]] [math diff --git a/stdlib/source/test/lux/control/security/policy.lux b/stdlib/source/test/lux/control/security/policy.lux index afa9b2bda..60279a089 100644 --- a/stdlib/source/test/lux/control/security/policy.lux +++ b/stdlib/source/test/lux/control/security/policy.lux @@ -1,12 +1,12 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [hash {"+" Hash}] - [monad {"+" do}] + [hash (.only Hash)] + [monad (.only do)] [\\specification - ["$[0]" functor {"+" Injection Comparison}] + ["$[0]" functor (.only Injection Comparison)] ["$[0]" apply] ["$[0]" monad]]] [data @@ -18,7 +18,7 @@ [number ["n" nat]]]]] [\\library - ["[0]" / {"+" Context Privacy Can_Conceal Can_Reveal Privilege Private}]]) + ["[0]" / (.only Context Privacy Can_Conceal Can_Reveal Privilege Private)]]) (def: (injection can_conceal) (All (_ label) diff --git a/stdlib/source/test/lux/control/state.lux b/stdlib/source/test/lux/control/state.lux index d821f5e62..2014d74fe 100644 --- a/stdlib/source/test/lux/control/state.lux +++ b/stdlib/source/test/lux/control/state.lux @@ -1,11 +1,11 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification - ["$[0]" functor {"+" Injection Comparison}] + ["$[0]" functor (.only Injection Comparison)] ["$[0]" apply] ["$[0]" monad]]] [control @@ -18,7 +18,7 @@ [number ["n" nat]]]]] [\\library - ["[0]" / {"+" State}]]) + ["[0]" / (.only State)]]) (def: (with_conditions [state output] computation) (-> [Nat Nat] (State Nat Nat) Bit) diff --git a/stdlib/source/test/lux/control/thread.lux b/stdlib/source/test/lux/control/thread.lux index ed83c132f..808936de6 100644 --- a/stdlib/source/test/lux/control/thread.lux +++ b/stdlib/source/test/lux/control/thread.lux @@ -1,11 +1,11 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification - ["$[0]" functor {"+" Injection Comparison}] + ["$[0]" functor (.only Injection Comparison)] ["$[0]" apply] ["$[0]" monad]]] [math @@ -13,7 +13,7 @@ [number ["n" nat]]]]] [\\library - ["[0]" / {"+" Thread} + ["[0]" / (.only Thread) [// ["[0]" io]]]]) diff --git a/stdlib/source/test/lux/control/try.lux b/stdlib/source/test/lux/control/try.lux index 1c9af6336..7229b588d 100644 --- a/stdlib/source/test/lux/control/try.lux +++ b/stdlib/source/test/lux/control/try.lux @@ -1,11 +1,11 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification - ["$[0]" functor {"+" Injection Comparison}] + ["$[0]" functor (.only Injection Comparison)] ["$[0]" apply] ["$[0]" monad] ["$[0]" equivalence]]] @@ -15,11 +15,11 @@ [data ["[0]" text ("[1]#[0]" equivalence)]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat]]]]] [\\library - ["[0]" / {"+" Try}]]) + ["[0]" / (.only Try)]]) (def: injection (Injection Try) diff --git a/stdlib/source/test/lux/control/writer.lux b/stdlib/source/test/lux/control/writer.lux index 418024334..6dd67b4c4 100644 --- a/stdlib/source/test/lux/control/writer.lux +++ b/stdlib/source/test/lux/control/writer.lux @@ -1,13 +1,13 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [equivalence {"+" Equivalence}] - [monoid {"+" Monoid}] - [monad {"+" do}] + [equivalence (.only Equivalence)] + [monoid (.only Monoid)] + [monad (.only do)] [\\specification - ["$[0]" functor {"+" Injection Comparison}] + ["$[0]" functor (.only Injection Comparison)] ["$[0]" apply] ["$[0]" monad]]] [control @@ -20,7 +20,7 @@ [number ["n" nat]]]]] [\\library - ["[0]" / {"+" Writer}]]) + ["[0]" / (.only Writer)]]) (def: (injection monoid value) (All (_ w) (-> (Monoid w) (Injection (Writer w)))) diff --git a/stdlib/source/test/lux/data.lux b/stdlib/source/test/lux/data.lux index dc85d5c14..c1af1c94b 100644 --- a/stdlib/source/test/lux/data.lux +++ b/stdlib/source/test/lux/data.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [math ["[0]" random]]]] ["[0]" / "_" diff --git a/stdlib/source/test/lux/data/binary.lux b/stdlib/source/test/lux/data/binary.lux index 9e4e8e6b6..02c8373cd 100644 --- a/stdlib/source/test/lux/data/binary.lux +++ b/stdlib/source/test/lux/data/binary.lux @@ -1,24 +1,24 @@ (.using [library [lux "*" - [ffi {"+"}] - ["_" test {"+" Test}] + [ffi (.only)] + ["_" test (.only Test)] [abstract - ["[0]" monad {"+" do}] + ["[0]" monad (.only do)] ["[0]" enum] [\\specification ["$[0]" equivalence] ["$[0]" monoid]]] [control - ["[0]" try {"+" Try}] - ["[0]" exception {"+" Exception}]] + ["[0]" try (.only Try)] + ["[0]" exception (.only Exception)]] [data [collection ["[0]" list ("[1]#[0]" functor)] [array - [\\unsafe {"+"}]]]] + [\\unsafe (.only)]]]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat] ["[0]" i64]]]]] diff --git a/stdlib/source/test/lux/data/bit.lux b/stdlib/source/test/lux/data/bit.lux index 25e1c5c8e..9a8e2c0f3 100644 --- a/stdlib/source/test/lux/data/bit.lux +++ b/stdlib/source/test/lux/data/bit.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence] ["$[0]" hash] diff --git a/stdlib/source/test/lux/data/collection.lux b/stdlib/source/test/lux/data/collection.lux index 42c962e59..3516bd626 100644 --- a/stdlib/source/test/lux/data/collection.lux +++ b/stdlib/source/test/lux/data/collection.lux @@ -1,7 +1,7 @@ (.using [library [lux "*" - ["_" test {"+" Test}]]] + ["_" test (.only Test)]]] ["[0]" / "_" ["[1][0]" array] ["[1][0]" bits] diff --git a/stdlib/source/test/lux/data/collection/array.lux b/stdlib/source/test/lux/data/collection/array.lux index 278394bd3..badba4922 100644 --- a/stdlib/source/test/lux/data/collection/array.lux +++ b/stdlib/source/test/lux/data/collection/array.lux @@ -1,17 +1,17 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [functor {"+"}] - [monad {"+" do}] + [functor (.only)] + [monad (.only do)] ["[0]" monoid ["$[1]" \\specification]] - ["[0]" mix {"+" Mix} + ["[0]" mix (.only Mix) ["$[1]" \\specification]] [\\specification ["$[0]" equivalence] - ["$[0]" functor {"+" Injection}]]] + ["$[0]" functor (.only Injection)]]] [control ["[0]" maybe ("[1]#[0]" functor)]] [data @@ -21,11 +21,11 @@ ["[0]" list] ["[0]" set]]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat]]]]] [\\library - ["[0]" / {"+" Array} + ["[0]" / (.only Array) ["!" \\unsafe]]]) (def: injection diff --git a/stdlib/source/test/lux/data/collection/bits.lux b/stdlib/source/test/lux/data/collection/bits.lux index 717ed5337..b4c9beda0 100644 --- a/stdlib/source/test/lux/data/collection/bits.lux +++ b/stdlib/source/test/lux/data/collection/bits.lux @@ -1,18 +1,18 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] ["[0]" predicate] [\\specification ["$[0]" equivalence]]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat]]]]] [\\library - ["[0]" / {"+" Bits}]]) + ["[0]" / (.only Bits)]]) (def: (size min max) (-> Nat Nat (Random Nat)) diff --git a/stdlib/source/test/lux/data/collection/dictionary.lux b/stdlib/source/test/lux/data/collection/dictionary.lux index b48338682..3bca9cf59 100644 --- a/stdlib/source/test/lux/data/collection/dictionary.lux +++ b/stdlib/source/test/lux/data/collection/dictionary.lux @@ -1,13 +1,13 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [hash {"+" Hash}] - [monad {"+" do}] + [hash (.only Hash)] + [monad (.only do)] [\\specification ["$[0]" equivalence] - ["$[0]" functor {"+" Injection}]]] + ["$[0]" functor (.only Injection)]]] [control ["[0]" maybe ("[1]#[0]" functor)] ["[0]" try] diff --git a/stdlib/source/test/lux/data/collection/dictionary/ordered.lux b/stdlib/source/test/lux/data/collection/dictionary/ordered.lux index 6e3acefa2..de575006c 100644 --- a/stdlib/source/test/lux/data/collection/dictionary/ordered.lux +++ b/stdlib/source/test/lux/data/collection/dictionary/ordered.lux @@ -1,11 +1,11 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] - [equivalence {"+" Equivalence}] - [order {"+" Order}] + [monad (.only do)] + [equivalence (.only Equivalence)] + [order (.only Order)] [\\specification ["$[0]" equivalence]]] [control @@ -17,7 +17,7 @@ ["[0]" set] ["[0]" list ("[1]#[0]" functor)]]] [math - ["[0]" random {"+" Random} ("[1]#[0]" monad)] + ["[0]" random (.only Random) ("[1]#[0]" monad)] [number ["n" nat]]]]] [\\library diff --git a/stdlib/source/test/lux/data/collection/dictionary/plist.lux b/stdlib/source/test/lux/data/collection/dictionary/plist.lux index ecac86868..ce6ff1722 100644 --- a/stdlib/source/test/lux/data/collection/dictionary/plist.lux +++ b/stdlib/source/test/lux/data/collection/dictionary/plist.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence] ["$[0]" monoid]]] @@ -16,7 +16,7 @@ ["[0]" set] ["[0]" list]]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat]]]]] [\\library diff --git a/stdlib/source/test/lux/data/collection/list.lux b/stdlib/source/test/lux/data/collection/list.lux index 9351adb21..65f32d8c5 100644 --- a/stdlib/source/test/lux/data/collection/list.lux +++ b/stdlib/source/test/lux/data/collection/list.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] ["[0]" enum] [\\specification ["$[0]" equivalence] @@ -25,7 +25,7 @@ [collection ["[0]" set]]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat] ["[0]" int]]]]] diff --git a/stdlib/source/test/lux/data/collection/queue.lux b/stdlib/source/test/lux/data/collection/queue.lux index ef8575e81..a8f4bdea6 100644 --- a/stdlib/source/test/lux/data/collection/queue.lux +++ b/stdlib/source/test/lux/data/collection/queue.lux @@ -1,12 +1,12 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence] - ["$[0]" functor {"+" Injection}]]] + ["$[0]" functor (.only Injection)]]] [data ["[0]" bit ("[1]#[0]" equivalence)] [collection diff --git a/stdlib/source/test/lux/data/collection/queue/priority.lux b/stdlib/source/test/lux/data/collection/queue/priority.lux index c802d6368..3a966e63a 100644 --- a/stdlib/source/test/lux/data/collection/queue/priority.lux +++ b/stdlib/source/test/lux/data/collection/queue/priority.lux @@ -1,19 +1,19 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["[0]" maybe ("[1]#[0]" functor)]] [data ["[0]" bit ("[1]#[0]" equivalence)]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat]]]]] [\\library - ["[0]" / {"+" Queue}]]) + ["[0]" / (.only Queue)]]) (def: .public (random size) (-> Nat (Random (Queue Nat))) diff --git a/stdlib/source/test/lux/data/collection/sequence.lux b/stdlib/source/test/lux/data/collection/sequence.lux index f3c3bb0d0..43266f2a2 100644 --- a/stdlib/source/test/lux/data/collection/sequence.lux +++ b/stdlib/source/test/lux/data/collection/sequence.lux @@ -1,18 +1,18 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence] ["$[0]" monoid] ["$[0]" mix] - ["$[0]" functor {"+" Injection}] + ["$[0]" functor (.only Injection)] ["$[0]" apply] ["$[0]" monad]]] [control - ["[0]" try {"+" Try}] + ["[0]" try (.only Try)] ["[0]" exception]] [data ["[0]" bit ("[1]#[0]" equivalence)] diff --git a/stdlib/source/test/lux/data/collection/set.lux b/stdlib/source/test/lux/data/collection/set.lux index e42a3e3a7..798e768b4 100644 --- a/stdlib/source/test/lux/data/collection/set.lux +++ b/stdlib/source/test/lux/data/collection/set.lux @@ -1,10 +1,10 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [hash {"+" Hash}] - [monad {"+" do}] + [hash (.only Hash)] + [monad (.only do)] [\\specification ["$[0]" equivalence] ["$[0]" hash] @@ -14,7 +14,7 @@ [collection ["[0]" list]]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat]]]]] [\\library diff --git a/stdlib/source/test/lux/data/collection/set/multi.lux b/stdlib/source/test/lux/data/collection/set/multi.lux index 93f7ef7e6..2bbd890e6 100644 --- a/stdlib/source/test/lux/data/collection/set/multi.lux +++ b/stdlib/source/test/lux/data/collection/set/multi.lux @@ -1,10 +1,10 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [hash {"+" Hash}] - [monad {"+" do}] + [hash (.only Hash)] + [monad (.only do)] ["[0]" predicate] [\\specification ["$[0]" equivalence] @@ -15,7 +15,7 @@ ["[0]" set] ["[0]" list ("[1]#[0]" mix)]]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat]]]]] [\\library diff --git a/stdlib/source/test/lux/data/collection/set/ordered.lux b/stdlib/source/test/lux/data/collection/set/ordered.lux index 429df3d21..36f3ebef6 100644 --- a/stdlib/source/test/lux/data/collection/set/ordered.lux +++ b/stdlib/source/test/lux/data/collection/set/ordered.lux @@ -1,10 +1,10 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] - [order {"+" Order}] + [monad (.only do)] + [order (.only Order)] [\\specification ["$[0]" equivalence]]] [data @@ -12,11 +12,11 @@ [collection ["[0]" list]]] [math - ["[0]" random {"+" Random} ("[1]#[0]" monad)] + ["[0]" random (.only Random) ("[1]#[0]" monad)] [number ["n" nat]]]]] [\\library - ["[0]" / {"+" Set} + ["[0]" / (.only Set) ["[0]" //]]]) (def: size diff --git a/stdlib/source/test/lux/data/collection/stack.lux b/stdlib/source/test/lux/data/collection/stack.lux index 62844c59d..6ce39af67 100644 --- a/stdlib/source/test/lux/data/collection/stack.lux +++ b/stdlib/source/test/lux/data/collection/stack.lux @@ -1,12 +1,12 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence] - ["$[0]" functor {"+" Injection}]]] + ["$[0]" functor (.only Injection)]]] [control ["[0]" maybe]] [data diff --git a/stdlib/source/test/lux/data/collection/stream.lux b/stdlib/source/test/lux/data/collection/stream.lux index f06af6f9c..66a66a7cb 100644 --- a/stdlib/source/test/lux/data/collection/stream.lux +++ b/stdlib/source/test/lux/data/collection/stream.lux @@ -1,17 +1,17 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] - [equivalence {"+" Equivalence}] + [monad (.only do)] + [equivalence (.only Equivalence)] ["[0]" enum] [\\specification ["$[0]" functor] ["$[0]" comonad]]] [data ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" functor)]]] [math diff --git a/stdlib/source/test/lux/data/collection/tree.lux b/stdlib/source/test/lux/data/collection/tree.lux index 0adcb50ba..d37ed210b 100644 --- a/stdlib/source/test/lux/data/collection/tree.lux +++ b/stdlib/source/test/lux/data/collection/tree.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - ["[0]" monad {"+" do}] + ["[0]" monad (.only do)] [\\specification ["$[0]" equivalence] ["$[0]" mix] @@ -13,11 +13,11 @@ [collection ["[0]" list ("[1]#[0]" functor mix)]]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat]]]]] [\\library - ["[0]" / {"+" Tree}]]) + ["[0]" / (.only Tree)]]) (def: .public (tree gen_value) (All (_ a) (-> (Random a) (Random [Nat (Tree a)]))) diff --git a/stdlib/source/test/lux/data/collection/tree/finger.lux b/stdlib/source/test/lux/data/collection/tree/finger.lux index 3fc005e70..131c758a2 100644 --- a/stdlib/source/test/lux/data/collection/tree/finger.lux +++ b/stdlib/source/test/lux/data/collection/tree/finger.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" maybe ("[1]#[0]" functor)]] [data @@ -14,7 +14,7 @@ ["[0]" random] [number ["n" nat]]] - [type {"+" by_example}]]] + [type (.only by_example)]]] [\\library ["[0]" /]]) diff --git a/stdlib/source/test/lux/data/collection/tree/zipper.lux b/stdlib/source/test/lux/data/collection/tree/zipper.lux index b6b9a965f..02e2fc901 100644 --- a/stdlib/source/test/lux/data/collection/tree/zipper.lux +++ b/stdlib/source/test/lux/data/collection/tree/zipper.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence] ["$[0]" functor] @@ -22,7 +22,7 @@ ["n" nat]]]]] ["[0]" //] [\\library - ["[0]" / {"+" Zipper} + ["[0]" / (.only Zipper) ["tree" //]]]) (def: move diff --git a/stdlib/source/test/lux/data/color.lux b/stdlib/source/test/lux/data/color.lux index de615faaf..b7dfa7405 100644 --- a/stdlib/source/test/lux/data/color.lux +++ b/stdlib/source/test/lux/data/color.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence] ["$[0]" hash] @@ -12,7 +12,7 @@ [collection ["[0]" list]]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat] ["f" frac] diff --git a/stdlib/source/test/lux/data/color/named.lux b/stdlib/source/test/lux/data/color/named.lux index 70663ba7c..d69ffca31 100644 --- a/stdlib/source/test/lux/data/color/named.lux +++ b/stdlib/source/test/lux/data/color/named.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [data [collection ["[0]" list] @@ -11,7 +11,7 @@ [macro ["[0]" template]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat]]]]] [\\library diff --git a/stdlib/source/test/lux/data/format/binary.lux b/stdlib/source/test/lux/data/format/binary.lux index 571a1ef5a..19c429b90 100644 --- a/stdlib/source/test/lux/data/format/binary.lux +++ b/stdlib/source/test/lux/data/format/binary.lux @@ -1,16 +1,16 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [equivalence {"+" Equivalence}] - [monad {"+" do}] + [equivalence (.only Equivalence)] + [monad (.only do)] [\\specification ["$[0]" monoid]]] [data ["[0]" binary ("[1]#[0]" equivalence)]] [math - ["[0]" random {"+" Random}]]]] + ["[0]" random (.only Random)]]]] [\\library ["[0]" /]]) diff --git a/stdlib/source/test/lux/data/format/json.lux b/stdlib/source/test/lux/data/format/json.lux index 63bbcab87..382f219ef 100644 --- a/stdlib/source/test/lux/data/format/json.lux +++ b/stdlib/source/test/lux/data/format/json.lux @@ -1,10 +1,10 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] ["[0]" meta] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence] ["$[0]" codec]]] @@ -14,22 +14,22 @@ ["[0]" product] ["[0]" bit] ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" sequence] ["[0]" dictionary] ["[0]" set] ["[0]" list ("[1]#[0]" functor)]]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat] ["[0]" frac]]] ["[0]" macro - ["[0]" syntax {"+" syntax:}] + ["[0]" syntax (.only syntax:)] ["[0]" code]]]] [\\library - ["[0]" / {"+" JSON} ("#[0]" equivalence)]]) + ["[0]" / (.only JSON) ("#[0]" equivalence)]]) (def: .public random (Random /.JSON) diff --git a/stdlib/source/test/lux/data/format/tar.lux b/stdlib/source/test/lux/data/format/tar.lux index b4c57411f..243d9d3e3 100644 --- a/stdlib/source/test/lux/data/format/tar.lux +++ b/stdlib/source/test/lux/data/format/tar.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" maybe] ["[0]" try] @@ -14,7 +14,7 @@ ["[0]" product] ["[0]" binary ("[1]#[0]" equivalence monoid)] ["[0]" text ("[1]#[0]" equivalence) - ["%" format {"+" format}] + ["%" format (.only format)] [encoding ["[0]" utf8]] ["[0]" unicode "_" @@ -26,10 +26,10 @@ ["[0]" format "_" ["[1]" binary]]] [time - ["[0]" instant {"+" Instant}] + ["[0]" instant (.only Instant)] ["[0]" duration]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat] ["i" int]]]]] diff --git a/stdlib/source/test/lux/data/format/xml.lux b/stdlib/source/test/lux/data/format/xml.lux index 0e45f5d72..20b4593dc 100644 --- a/stdlib/source/test/lux/data/format/xml.lux +++ b/stdlib/source/test/lux/data/format/xml.lux @@ -1,9 +1,9 @@ (.using [library [lux {"-" char symbol} - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" Monad do}] + [monad (.only Monad do)] [\\specification ["$[0]" equivalence] ["$[0]" codec]]] @@ -14,20 +14,20 @@ ["</>" xml]]] [data ["[0]" text ("[1]#[0]" equivalence) - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" dictionary] ["[0]" list ("[1]#[0]" functor)]]] [macro ["^" pattern]] [math - ["[0]" random {"+" Random} ("[1]#[0]" monad)] + ["[0]" random (.only Random) ("[1]#[0]" monad)] [number ["n" nat]]] [meta ["[0]" symbol]]]] [\\library - ["[0]" / {"+" XML}]]) + ["[0]" / (.only XML)]]) (def: char_range Text diff --git a/stdlib/source/test/lux/data/identity.lux b/stdlib/source/test/lux/data/identity.lux index 2e8c63f0b..c15ddf662 100644 --- a/stdlib/source/test/lux/data/identity.lux +++ b/stdlib/source/test/lux/data/identity.lux @@ -1,16 +1,16 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification - ["$[0]" functor {"+" Injection Comparison}] + ["$[0]" functor (.only Injection Comparison)] ["$[0]" apply] ["$[0]" monad] ["$[0]" comonad]]]]] [\\library - ["[0]" / {"+" Identity}]]) + ["[0]" / (.only Identity)]]) (def: injection (Injection Identity) diff --git a/stdlib/source/test/lux/data/product.lux b/stdlib/source/test/lux/data/product.lux index 9f7465057..f908c32c0 100644 --- a/stdlib/source/test/lux/data/product.lux +++ b/stdlib/source/test/lux/data/product.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence]]] [math diff --git a/stdlib/source/test/lux/data/sum.lux b/stdlib/source/test/lux/data/sum.lux index f1b132062..ce9f1ae13 100644 --- a/stdlib/source/test/lux/data/sum.lux +++ b/stdlib/source/test/lux/data/sum.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence] ["$[0]" hash]]] diff --git a/stdlib/source/test/lux/data/text.lux b/stdlib/source/test/lux/data/text.lux index 76e6f4ccb..80b4788ae 100644 --- a/stdlib/source/test/lux/data/text.lux +++ b/stdlib/source/test/lux/data/text.lux @@ -1,9 +1,9 @@ (.using [library [lux {"-" char} - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence] ["$[0]" hash] diff --git a/stdlib/source/test/lux/data/text/buffer.lux b/stdlib/source/test/lux/data/text/buffer.lux index aefc51bf1..1540b6485 100644 --- a/stdlib/source/test/lux/data/text/buffer.lux +++ b/stdlib/source/test/lux/data/text/buffer.lux @@ -1,14 +1,14 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [data ["[0]" text ("[1]#[0]" equivalence) - ["%" format {"+" format}]]] + ["%" format (.only format)]]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat]]]]] [\\library diff --git a/stdlib/source/test/lux/data/text/encoding.lux b/stdlib/source/test/lux/data/text/encoding.lux index b0a70422c..3949cb8ba 100644 --- a/stdlib/source/test/lux/data/text/encoding.lux +++ b/stdlib/source/test/lux/data/text/encoding.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" codec]]] [control @@ -17,7 +17,7 @@ [macro ["[0]" template]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat]]]]] [\\library diff --git a/stdlib/source/test/lux/data/text/encoding/utf8.lux b/stdlib/source/test/lux/data/text/encoding/utf8.lux index a95ea21e9..a4bd1beec 100644 --- a/stdlib/source/test/lux/data/text/encoding/utf8.lux +++ b/stdlib/source/test/lux/data/text/encoding/utf8.lux @@ -1,16 +1,16 @@ (.using - [library - [lux "*" - ["_" test {"+" Test}] - [abstract - [\\specification - ["$[0]" codec]]] - [data - ["[0]" text]] - [math - ["[0]" random {"+" Random}]]]] - [\\library - ["[0]" /]]) + [library + [lux "*" + ["_" test (.only Test)] + [abstract + [\\specification + ["$[0]" codec]]] + [data + ["[0]" text]] + [math + ["[0]" random (.only Random)]]]] + [\\library + ["[0]" /]]) (def: .public test Test diff --git a/stdlib/source/test/lux/data/text/escape.lux b/stdlib/source/test/lux/data/text/escape.lux index bcff2ef7d..b69cd62eb 100644 --- a/stdlib/source/test/lux/data/text/escape.lux +++ b/stdlib/source/test/lux/data/text/escape.lux @@ -1,11 +1,11 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] ["[0]" debug] ["[0]" meta] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" try] ["[0]" exception] @@ -13,17 +13,17 @@ ["<[0]>" code]]] [data ["[0]" bit ("[1]#[0]" equivalence)] - ["[0]" text {"+" Char} ("[1]#[0]" equivalence) - ["%" format {"+" format}]] + ["[0]" text (.only Char) ("[1]#[0]" equivalence) + ["%" format (.only format)]] [collection - ["[0]" set {"+" Set}]]] + ["[0]" set (.only Set)]]] [macro - [syntax {"+" syntax:}] + [syntax (.only syntax:)] ["[0]" code] ["[0]" template]] [math - ["[0]" random {"+" Random}] - [number {"+" hex} + ["[0]" random (.only Random)] + [number (.only hex) ["n" nat]]]]] [\\library ["[0]" / diff --git a/stdlib/source/test/lux/data/text/format.lux b/stdlib/source/test/lux/data/text/format.lux index 97a9005f8..b6f93d856 100644 --- a/stdlib/source/test/lux/data/text/format.lux +++ b/stdlib/source/test/lux/data/text/format.lux @@ -1,10 +1,10 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] - [equivalence {"+" Equivalence}] + [monad (.only do)] + [equivalence (.only Equivalence)] [functor [\\specification ["$[0]" contravariant]]]] @@ -25,7 +25,7 @@ ["[0]" duration] ["[0]" date]] [math - ["[0]" random {"+" Random} ("[1]#[0]" monad)] + ["[0]" random (.only Random) ("[1]#[0]" monad)] ["[0]" modulus] ["[0]" modular] [number diff --git a/stdlib/source/test/lux/data/text/regex.lux b/stdlib/source/test/lux/data/text/regex.lux index 7488c1b83..c1896061e 100644 --- a/stdlib/source/test/lux/data/text/regex.lux +++ b/stdlib/source/test/lux/data/text/regex.lux @@ -1,23 +1,23 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" pipe] ["[0]" try] [parser - ["<[0]>" text {"+" Parser}] + ["<[0]>" text (.only Parser)] ["<[0]>" code]]] [data ["[0]" text ("[1]#[0]" equivalence) - ["%" format {"+" format}]]] + ["%" format (.only format)]]] ["[0]" macro - [syntax {"+" syntax:}] + [syntax (.only syntax:)] ["[0]" code]] [math - [number {"+" hex}] + [number (.only hex)] ["[0]" random]]]] [\\library ["[0]" /]]) diff --git a/stdlib/source/test/lux/data/text/unicode/block.lux b/stdlib/source/test/lux/data/text/unicode/block.lux index b7c79e556..77a739e90 100644 --- a/stdlib/source/test/lux/data/text/unicode/block.lux +++ b/stdlib/source/test/lux/data/text/unicode/block.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence] ["$[0]" hash] @@ -16,8 +16,8 @@ [macro ["[0]" template]] [math - ["[0]" random {"+" Random}] - [number {"+" hex} + ["[0]" random (.only Random)] + [number (.only hex) ["n" nat]]]]] [\\library ["[0]" /]]) diff --git a/stdlib/source/test/lux/data/text/unicode/set.lux b/stdlib/source/test/lux/data/text/unicode/set.lux index 66b35626a..11270eab3 100644 --- a/stdlib/source/test/lux/data/text/unicode/set.lux +++ b/stdlib/source/test/lux/data/text/unicode/set.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence]]] [data @@ -12,7 +12,7 @@ [collection ["[0]" set ("[1]#[0]" equivalence)]]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat]]]]] ["[0]" / "_" diff --git a/stdlib/source/test/lux/debug.lux b/stdlib/source/test/lux/debug.lux index 3965359b5..257b65790 100644 --- a/stdlib/source/test/lux/debug.lux +++ b/stdlib/source/test/lux/debug.lux @@ -1,10 +1,10 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] ["@" target] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" try ("[1]#[0]" functor)] ["[0]" exception] @@ -12,25 +12,25 @@ ["<[0]>" code]]] [data ["[0]" text ("[1]#[0]" equivalence) - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" functor)]] [format - [json {"+" JSON}] - [xml {"+" XML}]]] + [json (.only JSON)] + [xml (.only XML)]]] ["[0]" macro - [syntax {"+" syntax:}] + [syntax (.only syntax:)] ["[0]" code]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number - [ratio {"+" Ratio}]]] - [time {"+" Time} - [instant {"+" Instant}] - [date {"+" Date}] - [duration {"+" Duration}] - [month {"+" Month}] - [day {"+" Day}]]]] + [ratio (.only Ratio)]]] + [time (.only Time) + [instant (.only Instant)] + [date (.only Date)] + [duration (.only Duration)] + [month (.only Month)] + [day (.only Day)]]]] [\\library ["[0]" /]] ["$[0]" // "_" diff --git a/stdlib/source/test/lux/documentation.lux b/stdlib/source/test/lux/documentation.lux index 684556ecf..bf8c733b6 100644 --- a/stdlib/source/test/lux/documentation.lux +++ b/stdlib/source/test/lux/documentation.lux @@ -1,7 +1,7 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] ["[0]" meta] [control ["[0]" try] @@ -14,7 +14,7 @@ [format ["md" markdown]]] ["[0]" macro - [syntax {"+" syntax:}] + [syntax (.only syntax:)] ["[0]" template] ["[0]" code]]]] [\\library diff --git a/stdlib/source/test/lux/extension.lux b/stdlib/source/test/lux/extension.lux index 5eb545463..adb10d26c 100644 --- a/stdlib/source/test/lux/extension.lux +++ b/stdlib/source/test/lux/extension.lux @@ -17,7 +17,7 @@ ["[0]" name]])) (~~ (.these))))]] [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["[0]" try ("[1]#[0]" functor)] ["<>" parser @@ -28,7 +28,7 @@ ["[0]" binary] ["[0]" product] ["[0]" text ("[1]#[0]" equivalence) - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" sequence] ["[0]" list ("[1]#[0]" functor)]] @@ -58,9 +58,9 @@ (~~ (.for "JVM" (~~ (.these ["[0]" jvm "_" ["[1]/[0]" runtime]])) (~~ (.these))))]]]]]] - ["_" test {"+" Test}]]] + ["_" test (.only Test)]]] [\\library - ["[0]" / {"+" analysis: synthesis: generation: directive:}]]))) + ["[0]" / (.only analysis: synthesis: generation: directive:)]]))) (def: dummy_generation "dummy generation") diff --git a/stdlib/source/test/lux/ffi.js.lux b/stdlib/source/test/lux/ffi.js.lux index e8fcd24f8..1bcf80cc2 100644 --- a/stdlib/source/test/lux/ffi.js.lux +++ b/stdlib/source/test/lux/ffi.js.lux @@ -1,16 +1,16 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" try]] [data ["[0]" bit ("[1]#[0]" equivalence)] ["[0]" text ("[1]#[0]" equivalence)]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["[0]" nat] ["[0]" frac]]]]] diff --git a/stdlib/source/test/lux/ffi.jvm.lux b/stdlib/source/test/lux/ffi.jvm.lux index 9b842641e..ac1da7670 100644 --- a/stdlib/source/test/lux/ffi.jvm.lux +++ b/stdlib/source/test/lux/ffi.jvm.lux @@ -1,13 +1,13 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] ["[0]" type ("[1]#[0]" equivalence)] ["[0]" meta] ["[0]" debug] ["[0]" static] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" pipe] ["[0]" try ("[1]#[0]" functor)] @@ -17,16 +17,16 @@ [data ["[0]" bit ("[1]#[0]" equivalence)] ["[0]" text ("[1]#[0]" equivalence) - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection - ["[0]" array {"+" Array}]]] + ["[0]" array (.only Array)]]] ["[0]" macro - [syntax {"+" syntax:}] + [syntax (.only syntax:)] ["[0]" code] ["[0]" template]] [math - ["[0]" random {"+" Random} ("[1]#[0]" monad)] - [number {"+" hex} + ["[0]" random (.only Random) ("[1]#[0]" monad)] + [number (.only hex) ["[0]" i64] ["n" nat] ["i" int ("[1]#[0]" equivalence)] diff --git a/stdlib/source/test/lux/ffi.lua.lux b/stdlib/source/test/lux/ffi.lua.lux index 76ea6d2f3..3843ee649 100644 --- a/stdlib/source/test/lux/ffi.lua.lux +++ b/stdlib/source/test/lux/ffi.lua.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" io]] [math diff --git a/stdlib/source/test/lux/ffi.old.lux b/stdlib/source/test/lux/ffi.old.lux index 3e397ad8c..3bb29b5f9 100644 --- a/stdlib/source/test/lux/ffi.old.lux +++ b/stdlib/source/test/lux/ffi.old.lux @@ -1,15 +1,15 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [equivalence {"+" Equivalence}] - [monad {"+" do}]] + [equivalence (.only Equivalence)] + [monad (.only do)]] [control ["[0]" pipe]] [data ["[0]" text ("[1]#[0]" equivalence) - ["%" format {"+" format}]]] + ["%" format (.only format)]]] [macro ["[0]" template]] [math diff --git a/stdlib/source/test/lux/ffi.php.lux b/stdlib/source/test/lux/ffi.php.lux index ae182a90e..75366d7d1 100644 --- a/stdlib/source/test/lux/ffi.php.lux +++ b/stdlib/source/test/lux/ffi.php.lux @@ -1,15 +1,15 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" try]] [data ["[0]" text ("[1]#[0]" equivalence)]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["[0]" nat] ["[0]" frac]]]]] diff --git a/stdlib/source/test/lux/ffi.py.lux b/stdlib/source/test/lux/ffi.py.lux index edef790f9..f54f2d5f4 100644 --- a/stdlib/source/test/lux/ffi.py.lux +++ b/stdlib/source/test/lux/ffi.py.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [math ["[0]" random] [number diff --git a/stdlib/source/test/lux/ffi.rb.lux b/stdlib/source/test/lux/ffi.rb.lux index c12690d67..b7ec2ecb5 100644 --- a/stdlib/source/test/lux/ffi.rb.lux +++ b/stdlib/source/test/lux/ffi.rb.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [math ["[0]" random]]]] [\\library diff --git a/stdlib/source/test/lux/ffi.scm.lux b/stdlib/source/test/lux/ffi.scm.lux index ae182a90e..75366d7d1 100644 --- a/stdlib/source/test/lux/ffi.scm.lux +++ b/stdlib/source/test/lux/ffi.scm.lux @@ -1,15 +1,15 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" try]] [data ["[0]" text ("[1]#[0]" equivalence)]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["[0]" nat] ["[0]" frac]]]]] diff --git a/stdlib/source/test/lux/ffi/export.js.lux b/stdlib/source/test/lux/ffi/export.js.lux index 20bd74c34..d507fb39d 100644 --- a/stdlib/source/test/lux/ffi/export.js.lux +++ b/stdlib/source/test/lux/ffi/export.js.lux @@ -1,7 +1,7 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] ["[0]" static] [math [number diff --git a/stdlib/source/test/lux/ffi/export.jvm.lux b/stdlib/source/test/lux/ffi/export.jvm.lux index bb8d092ce..8d8ddf5d5 100644 --- a/stdlib/source/test/lux/ffi/export.jvm.lux +++ b/stdlib/source/test/lux/ffi/export.jvm.lux @@ -1,12 +1,12 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] ["[0]" meta] ["[0]" debug] ["[0]" static] [abstract - [monad {"+" do}]] + [monad (.only do)]] [data ["[0]" bit ("[1]#[0]" equivalence)] ["[0]" text ("[1]#[0]" equivalence) @@ -15,8 +15,8 @@ ["[0]" code] ["[0]" template]] [math - ["[0]" random {"+" Random} ("[1]#[0]" monad)] - [number {"+" hex} + ["[0]" random (.only Random) ("[1]#[0]" monad)] + [number (.only hex) ["[0]" i64] ["[0]" int ("[1]#[0]" equivalence)] ["[0]" frac ("[1]#[0]" equivalence)]]]]] diff --git a/stdlib/source/test/lux/ffi/export.lua.lux b/stdlib/source/test/lux/ffi/export.lua.lux index cfa2de19f..40d1655cf 100644 --- a/stdlib/source/test/lux/ffi/export.lua.lux +++ b/stdlib/source/test/lux/ffi/export.lua.lux @@ -1,7 +1,7 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] ["[0]" static] [math [number diff --git a/stdlib/source/test/lux/ffi/export.py.lux b/stdlib/source/test/lux/ffi/export.py.lux index 20bd74c34..d507fb39d 100644 --- a/stdlib/source/test/lux/ffi/export.py.lux +++ b/stdlib/source/test/lux/ffi/export.py.lux @@ -1,7 +1,7 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] ["[0]" static] [math [number diff --git a/stdlib/source/test/lux/ffi/export.rb.lux b/stdlib/source/test/lux/ffi/export.rb.lux index 6ee3b8832..0e236eb53 100644 --- a/stdlib/source/test/lux/ffi/export.rb.lux +++ b/stdlib/source/test/lux/ffi/export.rb.lux @@ -1,7 +1,7 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] ["[0]" static] [math [number diff --git a/stdlib/source/test/lux/locale.lux b/stdlib/source/test/lux/locale.lux index 479cd3e45..a1bd05263 100644 --- a/stdlib/source/test/lux/locale.lux +++ b/stdlib/source/test/lux/locale.lux @@ -1,17 +1,17 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence] ["$[0]" hash]]] [math - ["[0]" random {"+" Random} ("[1]#[0]" monad)]] + ["[0]" random (.only Random) ("[1]#[0]" monad)]] [data ["[0]" text ("[1]#[0]" equivalence) - ["[0]" encoding {"+" Encoding}]] + ["[0]" encoding (.only Encoding)]] [collection ["[0]" list]]]]] ["[0]" / "_" @@ -19,8 +19,8 @@ ["[1][0]" territory]] [\\library ["[0]" / - ["[0]" language {"+" Language}] - ["[0]" territory {"+" Territory}]]]) + ["[0]" language (.only Language)] + ["[0]" territory (.only Territory)]]]) (def: random_language (Random Language) diff --git a/stdlib/source/test/lux/locale/language.lux b/stdlib/source/test/lux/locale/language.lux index f7eaa7840..13b3b8120 100644 --- a/stdlib/source/test/lux/locale/language.lux +++ b/stdlib/source/test/lux/locale/language.lux @@ -1,10 +1,10 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] - [hash {"+" Hash}] + [monad (.only do)] + [hash (.only Hash)] [\\specification ["$[0]" hash]]] [control @@ -12,12 +12,12 @@ [data ["[0]" text] [collection - ["[0]" set {"+" Set}] + ["[0]" set (.only Set)] ["[0]" list ("[1]#[0]" functor mix)]]] [macro ["[0]" template]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat]]]]] [\\library diff --git a/stdlib/source/test/lux/locale/territory.lux b/stdlib/source/test/lux/locale/territory.lux index 5548c3a6e..70520c307 100644 --- a/stdlib/source/test/lux/locale/territory.lux +++ b/stdlib/source/test/lux/locale/territory.lux @@ -1,10 +1,10 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] - [hash {"+" Hash}] + [monad (.only do)] + [hash (.only Hash)] [\\specification ["$[0]" hash]]] [control @@ -12,12 +12,12 @@ [data ["[0]" text] [collection - ["[0]" set {"+" Set}] + ["[0]" set (.only Set)] ["[0]" list ("[1]#[0]" functor mix)]]] [macro ["[0]" template]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat]]]]] [\\library diff --git a/stdlib/source/test/lux/macro.lux b/stdlib/source/test/lux/macro.lux index d10b10547..f4bd0b604 100644 --- a/stdlib/source/test/lux/macro.lux +++ b/stdlib/source/test/lux/macro.lux @@ -1,10 +1,10 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] ["[0]" static] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" try ("[1]#[0]" functor)] [parser @@ -12,13 +12,13 @@ [data ["[0]" bit ("[1]#[0]" equivalence)] ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list]]] [macro ["^" pattern]] [math - ["[0]" random {"+" Random} ("[1]#[0]" functor)] + ["[0]" random (.only Random) ("[1]#[0]" functor)] [number ["n" nat]]] ["[0]" meta @@ -26,7 +26,7 @@ ["[0]" symbol]]]] [\\library ["[0]" / - [syntax {"+" syntax:}] + [syntax (.only syntax:)] ["[0]" code ("[1]#[0]" equivalence)] ["[0]" template]]] ["[0]" / "_" diff --git a/stdlib/source/test/lux/macro/code.lux b/stdlib/source/test/lux/macro/code.lux index 528ffdfe0..61a135c0f 100644 --- a/stdlib/source/test/lux/macro/code.lux +++ b/stdlib/source/test/lux/macro/code.lux @@ -1,20 +1,20 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence]]] [control - ["[0]" try {"+" Try}]] + ["[0]" try (.only Try)]] [data ["[0]" product] ["[0]" text] [collection ["[0]" list ("[1]#[0]" functor)]]] [math - ["[0]" random {"+" Random} ("[1]#[0]" monad)] + ["[0]" random (.only Random) ("[1]#[0]" monad)] [number ["n" nat]]] [meta diff --git a/stdlib/source/test/lux/macro/local.lux b/stdlib/source/test/lux/macro/local.lux index 4678fe067..c0f621921 100644 --- a/stdlib/source/test/lux/macro/local.lux +++ b/stdlib/source/test/lux/macro/local.lux @@ -1,10 +1,10 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] ["[0]" meta] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" try] ["[0]" exception] @@ -18,10 +18,10 @@ [dictionary ["[0]" plist]]]] ["[0]" macro - [syntax {"+" syntax:}] + [syntax (.only syntax:)] ["[0]" code]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat]]]]] [\\library diff --git a/stdlib/source/test/lux/macro/pattern.lux b/stdlib/source/test/lux/macro/pattern.lux index c4819c59e..4251efa37 100644 --- a/stdlib/source/test/lux/macro/pattern.lux +++ b/stdlib/source/test/lux/macro/pattern.lux @@ -1,15 +1,15 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [data ["[0]" bit ("[1]#[0]" equivalence)]] [macro ["[0]" code]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat] ["i" int] diff --git a/stdlib/source/test/lux/macro/syntax.lux b/stdlib/source/test/lux/macro/syntax.lux index c70bdc504..ae4c66db0 100644 --- a/stdlib/source/test/lux/macro/syntax.lux +++ b/stdlib/source/test/lux/macro/syntax.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control [parser ["<[0]>" code]]] diff --git a/stdlib/source/test/lux/macro/syntax/check.lux b/stdlib/source/test/lux/macro/syntax/check.lux index de933e033..af4f14934 100644 --- a/stdlib/source/test/lux/macro/syntax/check.lux +++ b/stdlib/source/test/lux/macro/syntax/check.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence]]] [control @@ -11,7 +11,7 @@ ["<>" parser ["<[0]>" code]]] [math - ["[0]" random {"+" Random}]] + ["[0]" random (.only Random)]] [macro ["[0]" code ("[1]#[0]" equivalence)]]]] [\\library diff --git a/stdlib/source/test/lux/macro/syntax/declaration.lux b/stdlib/source/test/lux/macro/syntax/declaration.lux index ed89e605a..b957f857c 100644 --- a/stdlib/source/test/lux/macro/syntax/declaration.lux +++ b/stdlib/source/test/lux/macro/syntax/declaration.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence]]] [control @@ -11,7 +11,7 @@ [parser ["<[0]>" code]]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat]]]]] [\\library diff --git a/stdlib/source/test/lux/macro/syntax/definition.lux b/stdlib/source/test/lux/macro/syntax/definition.lux index 2efc46208..461bb8de7 100644 --- a/stdlib/source/test/lux/macro/syntax/definition.lux +++ b/stdlib/source/test/lux/macro/syntax/definition.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence]]] [control @@ -14,7 +14,7 @@ [macro ["[0]" code ("[1]#[0]" equivalence)]] [math - ["[0]" random {"+" Random}]] + ["[0]" random (.only Random)]] [meta ["[0]" location]]]] [\\library diff --git a/stdlib/source/test/lux/macro/syntax/export.lux b/stdlib/source/test/lux/macro/syntax/export.lux index e40f34e4b..20bfccb07 100644 --- a/stdlib/source/test/lux/macro/syntax/export.lux +++ b/stdlib/source/test/lux/macro/syntax/export.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" maybe] ["[0]" try ("[1]#[0]" functor)] @@ -12,7 +12,7 @@ [macro ["[0]" code ("[1]#[0]" equivalence)]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat]]]]] [\\library diff --git a/stdlib/source/test/lux/macro/syntax/input.lux b/stdlib/source/test/lux/macro/syntax/input.lux index eb5f9b7b4..91340383b 100644 --- a/stdlib/source/test/lux/macro/syntax/input.lux +++ b/stdlib/source/test/lux/macro/syntax/input.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence]]] [control @@ -14,7 +14,7 @@ [collection ["[0]" list]]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat]]]]] [\\library diff --git a/stdlib/source/test/lux/macro/syntax/type/variable.lux b/stdlib/source/test/lux/macro/syntax/type/variable.lux index 91b1a0587..94cac27d5 100644 --- a/stdlib/source/test/lux/macro/syntax/type/variable.lux +++ b/stdlib/source/test/lux/macro/syntax/type/variable.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence]]] [control @@ -11,7 +11,7 @@ [parser ["<[0]>" code]]] [math - ["[0]" random {"+" Random}]]]] + ["[0]" random (.only Random)]]]] [\\library ["[0]" /]]) diff --git a/stdlib/source/test/lux/macro/template.lux b/stdlib/source/test/lux/macro/template.lux index 403266486..fad3a4328 100644 --- a/stdlib/source/test/lux/macro/template.lux +++ b/stdlib/source/test/lux/macro/template.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" try] ["[0]" exception] @@ -13,10 +13,10 @@ [collection ["[0]" list]]] ["[0]" macro - [syntax {"+" syntax:}] + [syntax (.only syntax:)] ["[0]" code]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["[0]" nat]]]]] [\\library diff --git a/stdlib/source/test/lux/math.lux b/stdlib/source/test/lux/math.lux index a59f42a6e..4ba734cb2 100644 --- a/stdlib/source/test/lux/math.lux +++ b/stdlib/source/test/lux/math.lux @@ -1,22 +1,22 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [data ["[0]" bit ("[1]#[0]" equivalence)]] [macro ["[0]" template]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat] ["i" int] ["r" rev] ["f" frac] - ["[0]" ratio {"+" Ratio}] - ["[0]" complex {"+" Complex}]]]]] + ["[0]" ratio (.only Ratio)] + ["[0]" complex (.only Complex)]]]]] [\\library ["[0]" /]] ["[0]" / "_" diff --git a/stdlib/source/test/lux/math/infix.lux b/stdlib/source/test/lux/math/infix.lux index f8d3554cd..75773a56d 100644 --- a/stdlib/source/test/lux/math/infix.lux +++ b/stdlib/source/test/lux/math/infix.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [data ["[0]" bit ("[1]#[0]" equivalence)]] [math diff --git a/stdlib/source/test/lux/math/logic/continuous.lux b/stdlib/source/test/lux/math/logic/continuous.lux index 56386b590..ac80e45b6 100644 --- a/stdlib/source/test/lux/math/logic/continuous.lux +++ b/stdlib/source/test/lux/math/logic/continuous.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" monoid]]] [math diff --git a/stdlib/source/test/lux/math/logic/fuzzy.lux b/stdlib/source/test/lux/math/logic/fuzzy.lux index dd030636a..df0426e87 100644 --- a/stdlib/source/test/lux/math/logic/fuzzy.lux +++ b/stdlib/source/test/lux/math/logic/fuzzy.lux @@ -1,10 +1,10 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [equivalence {"+" Equivalence}] - [monad {"+" do}] + [equivalence (.only Equivalence)] + [monad (.only do)] [\\specification [functor ["$[0]" contravariant]]]] @@ -14,12 +14,12 @@ ["[0]" list] ["[0]" set]]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat] ["r" rev]]]]] [\\library - ["[0]" / {"+" Fuzzy} + ["[0]" / (.only Fuzzy) ["/[1]" // "_" ["[1]" continuous]]]]) diff --git a/stdlib/source/test/lux/math/modular.lux b/stdlib/source/test/lux/math/modular.lux index 69c47f49f..ca3f69a40 100644 --- a/stdlib/source/test/lux/math/modular.lux +++ b/stdlib/source/test/lux/math/modular.lux @@ -1,10 +1,10 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] ["[0]" type ("[1]#[0]" equivalence)] [abstract - [monad {"+" do}] + [monad (.only do)] ["[0]" predicate] [\\specification ["$[0]" equivalence] @@ -18,7 +18,7 @@ ["[0]" product] ["[0]" bit ("[1]#[0]" equivalence)]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["i" int]]]]] ["$[0]" // "_" diff --git a/stdlib/source/test/lux/math/modulus.lux b/stdlib/source/test/lux/math/modulus.lux index df4d22c6d..edae0b72a 100644 --- a/stdlib/source/test/lux/math/modulus.lux +++ b/stdlib/source/test/lux/math/modulus.lux @@ -1,19 +1,19 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] ["[0]" meta] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" try] ["[0]" exception]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["i" int]]] [macro - [syntax {"+" syntax:}] + [syntax (.only syntax:)] ["[0]" code]]]] [\\library ["[0]" /]]) diff --git a/stdlib/source/test/lux/math/number.lux b/stdlib/source/test/lux/math/number.lux index d5a065984..5bb2627ba 100644 --- a/stdlib/source/test/lux/math/number.lux +++ b/stdlib/source/test/lux/math/number.lux @@ -1,7 +1,7 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [control ["[0]" try]] [data diff --git a/stdlib/source/test/lux/math/number/complex.lux b/stdlib/source/test/lux/math/number/complex.lux index d2e2d152a..5c6d39995 100644 --- a/stdlib/source/test/lux/math/number/complex.lux +++ b/stdlib/source/test/lux/math/number/complex.lux @@ -1,16 +1,16 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence]]] [data [collection ["[0]" list ("[1]#[0]" functor)]]] [math - ["[0]" random {"+" Random}]]]] + ["[0]" random (.only Random)]]]] [\\library ["[0]" / [// diff --git a/stdlib/source/test/lux/math/number/frac.lux b/stdlib/source/test/lux/math/number/frac.lux index 9009727f5..6e1e7f225 100644 --- a/stdlib/source/test/lux/math/number/frac.lux +++ b/stdlib/source/test/lux/math/number/frac.lux @@ -1,11 +1,11 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] ["@" target] ["[0]" ffi] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence] ["$[0]" hash] @@ -17,7 +17,7 @@ [macro ["[0]" template]] [math - ["[0]" random {"+" Random}]]]] + ["[0]" random (.only Random)]]]] [\\library ["[0]" / [// "*" diff --git a/stdlib/source/test/lux/math/number/i16.lux b/stdlib/source/test/lux/math/number/i16.lux index 6a20bd218..7d943f199 100644 --- a/stdlib/source/test/lux/math/number/i16.lux +++ b/stdlib/source/test/lux/math/number/i16.lux @@ -1,13 +1,13 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence]]] [math - ["[0]" random {"+" Random}]]]] + ["[0]" random (.only Random)]]]] [\\library ["[0]" / ["/[1]" // "_" diff --git a/stdlib/source/test/lux/math/number/i32.lux b/stdlib/source/test/lux/math/number/i32.lux index 9a77acb81..b0c07f014 100644 --- a/stdlib/source/test/lux/math/number/i32.lux +++ b/stdlib/source/test/lux/math/number/i32.lux @@ -1,13 +1,13 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence]]] [math - ["[0]" random {"+" Random}]]]] + ["[0]" random (.only Random)]]]] [\\library ["[0]" / ["/[1]" // "_" diff --git a/stdlib/source/test/lux/math/number/i64.lux b/stdlib/source/test/lux/math/number/i64.lux index c7c7b9445..16757cffe 100644 --- a/stdlib/source/test/lux/math/number/i64.lux +++ b/stdlib/source/test/lux/math/number/i64.lux @@ -1,20 +1,20 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [data ["[0]" bit ("[1]#[0]" equivalence)]] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence] ["$[0]" hash] ["$[0]" monoid]]] [math - ["[0]" random {"+" Random}]]]] + ["[0]" random (.only Random)]]]] [\\library ["[0]" / ("#[0]" equivalence) - [// {"+" hex} + [// (.only hex) ["n" nat] ["i" int]]]]) diff --git a/stdlib/source/test/lux/math/number/i8.lux b/stdlib/source/test/lux/math/number/i8.lux index 23f91eca3..2a8e67563 100644 --- a/stdlib/source/test/lux/math/number/i8.lux +++ b/stdlib/source/test/lux/math/number/i8.lux @@ -1,13 +1,13 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence]]] [math - ["[0]" random {"+" Random}]]]] + ["[0]" random (.only Random)]]]] [\\library ["[0]" / ["/[1]" // "_" diff --git a/stdlib/source/test/lux/math/number/int.lux b/stdlib/source/test/lux/math/number/int.lux index 02a8fe497..528766645 100644 --- a/stdlib/source/test/lux/math/number/int.lux +++ b/stdlib/source/test/lux/math/number/int.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence] ["$[0]" hash] @@ -15,7 +15,7 @@ [data ["[0]" bit ("[1]#[0]" equivalence)]] [math - ["[0]" random {"+" Random}]]]] + ["[0]" random (.only Random)]]]] [\\library ["[0]" / [// diff --git a/stdlib/source/test/lux/math/number/nat.lux b/stdlib/source/test/lux/math/number/nat.lux index 9dfc823c9..e0b811210 100644 --- a/stdlib/source/test/lux/math/number/nat.lux +++ b/stdlib/source/test/lux/math/number/nat.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence] ["$[0]" hash] diff --git a/stdlib/source/test/lux/math/number/ratio.lux b/stdlib/source/test/lux/math/number/ratio.lux index de4afac08..ddc148678 100644 --- a/stdlib/source/test/lux/math/number/ratio.lux +++ b/stdlib/source/test/lux/math/number/ratio.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence] ["$[0]" order] @@ -14,7 +14,7 @@ [data ["[0]" bit ("[1]#[0]" equivalence)]] [math - ["[0]" random {"+" Random}]]]] + ["[0]" random (.only Random)]]]] [\\library ["[0]" / [// diff --git a/stdlib/source/test/lux/math/number/rev.lux b/stdlib/source/test/lux/math/number/rev.lux index db2657d98..149b3462d 100644 --- a/stdlib/source/test/lux/math/number/rev.lux +++ b/stdlib/source/test/lux/math/number/rev.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence] ["$[0]" hash] @@ -18,7 +18,7 @@ ["[0]" random]]]] [\\library ["[0]" / - [// {"+" hex} + [// (.only hex) ["n" nat] ["f" frac] ["[0]" i64 ("[1]#[0]" hash)]]]]) diff --git a/stdlib/source/test/lux/meta.lux b/stdlib/source/test/lux/meta.lux index 5919d32af..64ee4fda6 100644 --- a/stdlib/source/test/lux/meta.lux +++ b/stdlib/source/test/lux/meta.lux @@ -1,30 +1,30 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] ["[0]" type ("[1]#[0]" equivalence)] [abstract - [equivalence {"+" Equivalence}] - [monad {"+" do}] + [equivalence (.only Equivalence)] + [monad (.only do)] [\\specification - ["$[0]" functor {"+" Injection Comparison}] + ["$[0]" functor (.only Injection Comparison)] ["$[0]" apply] ["$[0]" monad]]] [control ["[0]" maybe] - ["[0]" try {"+" Try} ("[1]#[0]" functor)]] + ["[0]" try (.only Try) ("[1]#[0]" functor)]] [data ["[0]" product] ["[0]" bit ("[1]#[0]" equivalence)] ["[0]" text ("[1]#[0]" equivalence) - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" functor monoid)] ["[0]" set]]] [macro ["^" pattern]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat]]] [meta diff --git a/stdlib/source/test/lux/meta/configuration.lux b/stdlib/source/test/lux/meta/configuration.lux index 2bcb18f7e..c1016cd0b 100644 --- a/stdlib/source/test/lux/meta/configuration.lux +++ b/stdlib/source/test/lux/meta/configuration.lux @@ -1,10 +1,10 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] ["[0]" meta] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence] ["$[0]" monoid]]] @@ -19,10 +19,10 @@ [collection ["[0]" list]]] ["[0]" macro - [syntax {"+" syntax:}] + [syntax (.only syntax:)] ["[0]" code]] [math - ["[0]" random {"+" Random} ("[1]#[0]" monad)]]]] + ["[0]" random (.only Random) ("[1]#[0]" monad)]]]] [\\library ["[0]" /]]) diff --git a/stdlib/source/test/lux/meta/location.lux b/stdlib/source/test/lux/meta/location.lux index d76b386be..6023054e9 100644 --- a/stdlib/source/test/lux/meta/location.lux +++ b/stdlib/source/test/lux/meta/location.lux @@ -1,15 +1,15 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence]]] [data ["[0]" text]] [math - ["[0]" random {"+" Random}]]]] + ["[0]" random (.only Random)]]]] [\\library ["[0]" /]] ["$[0]" /// "_" diff --git a/stdlib/source/test/lux/meta/symbol.lux b/stdlib/source/test/lux/meta/symbol.lux index e7b7df738..7f1b6f41f 100644 --- a/stdlib/source/test/lux/meta/symbol.lux +++ b/stdlib/source/test/lux/meta/symbol.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence] ["$[0]" hash] @@ -14,7 +14,7 @@ [macro ["^" pattern]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat]]]]] [\\library diff --git a/stdlib/source/test/lux/meta/version.lux b/stdlib/source/test/lux/meta/version.lux index 4f0f769f9..0df04027c 100644 --- a/stdlib/source/test/lux/meta/version.lux +++ b/stdlib/source/test/lux/meta/version.lux @@ -1,11 +1,11 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] ["[0]" static] ["[0]" meta] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" try] ["[0]" exception] @@ -14,7 +14,7 @@ [data ["[0]" text]] ["[0]" macro - [syntax {"+" syntax:}] + [syntax (.only syntax:)] ["[0]" code]] [math ["[0]" random] diff --git a/stdlib/source/test/lux/program.lux b/stdlib/source/test/lux/program.lux index f600adb53..4d0f13aa9 100644 --- a/stdlib/source/test/lux/program.lux +++ b/stdlib/source/test/lux/program.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" io] ["[0]" try] @@ -15,7 +15,7 @@ [collection ["[0]" list]]] [macro - [syntax {"+" syntax:}]] + [syntax (.only syntax:)]] [math ["[0]" random]]]] [\\library diff --git a/stdlib/source/test/lux/static.lux b/stdlib/source/test/lux/static.lux index ff411b83a..814db9332 100644 --- a/stdlib/source/test/lux/static.lux +++ b/stdlib/source/test/lux/static.lux @@ -1,12 +1,12 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] ["@" target] ["[0]" meta] [data ["[0]" text ("[1]#[0]" equivalence) - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" mix)]]] [macro diff --git a/stdlib/source/test/lux/target.lux b/stdlib/source/test/lux/target.lux index 6c7436400..76a8dd403 100644 --- a/stdlib/source/test/lux/target.lux +++ b/stdlib/source/test/lux/target.lux @@ -1,12 +1,12 @@ (.using [library [lux {"-" all} - ["_" test {"+" Test}] + ["_" test (.only Test)] [data ["[0]" text] [collection ["[0]" list] - ["[0]" set {"+" Set}]]] + ["[0]" set (.only Set)]]] [math [number ["n" nat]]]]] diff --git a/stdlib/source/test/lux/target/js.lux b/stdlib/source/test/lux/target/js.lux index d127d21d7..44e61a1eb 100644 --- a/stdlib/source/test/lux/target/js.lux +++ b/stdlib/source/test/lux/target/js.lux @@ -1,26 +1,26 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] ["[0]" static] [abstract - [monad {"+" do}] + [monad (.only do)] ["[0]" predicate]] [control ["[0]" pipe] ["[0]" function] ["[0]" maybe ("[1]#[0]" functor)] - ["[0]" try {"+" Try} ("[1]#[0]" functor)]] + ["[0]" try (.only Try) ("[1]#[0]" functor)]] [data ["[0]" bit ("[1]#[0]" equivalence)] - ["[0]" text {"+" \n} ("[1]#[0]" equivalence) - ["%" format {"+" format}]] + ["[0]" text (.only \n) ("[1]#[0]" equivalence) + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" functor)]]] [macro ["[0]" template]] [math - ["[0]" random {"+" Random} ("[1]#[0]" monad)] + ["[0]" random (.only Random) ("[1]#[0]" monad)] [number ["n" nat] ["i" int] diff --git a/stdlib/source/test/lux/target/jvm.lux b/stdlib/source/test/lux/target/jvm.lux index 2121dfc19..ca4bedee2 100644 --- a/stdlib/source/test/lux/target/jvm.lux +++ b/stdlib/source/test/lux/target/jvm.lux @@ -1,10 +1,10 @@ (.using [library [lux {"-" Type Primitive Label type int} - ["[0]" ffi {"+" import:}] + ["[0]" ffi (.only import:)] ["@" target] [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["[0]" function] ["[0]" io] @@ -15,7 +15,7 @@ [data ["[0]" bit ("[1]#[0]" equivalence)] ["[0]" text ("[1]#[0]" equivalence) - ["%" format {"+" format}]] + ["%" format (.only format)]] ["[0]" format "_" ["[1]" binary]] [collection @@ -25,34 +25,34 @@ ["[0]" set] ["[0]" list ("[1]#[0]" functor)]]] [math - ["[0]" random {"+" Random} ("[1]#[0]" monad)] + ["[0]" random (.only Random) ("[1]#[0]" monad)] [number ["n" nat] ["i" int] ["f" frac] - ["[0]" i32 {"+" I32}] + ["[0]" i32 (.only I32)] ["[0]" i64]]] - ["_" test {"+" Test}]]] + ["_" test (.only Test)]]] [\\library ["[0]" / "_" - ["[1][0]" loader {"+" Library}] + ["[1][0]" loader (.only Library)] ["[1][0]" version] ["[1][0]" modifier ("[1]#[0]" monoid)] ["[1][0]" field] - ["[1][0]" method {"+" Method}] + ["[1][0]" method (.only Method)] ["[1][0]" class] ["[1][0]" attribute ["[1]/[0]" code]] ["[1][0]" constant - ["[1]/[0]" pool {"+" Resource}]] + ["[1]/[0]" pool (.only Resource)]] [encoding ["[1][0]" name] ["[1][0]" signed] ["[1][0]" unsigned]] - ["[1]" bytecode {"+" Label Bytecode} + ["[1]" bytecode (.only Label Bytecode) ["[1][0]" instruction]] - ["[1][0]" type {"+" Type} - ["[0]" category {"+" Value Object Class}]]]]) + ["[1][0]" type (.only Type) + ["[0]" category (.only Value Object Class)]]]]) (def: method_modifier (all /modifier#composite diff --git a/stdlib/source/test/lux/target/lua.lux b/stdlib/source/test/lux/target/lua.lux index 631b754f5..b9be05d9e 100644 --- a/stdlib/source/test/lux/target/lua.lux +++ b/stdlib/source/test/lux/target/lua.lux @@ -1,11 +1,11 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] ["[0]" ffi] ["[0]" static] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence] ["$[0]" hash]]] @@ -13,17 +13,17 @@ ["[0]" pipe] ["[0]" function] ["[0]" maybe ("[1]#[0]" functor)] - ["[0]" try {"+" Try} ("[1]#[0]" functor)]] + ["[0]" try (.only Try) ("[1]#[0]" functor)]] [data ["[0]" bit ("[1]#[0]" equivalence)] - ["[0]" text {"+" \n} ("[1]#[0]" equivalence) - ["%" format {"+" format}]] + ["[0]" text (.only \n) ("[1]#[0]" equivalence) + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" functor)]]] [macro ["[0]" template]] [math - ["[0]" random {"+" Random} ("[1]#[0]" monad)] + ["[0]" random (.only Random) ("[1]#[0]" monad)] [number ["n" nat] ["i" int] diff --git a/stdlib/source/test/lux/target/python.lux b/stdlib/source/test/lux/target/python.lux index 95f765d6b..28c3ca542 100644 --- a/stdlib/source/test/lux/target/python.lux +++ b/stdlib/source/test/lux/target/python.lux @@ -1,11 +1,11 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] ["[0]" ffi] ["[0]" static] [abstract - [monad {"+" do}] + [monad (.only do)] ["[0]" predicate] [\\specification ["$[0]" equivalence] @@ -13,17 +13,17 @@ [control ["[0]" function] ["[0]" maybe ("[1]#[0]" functor)] - ["[0]" try {"+" Try} ("[1]#[0]" functor)]] + ["[0]" try (.only Try) ("[1]#[0]" functor)]] [data ["[0]" bit ("[1]#[0]" equivalence)] ["[0]" text ("[1]#[0]" equivalence) - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" functor)]]] [macro ["[0]" code]] [math - ["[0]" random {"+" Random} ("[1]#[0]" monad)] + ["[0]" random (.only Random) ("[1]#[0]" monad)] [number ["n" nat] ["i" int] diff --git a/stdlib/source/test/lux/target/ruby.lux b/stdlib/source/test/lux/target/ruby.lux index 76269ebd5..c54d4f6ec 100644 --- a/stdlib/source/test/lux/target/ruby.lux +++ b/stdlib/source/test/lux/target/ruby.lux @@ -1,28 +1,28 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] ["[0]" ffi] ["[0]" debug] [abstract - [monad {"+" do}] + [monad (.only do)] ["[0]" predicate] [\\specification ["$[0]" equivalence]]] [control ["[0]" pipe] ["[0]" maybe ("[1]#[0]" functor)] - ["[0]" try {"+" Try} ("[1]#[0]" functor)]] + ["[0]" try (.only Try) ("[1]#[0]" functor)]] [data ["[0]" bit ("[1]#[0]" equivalence)] ["[0]" text ("[1]#[0]" equivalence) - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" functor)] ["[0]" set]]] [math - ["[0]" random {"+" Random} ("[1]#[0]" monad)] - [number {"+" hex} + ["[0]" random (.only Random) ("[1]#[0]" monad)] + [number (.only hex) ["n" nat] ["i" int] ["f" frac] diff --git a/stdlib/source/test/lux/test.lux b/stdlib/source/test/lux/test.lux index 94bfaa193..d8770edd3 100644 --- a/stdlib/source/test/lux/test.lux +++ b/stdlib/source/test/lux/test.lux @@ -2,13 +2,13 @@ [library [lux "*" [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" io] ["[0]" exception] [concurrency ["[0]" async] - ["[0]" atom {"+" Atom}]]] + ["[0]" atom (.only Atom)]]] [data ["[0]" text ("[1]#[0]" equivalence) ["%" format]] diff --git a/stdlib/source/test/lux/time.lux b/stdlib/source/test/lux/time.lux index 91bd45a3e..ecdb8099a 100644 --- a/stdlib/source/test/lux/time.lux +++ b/stdlib/source/test/lux/time.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence] ["$[0]" order] @@ -17,7 +17,7 @@ ["<[0]>" text]]] [data ["[0]" text - ["%" format {"+" format}]]] + ["%" format (.only format)]]] [math ["[0]" random] [number diff --git a/stdlib/source/test/lux/time/date.lux b/stdlib/source/test/lux/time/date.lux index 5f341d04f..0230748b4 100644 --- a/stdlib/source/test/lux/time/date.lux +++ b/stdlib/source/test/lux/time/date.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence] ["$[0]" order] @@ -16,9 +16,9 @@ ["<[0]>" text]]] [data [text - ["%" format {"+" format}]]] + ["%" format (.only format)]]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat] ["i" int]]]]] diff --git a/stdlib/source/test/lux/time/day.lux b/stdlib/source/test/lux/time/day.lux index 85b387bca..4351d23b4 100644 --- a/stdlib/source/test/lux/time/day.lux +++ b/stdlib/source/test/lux/time/day.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] ["[0]" predicate] [\\specification ["$[0]" equivalence] @@ -19,7 +19,7 @@ ["[0]" list] ["[0]" set]]] [math - ["[0]" random {"+" Random} ("[1]#[0]" monad)] + ["[0]" random (.only Random) ("[1]#[0]" monad)] [number ["n" nat]]]]] [\\library diff --git a/stdlib/source/test/lux/time/duration.lux b/stdlib/source/test/lux/time/duration.lux index f106e7730..6e7147df9 100644 --- a/stdlib/source/test/lux/time/duration.lux +++ b/stdlib/source/test/lux/time/duration.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence] ["$[0]" order] @@ -13,7 +13,7 @@ [data ["[0]" bit ("[1]#[0]" equivalence)]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat] ["i" int]]]]] diff --git a/stdlib/source/test/lux/time/instant.lux b/stdlib/source/test/lux/time/instant.lux index b31bf3749..3d5a2a9bb 100644 --- a/stdlib/source/test/lux/time/instant.lux +++ b/stdlib/source/test/lux/time/instant.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence] ["$[0]" order] @@ -19,8 +19,8 @@ [math ["[0]" random]] [time - ["[0]" duration {"+" Duration}] - ["[0]" day {"+" Day} ("[1]#[0]" enum)]]]] + ["[0]" duration (.only Duration)] + ["[0]" day (.only Day) ("[1]#[0]" enum)]]]] [\\library ["[0]" /]]) diff --git a/stdlib/source/test/lux/time/month.lux b/stdlib/source/test/lux/time/month.lux index 8bc9438ce..d14a3d404 100644 --- a/stdlib/source/test/lux/time/month.lux +++ b/stdlib/source/test/lux/time/month.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] ["[0]" predicate] [\\specification ["$[0]" equivalence] @@ -19,7 +19,7 @@ ["[0]" set] ["[0]" list ("[1]#[0]" functor mix)]]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat]]]]] [\\library diff --git a/stdlib/source/test/lux/time/year.lux b/stdlib/source/test/lux/time/year.lux index 3c47d811f..4a289c047 100644 --- a/stdlib/source/test/lux/time/year.lux +++ b/stdlib/source/test/lux/time/year.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence] ["$[0]" order] @@ -14,9 +14,9 @@ [data ["[0]" bit ("[1]#[0]" equivalence)] [text - ["%" format {"+" format}]]] + ["%" format (.only format)]]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat] ["i" int]]]]] diff --git a/stdlib/source/test/lux/tool.lux b/stdlib/source/test/lux/tool.lux index 1388dd52e..645190f0f 100644 --- a/stdlib/source/test/lux/tool.lux +++ b/stdlib/source/test/lux/tool.lux @@ -1,7 +1,7 @@ (.using [library [lux "*" - ["_" test {"+" Test}]]] + ["_" test (.only Test)]]] ["[0]" / "_" [compiler ["[1][0]" arity] diff --git a/stdlib/source/test/lux/tool/compiler/arity.lux b/stdlib/source/test/lux/tool/compiler/arity.lux index ad89541f5..a1351e746 100644 --- a/stdlib/source/test/lux/tool/compiler/arity.lux +++ b/stdlib/source/test/lux/tool/compiler/arity.lux @@ -1,13 +1,13 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [data ["[0]" bit ("[1]#[0]" equivalence)]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat]]]]] [\\library diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/analysis.lux b/stdlib/source/test/lux/tool/compiler/language/lux/analysis.lux index f620d1a10..a1f2e288c 100644 --- a/stdlib/source/test/lux/tool/compiler/language/lux/analysis.lux +++ b/stdlib/source/test/lux/tool/compiler/language/lux/analysis.lux @@ -1,10 +1,10 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] ["[0]" static] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence]]] [control @@ -12,7 +12,7 @@ ["[0]" function] ["[0]" maybe] ["[0]" try] - ["[0]" exception {"+" exception:}]] + ["[0]" exception (.only exception:)]] [data ["[0]" bit ("[1]#[0]" equivalence)] ["[0]" text ("[1]#[0]" equivalence)] @@ -21,7 +21,7 @@ [macro ["[0]" template]] [math - ["[0]" random {"+" Random} ("[1]#[0]" monad)] + ["[0]" random (.only Random) ("[1]#[0]" monad)] [number ["f" frac]]] [meta diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/analysis/complex.lux b/stdlib/source/test/lux/tool/compiler/language/lux/analysis/complex.lux index 2a351ec37..f082131fe 100644 --- a/stdlib/source/test/lux/tool/compiler/language/lux/analysis/complex.lux +++ b/stdlib/source/test/lux/tool/compiler/language/lux/analysis/complex.lux @@ -1,18 +1,18 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence] ["$[0]" hash]]] [data ["[0]" bit ("[1]#[0]" equivalence)] ["[0]" text ("[1]#[0]" equivalence) - ["%" format {"+" format}]]] + ["%" format (.only format)]]] [math - ["[0]" random {"+" Random} ("[1]#[0]" monad)] + ["[0]" random (.only Random) ("[1]#[0]" monad)] [number ["n" nat]]]]] [\\library diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/analysis/coverage.lux b/stdlib/source/test/lux/tool/compiler/language/lux/analysis/coverage.lux index 01d4e8481..bad488f9e 100644 --- a/stdlib/source/test/lux/tool/compiler/language/lux/analysis/coverage.lux +++ b/stdlib/source/test/lux/tool/compiler/language/lux/analysis/coverage.lux @@ -1,16 +1,16 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - ["[0]" monad {"+" do}] + ["[0]" monad (.only do)] ["[0]" predicate] [\\specification ["$[0]" equivalence]]] [control ["[0]" pipe] - ["[0]" try {"+" Try} ("[1]#[0]" functor)] - ["[0]" exception {"+" Exception}]] + ["[0]" try (.only Try) ("[1]#[0]" functor)] + ["[0]" exception (.only Exception)]] [data ["[0]" product] ["[0]" bit ("[1]#[0]" equivalence)] @@ -23,7 +23,7 @@ [macro ["^" pattern]] [math - ["[0]" random {"+" Random} ("[1]#[0]" monad)] + ["[0]" random (.only Random) ("[1]#[0]" monad)] [number ["n" nat ("[1]#[0]" interval)] ["i" int] @@ -34,7 +34,7 @@ ["/[1]" // "_" ["[1][0]" simple] ["[1][0]" complex] - ["[1][0]" pattern {"+" Pattern}]]]]) + ["[1][0]" pattern (.only Pattern)]]]]) (def: spread 16) diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/analysis/inference.lux b/stdlib/source/test/lux/tool/compiler/language/lux/analysis/inference.lux index b35d2f857..cbbe77a67 100644 --- a/stdlib/source/test/lux/tool/compiler/language/lux/analysis/inference.lux +++ b/stdlib/source/test/lux/tool/compiler/language/lux/analysis/inference.lux @@ -1,13 +1,13 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" maybe ("[1]#[0]" functor)] - ["[0]" try {"+" Try} ("[1]#[0]" functor)] - ["[0]" exception {"+" Exception}]] + ["[0]" try (.only Try) ("[1]#[0]" functor)] + ["[0]" exception (.only Exception)]] [data ["[0]" product] ["[0]" bit ("[1]#[0]" equivalence)] @@ -17,7 +17,7 @@ [macro ["[0]" code]] [math - ["[0]" random {"+" Random} ("[1]#[0]" monad)] + ["[0]" random (.only Random) ("[1]#[0]" monad)] [number ["n" nat]]] [meta @@ -26,11 +26,11 @@ ["[0]" configuration "_" ["$[1]" \\test]]] ["[0]" type ("[1]#[0]" equivalence) - ["[0]" check {"+" Check}]]]] + ["[0]" check (.only Check)]]]] [\\library ["[0]" / ["/[1]" // - [evaluation {"+" Eval}] + [evaluation (.only Eval)] ["[1][0]" macro] ["[1][0]" type] ["[1][0]" module] diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/analysis/macro.lux b/stdlib/source/test/lux/tool/compiler/language/lux/analysis/macro.lux index 18fc868ec..60a8b7249 100644 --- a/stdlib/source/test/lux/tool/compiler/language/lux/analysis/macro.lux +++ b/stdlib/source/test/lux/tool/compiler/language/lux/analysis/macro.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence]]] [control @@ -19,7 +19,7 @@ [macro ["[0]" code ("[1]#[0]" equivalence)]] [math - ["[0]" random {"+" Random} ("[1]#[0]" monad)] + ["[0]" random (.only Random) ("[1]#[0]" monad)] [number ["n" nat]]] ["[0]" meta diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/analysis/module.lux b/stdlib/source/test/lux/tool/compiler/language/lux/analysis/module.lux index 96d27be9c..3fb7570f9 100644 --- a/stdlib/source/test/lux/tool/compiler/language/lux/analysis/module.lux +++ b/stdlib/source/test/lux/tool/compiler/language/lux/analysis/module.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["[0]" pipe] ["[0]" try ("[1]#[0]" functor)] @@ -15,7 +15,7 @@ ["[0]" list] ["[0]" set]]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat]]] ["[0]" meta diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/analysis/pattern.lux b/stdlib/source/test/lux/tool/compiler/language/lux/analysis/pattern.lux index ac6ce0392..93d48bc89 100644 --- a/stdlib/source/test/lux/tool/compiler/language/lux/analysis/pattern.lux +++ b/stdlib/source/test/lux/tool/compiler/language/lux/analysis/pattern.lux @@ -1,16 +1,16 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence]]] [data ["[0]" bit ("[1]#[0]" equivalence)] ["[0]" text ("[1]#[0]" equivalence)]] [math - ["[0]" random {"+" Random} ("[1]#[0]" monad)] + ["[0]" random (.only Random) ("[1]#[0]" monad)] [number ["f" frac]]]]] [\\library diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/analysis/scope.lux b/stdlib/source/test/lux/tool/compiler/language/lux/analysis/scope.lux index 9de7bd8ec..5137bd082 100644 --- a/stdlib/source/test/lux/tool/compiler/language/lux/analysis/scope.lux +++ b/stdlib/source/test/lux/tool/compiler/language/lux/analysis/scope.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" pipe] ["[0]" maybe ("[1]#[0]" functor)] @@ -14,7 +14,7 @@ [collection ["[0]" list]]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat]]] ["[0]" type "_" @@ -28,7 +28,7 @@ [/// ["[1][0]" phase ("[1]#[0]" monad)] [reference - ["[1][0]" variable {"+" Register Variable}]]]]]]] + ["[1][0]" variable (.only Register Variable)]]]]]]] ["$[0]" // "_" ["[1][0]" type]]) diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/analysis/simple.lux b/stdlib/source/test/lux/tool/compiler/language/lux/analysis/simple.lux index ba3ba6096..d62fa8ebd 100644 --- a/stdlib/source/test/lux/tool/compiler/language/lux/analysis/simple.lux +++ b/stdlib/source/test/lux/tool/compiler/language/lux/analysis/simple.lux @@ -1,16 +1,16 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence]]] [data ["[0]" bit ("[1]#[0]" equivalence)] ["[0]" text ("[1]#[0]" equivalence)]] [math - ["[0]" random {"+" Random} ("[1]#[0]" monad)] + ["[0]" random (.only Random) ("[1]#[0]" monad)] [number ["f" frac]]]]] [\\library diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/analysis/type.lux b/stdlib/source/test/lux/tool/compiler/language/lux/analysis/type.lux index b3634b2e8..a36f208c0 100644 --- a/stdlib/source/test/lux/tool/compiler/language/lux/analysis/type.lux +++ b/stdlib/source/test/lux/tool/compiler/language/lux/analysis/type.lux @@ -1,16 +1,16 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" pipe] ["[0]" try ("[1]#[0]" functor)]] [data ["[0]" product]] [math - ["[0]" random {"+" Random}]] + ["[0]" random (.only Random)]] [meta ["[0]" configuration "_" ["$[1]" \\test]]] diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis.lux b/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis.lux index 7e0445312..ee5121040 100644 --- a/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis.lux +++ b/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" try] ["[0]" exception]] @@ -27,8 +27,8 @@ ["[1]/[0]" analysis "_" ["[1]" lux]]] [// - ["/[1]" analysis {"+" Analysis Operation} - [evaluation {"+" Eval}] + ["/[1]" analysis (.only Analysis Operation) + [evaluation (.only Eval)] ["[1][0]" macro] ["[1][0]" scope] ["[1][0]" module] diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis/case.lux b/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis/case.lux index a62410d37..0aa2bcefc 100644 --- a/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis/case.lux +++ b/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis/case.lux @@ -1,11 +1,11 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control - ["[0]" try {"+" Try} ("[1]#[0]" functor)] + ["[0]" try (.only Try) ("[1]#[0]" functor)] ["[0]" exception]] [data ["[0]" product] @@ -26,7 +26,7 @@ ["[1]" lux]]] [// ["[1][0]" analysis - [evaluation {"+" Eval}] + [evaluation (.only Eval)] ["[2][0]" macro] ["[2][0]" scope] ["[2][0]" module] diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis/complex.lux b/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis/complex.lux index cea405776..7bd276bf4 100644 --- a/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis/complex.lux +++ b/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis/complex.lux @@ -1,19 +1,19 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" pipe] ["[0]" maybe ("[1]#[0]" functor)] - ["[0]" try {"+" Try} ("[1]#[0]" functor)] - ["[0]" exception {"+" Exception}]] + ["[0]" try (.only Try) ("[1]#[0]" functor)] + ["[0]" exception (.only Exception)]] [data ["[0]" product] ["[0]" bit ("[1]#[0]" equivalence)] ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" monad monoid)] ["[0]" set]]] @@ -21,7 +21,7 @@ ["^" pattern] ["[0]" code]] [math - ["[0]" random {"+" Random} ("[1]#[0]" monad)] + ["[0]" random (.only Random) ("[1]#[0]" monad)] [number ["n" nat] ["f" frac]]] @@ -40,8 +40,8 @@ ["[1]/[0]" analysis "_" ["[1]" lux]]] [// - ["[1][0]" analysis {"+" Analysis} - [evaluation {"+" Eval}] + ["[1][0]" analysis (.only Analysis) + [evaluation (.only Eval)] ["[2][0]" macro] ["[2][0]" type] ["[2][0]" module] diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis/function.lux b/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis/function.lux index 5f002867e..8ad5525f7 100644 --- a/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis/function.lux +++ b/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis/function.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" function] ["[0]" try ("[1]#[0]" functor)] @@ -34,8 +34,8 @@ ["[1]/[0]" analysis "_" ["[1]" lux]]] [// - ["[1][0]" analysis {"+" Analysis} - [evaluation {"+" Eval}] + ["[1][0]" analysis (.only Analysis) + [evaluation (.only Eval)] ["[2][0]" macro] ["[2][0]" module] ["[2][0]" type diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis/reference.lux b/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis/reference.lux index ff0b55372..7b33ea14e 100644 --- a/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis/reference.lux +++ b/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis/reference.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" pipe] ["[0]" try ("[1]#[0]" functor)] diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis/simple.lux b/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis/simple.lux index dceaee0b2..a96e09627 100644 --- a/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis/simple.lux +++ b/stdlib/source/test/lux/tool/compiler/language/lux/phase/analysis/simple.lux @@ -1,10 +1,10 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] ["[0]" type ("[1]#[0]" equivalence)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" pipe] ["[0]" try]] @@ -20,7 +20,7 @@ [/// ["[1][0]" extension] [// - ["[1][0]" analysis {"+" Analysis Operation} + ["[1][0]" analysis (.only Analysis Operation) ["[2][0]" type] ["[2][0]" module]] [/// diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/phase/extension.lux b/stdlib/source/test/lux/tool/compiler/language/lux/phase/extension.lux index 3833dfa63..460162144 100644 --- a/stdlib/source/test/lux/tool/compiler/language/lux/phase/extension.lux +++ b/stdlib/source/test/lux/tool/compiler/language/lux/phase/extension.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - ["[0]" monad {"+" do}] + ["[0]" monad (.only do)] [\\specification ["$[0]" equivalence] ["$[0]" hash]]] @@ -14,12 +14,12 @@ [data ["[0]" bit ("[1]#[0]" equivalence)] ["[0]" text ("[1]#[0]" equivalence) - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" dictionary] ["[0]" list ("[1]#[0]" mix)]]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat] ["i" int]]]]] diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/phase/extension/analysis/lux.lux b/stdlib/source/test/lux/tool/compiler/language/lux/phase/extension/analysis/lux.lux index 712eaad17..5d4dc57f2 100644 --- a/stdlib/source/test/lux/tool/compiler/language/lux/phase/extension/analysis/lux.lux +++ b/stdlib/source/test/lux/tool/compiler/language/lux/phase/extension/analysis/lux.lux @@ -1,14 +1,14 @@ (.using [lux {"-" i64 int primitive} [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [data - ["%" text/format {"+" format}]] - ["r" math/random {"+" Random}] - ["_" test {"+" Test}] + ["%" text/format (.only format)]] + ["r" math/random (.only Random)] + ["_" test (.only Test)] [control + [io (.only IO)] ["[0]" pipe] - [io {"+" IO}] ["[0]" try] [concurrency ["[0]" atom]]] diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis.lux b/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis.lux index e64b9540a..9281ed4d6 100644 --- a/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis.lux +++ b/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis.lux @@ -1,6 +1,6 @@ (.using [lux "*" - ["_" test {"+" Test}]] + ["_" test (.only Test)]] ["[0]" / "_" ["[1][0]" primitive] ["[1][0]" structure] diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/case.lux b/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/case.lux index ee7bdec19..45587fb90 100644 --- a/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/case.lux +++ b/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/case.lux @@ -1,16 +1,16 @@ (.using [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [hash {"+" Hash}] - ["[0]" monad {"+" do}]] + [hash (.only Hash)] + ["[0]" monad (.only do)]] [control ["[0]" pipe] ["[0]" try ("[1]#[0]" functor)]] [data ["[0]" sum] ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [number ["n" nat] ["[0]" int] @@ -20,7 +20,7 @@ ["[0]" list ("[1]#[0]" functor mix monoid)] ["[0]" set]]] [math - ["[0]" random {"+" Random}]]] + ["[0]" random (.only Random)]]] ["[0]" // "_" ["[1][0]" primitive]] [\\ @@ -30,11 +30,11 @@ [extension ["[1][0]" bundle]] ["/[1]" // - ["[0]" analysis {"+" Branch Match Analysis}] - ["[0]" synthesis {"+" Path Synthesis}] + ["[0]" analysis (.only Branch Match Analysis)] + ["[0]" synthesis (.only Path Synthesis)] [/// ["[1][0]" reference - [variable {"+" Register}]] + [variable (.only Register)]] ["[0]" phase] [meta ["[0]" archive]]]]]]]]) diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/function.lux b/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/function.lux index 51f9d87b9..dda9657be 100644 --- a/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/function.lux +++ b/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/function.lux @@ -1,24 +1,24 @@ (.using [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control ["[0]" try]] [data ["[0]" product] ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [number ["n" nat]] [collection ["[0]" list ("[1]#[0]" functor mix monoid)] - ["[0]" dictionary {"+" Dictionary}] + ["[0]" dictionary (.only Dictionary)] ["[0]" set]]] [macro ["^" pattern]] [math - ["[0]" random {"+" Random}]]] + ["[0]" random (.only Random)]]] ["[0]" // "_" ["[1][0]" primitive]] [\\ @@ -28,12 +28,12 @@ [extension ["[1][0]" bundle]] ["/[1]" // - ["[0]" analysis {"+" Analysis}] - ["[0]" synthesis {"+" Synthesis}] + ["[0]" analysis (.only Analysis)] + ["[0]" synthesis (.only Synthesis)] [/// - [arity {"+" Arity}] + [arity (.only Arity)] ["[0]" reference - ["[0]" variable {"+" Variable}]] + ["[0]" variable (.only Variable)]] ["[0]" phase] [meta ["[0]" archive]]]]]]]]) diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/loop.lux b/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/loop.lux index 2a6cb934b..22581ad24 100644 --- a/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/loop.lux +++ b/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/loop.lux @@ -1,8 +1,8 @@ (.using [lux {"-" structure loop function} - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" try] ["[0]" exception]] @@ -12,16 +12,16 @@ [collection ["[0]" list ("[1]#[0]" functor)]]] [math - ["[0]" random {"+" Random} ("[1]#[0]" monad)]]] + ["[0]" random (.only Random) ("[1]#[0]" monad)]]] [\\ ["[0]" / [//// - ["[0]" analysis {"+" Environment}] - ["/[1]" synthesis {"+" Member Path Synthesis}] + ["[0]" analysis (.only Environment)] + ["/[1]" synthesis (.only Member Path Synthesis)] [/// - [arity {"+" Arity}] - ["[0]" reference {"+" Constant} - ["[0]" variable {"+" Register Variable}]]]]]]) + [arity (.only Arity)] + ["[0]" reference (.only Constant) + ["[0]" variable (.only Register Variable)]]]]]]) (type: (Scenario a) (-> Register Arity Register (Random [Register [a a]]))) diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/primitive.lux b/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/primitive.lux index 327a799ef..4987fd68e 100644 --- a/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/primitive.lux +++ b/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/primitive.lux @@ -1,17 +1,17 @@ (.using [lux {"-" primitive} - [abstract ["[0]" monad {"+" do}]] + [abstract ["[0]" monad (.only do)]] [control ["[0]" pipe] ["[0]" try]] [data - ["%" text/format {"+" format}] + ["%" text/format (.only format)] [number ["n" nat]] [collection ["[0]" list]]] - ["r" math/random {"+" Random} ("[1]#[0]" monad)] - ["_" test {"+" Test}] + ["r" math/random (.only Random) ("[1]#[0]" monad)] + ["_" test (.only Test)] [meta ["[0]" symbol]]] [\\ @@ -21,8 +21,8 @@ [extension ["[1][0]" bundle]] ["/[1]" // - ["[1][0]" analysis {"+" Analysis}] - ["[1][0]" synthesis {"+" Synthesis}] + ["[1][0]" analysis (.only Analysis)] + ["[1][0]" synthesis (.only Synthesis)] [/// ["[0]" phase] [meta diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/structure.lux b/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/structure.lux index 5cfb0ecd6..2824d8bb2 100644 --- a/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/structure.lux +++ b/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/structure.lux @@ -1,11 +1,11 @@ (.using [lux "*" [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [data - ["%" text/format {"+" format}]] - ["r" math/random {"+" Random}] - ["_" test {"+" Test}] + ["%" text/format (.only format)]] + ["r" math/random (.only Random)] + ["_" test (.only Test)] [control ["[0]" pipe] ["[0]" try]] @@ -27,8 +27,8 @@ [extension ["[1][0]" bundle]] ["/[1]" // - ["[1][0]" analysis {"+" Analysis}] - ["[1][0]" synthesis {"+" Synthesis}] + ["[1][0]" analysis (.only Analysis)] + ["[1][0]" synthesis (.only Synthesis)] [/// ["[0]" phase] [meta diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/variable.lux b/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/variable.lux index ee364756a..6f28d4c7a 100644 --- a/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/variable.lux +++ b/stdlib/source/test/lux/tool/compiler/language/lux/phase/synthesis/variable.lux @@ -1,28 +1,28 @@ (.using [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [math - ["[0]" random {"+" Random}]] + ["[0]" random (.only Random)]] [control ["[0]" try]] [data ["[0]" product] ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [number ["n" nat]] [collection ["[0]" list ("[1]#[0]" functor mix)] - ["[0]" dictionary {"+" Dictionary}]]] + ["[0]" dictionary (.only Dictionary)]]] [macro ["^" pattern]]] [\\ ["[0]" / [//// ["[0]" analysis] - ["[0]" synthesis {"+" Side Member Path Synthesis}] + ["[0]" synthesis (.only Side Member Path Synthesis)] [/// [reference ["[0]" variable]]]]]]) diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/syntax.lux b/stdlib/source/test/lux/tool/compiler/language/lux/syntax.lux index 21a76beb9..a3012d280 100644 --- a/stdlib/source/test/lux/tool/compiler/language/lux/syntax.lux +++ b/stdlib/source/test/lux/tool/compiler/language/lux/syntax.lux @@ -1,12 +1,12 @@ (.using [lux "*" - [abstract/monad {"+" do}] + [abstract/monad (.only do)] [data - ["%" text/format {"+" format}] + ["%" text/format (.only format)] [number ["n" nat]]] - ["r" math/random {"+" Random} ("[1]#[0]" monad)] - ["_" test {"+" Test}] + ["r" math/random (.only Random) ("[1]#[0]" monad)] + ["_" test (.only Test)] [control ["[0]" try] [parser @@ -15,7 +15,7 @@ ["[0]" text] [collection ["[0]" list] - ["[0]" dictionary {"+" Dictionary}]]] + ["[0]" dictionary (.only Dictionary)]]] [macro ["[0]" code]] [meta diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/synthesis/access.lux b/stdlib/source/test/lux/tool/compiler/language/lux/synthesis/access.lux index c828ed855..8af03a066 100644 --- a/stdlib/source/test/lux/tool/compiler/language/lux/synthesis/access.lux +++ b/stdlib/source/test/lux/tool/compiler/language/lux/synthesis/access.lux @@ -1,7 +1,7 @@ (.using [library [lux "*" - ["_" test {"+" Test}]]] + ["_" test (.only Test)]]] ["[0]" / "_" ["[1][0]" side] ["[1][0]" member]]) diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/synthesis/access/member.lux b/stdlib/source/test/lux/tool/compiler/language/lux/synthesis/access/member.lux index ecd3cd328..7ac145e97 100644 --- a/stdlib/source/test/lux/tool/compiler/language/lux/synthesis/access/member.lux +++ b/stdlib/source/test/lux/tool/compiler/language/lux/synthesis/access/member.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence] ["$[0]" hash]]] @@ -11,7 +11,7 @@ ["[0]" bit ("[1]#[0]" equivalence)] ["[0]" text ("[1]#[0]" equivalence)]] [math - ["[0]" random {"+" Random}]]]] + ["[0]" random (.only Random)]]]] [\\library ["[0]" /]]) diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/synthesis/access/side.lux b/stdlib/source/test/lux/tool/compiler/language/lux/synthesis/access/side.lux index f9156206e..260723bce 100644 --- a/stdlib/source/test/lux/tool/compiler/language/lux/synthesis/access/side.lux +++ b/stdlib/source/test/lux/tool/compiler/language/lux/synthesis/access/side.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence] ["$[0]" hash]]] @@ -11,7 +11,7 @@ ["[0]" bit ("[1]#[0]" equivalence)] ["[0]" text ("[1]#[0]" equivalence)]] [math - ["[0]" random {"+" Random}]]]] + ["[0]" random (.only Random)]]]] [\\library ["[0]" /]]) diff --git a/stdlib/source/test/lux/tool/compiler/language/lux/synthesis/simple.lux b/stdlib/source/test/lux/tool/compiler/language/lux/synthesis/simple.lux index 2a6910daa..1b17d8092 100644 --- a/stdlib/source/test/lux/tool/compiler/language/lux/synthesis/simple.lux +++ b/stdlib/source/test/lux/tool/compiler/language/lux/synthesis/simple.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence] ["$[0]" hash]]] @@ -11,7 +11,7 @@ ["[0]" bit ("[1]#[0]" equivalence)] ["[0]" text ("[1]#[0]" equivalence)]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat]]]]] [\\library diff --git a/stdlib/source/test/lux/tool/compiler/meta/archive.lux b/stdlib/source/test/lux/tool/compiler/meta/archive.lux index 1d0851bbf..113ce4c0d 100644 --- a/stdlib/source/test/lux/tool/compiler/meta/archive.lux +++ b/stdlib/source/test/lux/tool/compiler/meta/archive.lux @@ -1,22 +1,22 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" try] ["[0]" exception]] [data ["[0]" product] ["[0]" text - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list] ["[0]" set ("[1]#[0]" equivalence)] ["[0]" sequence]]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat]]] [meta diff --git a/stdlib/source/test/lux/tool/compiler/meta/archive/artifact.lux b/stdlib/source/test/lux/tool/compiler/meta/archive/artifact.lux index e87df01d3..1988b08ae 100644 --- a/stdlib/source/test/lux/tool/compiler/meta/archive/artifact.lux +++ b/stdlib/source/test/lux/tool/compiler/meta/archive/artifact.lux @@ -1,12 +1,12 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract [\\specification ["$[0]" equivalence]]] [math - ["[0]" random {"+" Random}]]]] + ["[0]" random (.only Random)]]]] ["[0]" / "_" ["[1][0]" category]] [\\library diff --git a/stdlib/source/test/lux/tool/compiler/meta/archive/artifact/category.lux b/stdlib/source/test/lux/tool/compiler/meta/archive/artifact/category.lux index 82722ddcb..6b9121203 100644 --- a/stdlib/source/test/lux/tool/compiler/meta/archive/artifact/category.lux +++ b/stdlib/source/test/lux/tool/compiler/meta/archive/artifact/category.lux @@ -1,12 +1,12 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract [\\specification ["$[0]" equivalence]]] [math - ["[0]" random {"+" Random} ("[1]#[0]" monad)]]]] + ["[0]" random (.only Random) ("[1]#[0]" monad)]]]] [\\library ["[0]" /]]) diff --git a/stdlib/source/test/lux/tool/compiler/meta/archive/key.lux b/stdlib/source/test/lux/tool/compiler/meta/archive/key.lux index ff80c5289..76c0f4d7d 100644 --- a/stdlib/source/test/lux/tool/compiler/meta/archive/key.lux +++ b/stdlib/source/test/lux/tool/compiler/meta/archive/key.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [math ["[0]" random]]]] [\\library diff --git a/stdlib/source/test/lux/tool/compiler/meta/archive/module.lux b/stdlib/source/test/lux/tool/compiler/meta/archive/module.lux index 5251a1c86..b0b4b82c6 100644 --- a/stdlib/source/test/lux/tool/compiler/meta/archive/module.lux +++ b/stdlib/source/test/lux/tool/compiler/meta/archive/module.lux @@ -1,11 +1,11 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat]]]]] [\\library diff --git a/stdlib/source/test/lux/tool/compiler/meta/archive/module/descriptor.lux b/stdlib/source/test/lux/tool/compiler/meta/archive/module/descriptor.lux index 446a91717..c5ac2ce20 100644 --- a/stdlib/source/test/lux/tool/compiler/meta/archive/module/descriptor.lux +++ b/stdlib/source/test/lux/tool/compiler/meta/archive/module/descriptor.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence]]] [control @@ -15,7 +15,7 @@ [format ["[0]" binary]]] [math - ["[0]" random {"+" Random} ("[1]#[0]" monad)]]]] + ["[0]" random (.only Random) ("[1]#[0]" monad)]]]] [\\library ["[0]" /]]) diff --git a/stdlib/source/test/lux/tool/compiler/meta/archive/module/document.lux b/stdlib/source/test/lux/tool/compiler/meta/archive/module/document.lux index 289ab40fd..8fe22754c 100644 --- a/stdlib/source/test/lux/tool/compiler/meta/archive/module/document.lux +++ b/stdlib/source/test/lux/tool/compiler/meta/archive/module/document.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" pipe] ["[0]" try ("[1]#[0]" functor)] diff --git a/stdlib/source/test/lux/tool/compiler/meta/archive/registry.lux b/stdlib/source/test/lux/tool/compiler/meta/archive/registry.lux index 1e8c54fba..a17aef45c 100644 --- a/stdlib/source/test/lux/tool/compiler/meta/archive/registry.lux +++ b/stdlib/source/test/lux/tool/compiler/meta/archive/registry.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" maybe ("[1]#[0]" functor)] ["[0]" try ("[1]#[0]" functor)] @@ -13,13 +13,13 @@ ["[0]" product] ["[0]" text] [collection - ["[0]" sequence {"+" Sequence}] - ["[0]" set {"+" Set}] + ["[0]" sequence (.only Sequence)] + ["[0]" set (.only Set)] ["[0]" list ("[1]#[0]" mix functor)]] [format ["[0]" binary]]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat]]]]] [\\library diff --git a/stdlib/source/test/lux/tool/compiler/meta/archive/signature.lux b/stdlib/source/test/lux/tool/compiler/meta/archive/signature.lux index 7321e07da..c8742968f 100644 --- a/stdlib/source/test/lux/tool/compiler/meta/archive/signature.lux +++ b/stdlib/source/test/lux/tool/compiler/meta/archive/signature.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence]]] [control @@ -16,7 +16,7 @@ [format ["[0]F" binary]]] [math - ["[0]" random {"+" Random}]]]] + ["[0]" random (.only Random)]]]] [\\library ["[0]" /]] ["[0]" //// "_" diff --git a/stdlib/source/test/lux/tool/compiler/meta/archive/unit.lux b/stdlib/source/test/lux/tool/compiler/meta/archive/unit.lux index fedec7da6..6b61c719a 100644 --- a/stdlib/source/test/lux/tool/compiler/meta/archive/unit.lux +++ b/stdlib/source/test/lux/tool/compiler/meta/archive/unit.lux @@ -1,7 +1,7 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract [\\specification ["$[0]" equivalence] @@ -10,7 +10,7 @@ [collection ["[0]" set]]] [math - ["[0]" random {"+" Random}]]]] + ["[0]" random (.only Random)]]]] [\\library ["[0]" /]]) diff --git a/stdlib/source/test/lux/tool/compiler/meta/cache.lux b/stdlib/source/test/lux/tool/compiler/meta/cache.lux index 27e3c1ded..714ea920a 100644 --- a/stdlib/source/test/lux/tool/compiler/meta/cache.lux +++ b/stdlib/source/test/lux/tool/compiler/meta/cache.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" try] [concurrency diff --git a/stdlib/source/test/lux/tool/compiler/meta/cache/archive.lux b/stdlib/source/test/lux/tool/compiler/meta/cache/archive.lux index 061dda399..3f8162726 100644 --- a/stdlib/source/test/lux/tool/compiler/meta/cache/archive.lux +++ b/stdlib/source/test/lux/tool/compiler/meta/cache/archive.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" try ("[1]#[0]" functor)] [concurrency diff --git a/stdlib/source/test/lux/tool/compiler/meta/cache/artifact.lux b/stdlib/source/test/lux/tool/compiler/meta/cache/artifact.lux index 319a19d7a..359af8fa4 100644 --- a/stdlib/source/test/lux/tool/compiler/meta/cache/artifact.lux +++ b/stdlib/source/test/lux/tool/compiler/meta/cache/artifact.lux @@ -1,18 +1,18 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" try] [concurrency - ["[0]" async {"+" Async} ("[1]#[0]" monad)]]] + ["[0]" async (.only Async) ("[1]#[0]" monad)]]] [data ["[0]" binary ("[1]#[0]" equivalence) ["$[1]" \\test]]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat]]] [world diff --git a/stdlib/source/test/lux/tool/compiler/meta/cache/module.lux b/stdlib/source/test/lux/tool/compiler/meta/cache/module.lux index 7923e4929..439195dd2 100644 --- a/stdlib/source/test/lux/tool/compiler/meta/cache/module.lux +++ b/stdlib/source/test/lux/tool/compiler/meta/cache/module.lux @@ -1,14 +1,14 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" try] ["[0]" exception] [concurrency - ["[0]" async {"+" Async} ("[1]#[0]" monad)]]] + ["[0]" async (.only Async) ("[1]#[0]" monad)]]] [math ["[0]" random]] [world diff --git a/stdlib/source/test/lux/tool/compiler/meta/cache/purge.lux b/stdlib/source/test/lux/tool/compiler/meta/cache/purge.lux index 419b247c1..3b14ddc2f 100644 --- a/stdlib/source/test/lux/tool/compiler/meta/cache/purge.lux +++ b/stdlib/source/test/lux/tool/compiler/meta/cache/purge.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" try] ["[0]" exception] @@ -19,7 +19,7 @@ ["[0]" sequence] ["[0]" set]]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat]]] [world diff --git a/stdlib/source/test/lux/tool/compiler/meta/cli.lux b/stdlib/source/test/lux/tool/compiler/meta/cli.lux index 657015461..a2f07b465 100644 --- a/stdlib/source/test/lux/tool/compiler/meta/cli.lux +++ b/stdlib/source/test/lux/tool/compiler/meta/cli.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" pipe] ["[0]" try ("[1]#[0]" functor)] @@ -15,7 +15,7 @@ [collection ["[0]" list ("[1]#[0]" monoid monad)]]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat]]] [meta @@ -25,7 +25,7 @@ ["$[1]" \\test]]]]] [\\library ["[0]" / - ["[1][0]" compiler {"+" Compiler}]]] + ["[1][0]" compiler (.only Compiler)]]] ["$[0]" / "_" ["[1][0]" compiler]]) diff --git a/stdlib/source/test/lux/tool/compiler/meta/cli/compiler.lux b/stdlib/source/test/lux/tool/compiler/meta/cli/compiler.lux index accb94da5..37632c8a6 100644 --- a/stdlib/source/test/lux/tool/compiler/meta/cli/compiler.lux +++ b/stdlib/source/test/lux/tool/compiler/meta/cli/compiler.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence]]] [control @@ -11,7 +11,7 @@ ["<>" parser ["<[0]>" text]]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat]]] [meta diff --git a/stdlib/source/test/lux/tool/compiler/meta/context.lux b/stdlib/source/test/lux/tool/compiler/meta/context.lux index 954f34791..2787c89c9 100644 --- a/stdlib/source/test/lux/tool/compiler/meta/context.lux +++ b/stdlib/source/test/lux/tool/compiler/meta/context.lux @@ -1,16 +1,16 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [data ["[0]" text] [collection ["[0]" set] ["[0]" list ("[1]#[0]" functor)]]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat]]]]] [\\library diff --git a/stdlib/source/test/lux/tool/compiler/meta/export.lux b/stdlib/source/test/lux/tool/compiler/meta/export.lux index c2fb768b2..7e9c33b6f 100644 --- a/stdlib/source/test/lux/tool/compiler/meta/export.lux +++ b/stdlib/source/test/lux/tool/compiler/meta/export.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" pipe] ["[0]" try ("[1]#[0]" functor)] @@ -13,18 +13,18 @@ ["<[0]>" binary]]] [data ["[0]" product] - ["[0]" binary {"+" Binary} ("[1]#[0]" equivalence)] + ["[0]" binary (.only Binary) ("[1]#[0]" equivalence)] ["[0]" bit ("[1]#[0]" equivalence)] [format ["[0]" tar]] ["[0]" text ("[1]#[0]" equivalence) - ["%" format {"+" format}] + ["%" format (.only format)] [encoding ["[0]" utf8]]] [collection ["[0]" sequence]]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat]]] [world diff --git a/stdlib/source/test/lux/tool/compiler/meta/import.lux b/stdlib/source/test/lux/tool/compiler/meta/import.lux index 1c59ed494..75bda2a9f 100644 --- a/stdlib/source/test/lux/tool/compiler/meta/import.lux +++ b/stdlib/source/test/lux/tool/compiler/meta/import.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" maybe ("[1]#[0]" functor)] ["[0]" try ("[1]#[0]" functor)] @@ -14,20 +14,20 @@ ["<[0]>" binary]]] [data ["[0]" product] - ["[0]" binary {"+" Binary} ("[1]#[0]" equivalence)] + ["[0]" binary (.only Binary) ("[1]#[0]" equivalence)] ["[0]" bit ("[1]#[0]" equivalence)] ["[0]" format "_" - ["[0]" tar {"+" Tar}] + ["[0]" tar (.only Tar)] ["[1]" binary]] ["[0]" text ("[1]#[0]" equivalence) - ["%" format {"+" format}] + ["%" format (.only format)] [encoding ["[0]" utf8]]] [collection ["[0]" sequence] ["[0]" dictionary]]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat]]] [world diff --git a/stdlib/source/test/lux/tool/compiler/phase.lux b/stdlib/source/test/lux/tool/compiler/phase.lux index dd956f90f..fab36b2ae 100644 --- a/stdlib/source/test/lux/tool/compiler/phase.lux +++ b/stdlib/source/test/lux/tool/compiler/phase.lux @@ -1,19 +1,19 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification - ["$[0]" functor {"+" Injection Comparison}] + ["$[0]" functor (.only Injection Comparison)] ["$[0]" monad]]] [control ["[0]" pipe] ["[0]" try ("[1]#[0]" functor)] - ["[0]" exception {"+" exception:}]] + ["[0]" exception (.only exception:)]] [data ["[0]" text ("[1]#[0]" equivalence) - ["%" format {"+" format}]]] + ["%" format (.only format)]]] [math ["[0]" random] [number diff --git a/stdlib/source/test/lux/tool/compiler/reference.lux b/stdlib/source/test/lux/tool/compiler/reference.lux index e29fc64bf..61beee2c4 100644 --- a/stdlib/source/test/lux/tool/compiler/reference.lux +++ b/stdlib/source/test/lux/tool/compiler/reference.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence] ["$[0]" hash]]] @@ -11,14 +11,14 @@ ["[0]" text ("[1]#[0]" equivalence) ["%" format]]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat]]] [meta ["[0]" symbol ("[1]#[0]" equivalence)]]]] [\\library ["[0]" / - ["[0]" variable {"+" Register}]]] + ["[0]" variable (.only Register)]]] ["[0]" / "_" ["[1][0]" variable]]) diff --git a/stdlib/source/test/lux/tool/compiler/reference/variable.lux b/stdlib/source/test/lux/tool/compiler/reference/variable.lux index 69db9b255..603975f04 100644 --- a/stdlib/source/test/lux/tool/compiler/reference/variable.lux +++ b/stdlib/source/test/lux/tool/compiler/reference/variable.lux @@ -1,16 +1,16 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence] ["$[0]" hash]]] [data ["[0]" text ("[1]#[0]" equivalence)]] [math - ["[0]" random {"+" Random}]]]] + ["[0]" random (.only Random)]]]] [\\library ["[0]" /]]) diff --git a/stdlib/source/test/lux/tool/compiler/version.lux b/stdlib/source/test/lux/tool/compiler/version.lux index f76f8651d..0e3028654 100644 --- a/stdlib/source/test/lux/tool/compiler/version.lux +++ b/stdlib/source/test/lux/tool/compiler/version.lux @@ -1,15 +1,15 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [data ["[0]" bit ("[1]#[0]" equivalence)] ["[0]" text ("[1]#[0]" equivalence) - ["%" format {"+" format}]]] + ["%" format (.only format)]]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat]]]]] [\\library diff --git a/stdlib/source/test/lux/type.lux b/stdlib/source/test/lux/type.lux index 8fbc8a066..3a378cdde 100644 --- a/stdlib/source/test/lux/type.lux +++ b/stdlib/source/test/lux/type.lux @@ -1,9 +1,9 @@ (.using [library [lux {"-" symbol} - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - ["[0]" monad {"+" do}] + ["[0]" monad (.only do)] [\\specification ["$[0]" equivalence]]] [control @@ -19,7 +19,7 @@ ["^" pattern] ["[0]" code ("[1]#[0]" equivalence)]] [math - ["[0]" random {"+" Random} ("[1]#[0]" monad)] + ["[0]" random (.only Random) ("[1]#[0]" monad)] [number ["n" nat]]]]] [\\library diff --git a/stdlib/source/test/lux/type/check.lux b/stdlib/source/test/lux/type/check.lux index c5fb83a48..5dd6377ad 100644 --- a/stdlib/source/test/lux/type/check.lux +++ b/stdlib/source/test/lux/type/check.lux @@ -1,31 +1,31 @@ (.using [library [lux {"-" type symbol} - ["_" test {"+" Test}] + ["_" test (.only Test)] ["[0]" type ("[1]#[0]" equivalence)] [abstract - ["[0]" monad {"+" do}] + ["[0]" monad (.only do)] [\\specification - ["$[0]" functor {"+" Injection Comparison}] + ["$[0]" functor (.only Injection Comparison)] ["$[0]" apply] ["$[0]" monad]]] [control ["[0]" pipe] ["[0]" function] ["[0]" try] - ["[0]" exception {"+" exception:}]] + ["[0]" exception (.only exception:)]] [data ["[0]" bit ("[1]#[0]" equivalence)] ["[0]" product] ["[0]" text ("[1]#[0]" equivalence) - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list ("[1]#[0]" functor monoid)] ["[0]" set]]] [macro ["^" pattern]] [math - ["[0]" random {"+" Random} ("[1]#[0]" monad)] + ["[0]" random (.only Random) ("[1]#[0]" monad)] [number ["n" nat]]]]] [\\library diff --git a/stdlib/source/test/lux/type/dynamic.lux b/stdlib/source/test/lux/type/dynamic.lux index d057ed790..20363e7d4 100644 --- a/stdlib/source/test/lux/type/dynamic.lux +++ b/stdlib/source/test/lux/type/dynamic.lux @@ -1,17 +1,17 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" try] ["[0]" exception]] [data ["[0]" text ("[1]#[0]" equivalence) - ["%" format {"+" format}]]] + ["%" format (.only format)]]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat]]]]] [\\library diff --git a/stdlib/source/test/lux/type/implicit.lux b/stdlib/source/test/lux/type/implicit.lux index aeba6758c..21b354d3b 100644 --- a/stdlib/source/test/lux/type/implicit.lux +++ b/stdlib/source/test/lux/type/implicit.lux @@ -1,19 +1,19 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [equivalence {"+" }] - [functor {"+" }] - [monoid {"+" }] - [monad {"+" do}] + [equivalence (.only)] + [functor (.only)] + [monoid (.only)] + [monad (.only do)] ["[0]" enum]] [data ["[0]" bit ("[1]#[0]" equivalence)] [collection ["[0]" list]]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat]]]]] [\\library diff --git a/stdlib/source/test/lux/type/poly.lux b/stdlib/source/test/lux/type/poly.lux index 0850116fb..0a8552bd9 100644 --- a/stdlib/source/test/lux/type/poly.lux +++ b/stdlib/source/test/lux/type/poly.lux @@ -1,7 +1,7 @@ (.using [library [lux "*" - ["_" test {"+" Test}]]] + ["_" test (.only Test)]]] [\\library ["[0]" /]] ["[0]" / "_" diff --git a/stdlib/source/test/lux/type/poly/equivalence.lux b/stdlib/source/test/lux/type/poly/equivalence.lux index 47caf14ac..64b4c0e3c 100644 --- a/stdlib/source/test/lux/type/poly/equivalence.lux +++ b/stdlib/source/test/lux/type/poly/equivalence.lux @@ -1,11 +1,11 @@ (.using [library [lux {"-" Variant Record} - ["_" test {"+" Test}] + ["_" test (.only Test)] ["@" target] [abstract - [monad {"+" do}] - [equivalence {"+" Equivalence} + [monad (.only do)] + [equivalence (.only Equivalence) [\\poly ["[0]" /]]] [\\specification @@ -18,7 +18,7 @@ [collection ["[0]" list]]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat] ["i" int]]]]]) diff --git a/stdlib/source/test/lux/type/poly/functor.lux b/stdlib/source/test/lux/type/poly/functor.lux index e37d05dd0..617c6e31f 100644 --- a/stdlib/source/test/lux/type/poly/functor.lux +++ b/stdlib/source/test/lux/type/poly/functor.lux @@ -3,12 +3,12 @@ [lux "*" ["@" target] [abstract - [monad {"+" do}] - [functor {"+" Functor} + [monad (.only do)] + [functor (.only Functor) [\\poly ["[0]" /]]]] - ["r" math/random {"+" Random}] - ["_" test {"+" Test}] + ["r" math/random (.only Random)] + ["_" test (.only Test)] [control ["[0]" state]] [data diff --git a/stdlib/source/test/lux/type/poly/json.lux b/stdlib/source/test/lux/type/poly/json.lux index 3e9c4cea1..d3e9459fe 100644 --- a/stdlib/source/test/lux/type/poly/json.lux +++ b/stdlib/source/test/lux/type/poly/json.lux @@ -1,13 +1,13 @@ (.using [library [lux {"-" Variant Record} - ["_" test {"+" Test}] + ["_" test (.only Test)] ["@" target] ["[0]" debug] [abstract codec - [monad {"+" do}] - ["[0]" equivalence {"+" Equivalence} + [monad (.only do)] + ["[0]" equivalence (.only Equivalence) ["poly/[1]" \\poly]] [\\specification ["$[0]" equivalence] @@ -16,22 +16,22 @@ ["[0]" try] ["p" parser ... TODO: Get rid of this import ASAP - [json {"+"}]]] + [json (.only)]]] [data ["[0]" bit] ["[0]" text] [format - [json {"+" JSON} + [json (.only JSON) [\\poly ["[0]" /]]]] [collection - [sequence {"+" sequence}] + [sequence (.only sequence)] ["d" dictionary] ["[0]" list]]] [type ["[0]" unit]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat] ["[0]" frac]]] diff --git a/stdlib/source/test/lux/type/primitive.lux b/stdlib/source/test/lux/type/primitive.lux index f438abcb2..65c537709 100644 --- a/stdlib/source/test/lux/type/primitive.lux +++ b/stdlib/source/test/lux/type/primitive.lux @@ -1,10 +1,10 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] ["[0]" meta] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" try] ["[0]" exception] @@ -13,7 +13,7 @@ [data ["[0]" text ("[1]#[0]" equivalence)]] ["[0]" macro - [syntax {"+" syntax:}] + [syntax (.only syntax:)] ["[0]" code] ["[0]" template]] ["[0]" math diff --git a/stdlib/source/test/lux/type/quotient.lux b/stdlib/source/test/lux/type/quotient.lux index f10d2a4c2..9809da7a0 100644 --- a/stdlib/source/test/lux/type/quotient.lux +++ b/stdlib/source/test/lux/type/quotient.lux @@ -1,16 +1,16 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - ["[0]" monad {"+" do}] + ["[0]" monad (.only do)] [\\specification ["$[0]" equivalence]]] [data ["[0]" text ("[1]#[0]" equivalence) - ["%" format {"+" format}]]] + ["%" format (.only format)]]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat ("[1]#[0]" equivalence)]]]]] [\\library diff --git a/stdlib/source/test/lux/type/refinement.lux b/stdlib/source/test/lux/type/refinement.lux index 26617a2fc..04c914bad 100644 --- a/stdlib/source/test/lux/type/refinement.lux +++ b/stdlib/source/test/lux/type/refinement.lux @@ -1,10 +1,10 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [predicate {"+" Predicate}] - [monad {"+" do}]] + [predicate (.only Predicate)] + [monad (.only do)]] [control ["[0]" maybe ("[1]#[0]" monad)]] [data diff --git a/stdlib/source/test/lux/type/resource.lux b/stdlib/source/test/lux/type/resource.lux index 755978e8c..89c65d03b 100644 --- a/stdlib/source/test/lux/type/resource.lux +++ b/stdlib/source/test/lux/type/resource.lux @@ -1,30 +1,30 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] ["[0]" meta] [abstract ["[0]" monad - [indexed {"+" do}]]] + [indexed (.only do)]]] [control - ["[0]" io {"+" IO}] + ["[0]" io (.only IO)] ["[0]" try] - ["[0]" exception {"+" Exception}] + ["[0]" exception (.only Exception)] [concurrency - ["[0]" async {"+" Async}]] + ["[0]" async (.only Async)]] [parser ["<[0]>" code]]] [data - ["[0]" identity {"+" Identity}] + ["[0]" identity (.only Identity)] ["[0]" text ("[1]#[0]" equivalence) - ["%" format {"+" format}]]] + ["%" format (.only format)]]] ["[0]" macro - [syntax {"+" syntax:}] + [syntax (.only syntax:)] ["[0]" code]] [math ["[0]" random]]]] [\\library - ["[0]" / {"+" Res}]]) + ["[0]" / (.only Res)]]) (def: pure Test diff --git a/stdlib/source/test/lux/type/unit.lux b/stdlib/source/test/lux/type/unit.lux index 306d4391a..a351c43ac 100644 --- a/stdlib/source/test/lux/type/unit.lux +++ b/stdlib/source/test/lux/type/unit.lux @@ -1,21 +1,21 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] ["[0]" debug] ["[0]" meta] [abstract - [monad {"+" do}] - [equivalence {"+" Equivalence}] + [monad (.only do)] + [equivalence (.only Equivalence)] [\\specification ["$[0]" equivalence] ["$[0]" order] ["$[0]" enum]]] [macro - [syntax {"+" syntax:}] + [syntax (.only syntax:)] ["[0]" code]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["i" int] ["[0]" ratio ("[1]#[0]" equivalence)]]]]] diff --git a/stdlib/source/test/lux/type/variance.lux b/stdlib/source/test/lux/type/variance.lux index 8b7e62f1a..572b863db 100644 --- a/stdlib/source/test/lux/type/variance.lux +++ b/stdlib/source/test/lux/type/variance.lux @@ -1,11 +1,11 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [math - ["[0]" random {"+" Random}]]]] + ["[0]" random (.only Random)]]]] [\\library ["[0]" / ["/[1]" // "_" diff --git a/stdlib/source/test/lux/world.lux b/stdlib/source/test/lux/world.lux index 454a5a001..6e45123fc 100644 --- a/stdlib/source/test/lux/world.lux +++ b/stdlib/source/test/lux/world.lux @@ -1,7 +1,7 @@ (.using [library [lux "*" - ["_" test {"+" Test}]]] + ["_" test (.only Test)]]] ["[0]" / "_" ["[1][0]" file] ["[1][0]" shell] diff --git a/stdlib/source/test/lux/world/console.lux b/stdlib/source/test/lux/world/console.lux index 29e8f66e5..263892a3c 100644 --- a/stdlib/source/test/lux/world/console.lux +++ b/stdlib/source/test/lux/world/console.lux @@ -1,16 +1,16 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" io] - ["[0]" try {"+" Try}] - ["[0]" exception {"+" exception:}]] + ["[0]" try (.only Try)] + ["[0]" exception (.only exception:)]] [data ["[0]" text ("[1]#[0]" equivalence) - ["%" format {"+" format}]]] + ["%" format (.only format)]]] [math ["[0]" random]]]] [\\library diff --git a/stdlib/source/test/lux/world/file.lux b/stdlib/source/test/lux/world/file.lux index 0ff782b56..c37c0eb91 100644 --- a/stdlib/source/test/lux/world/file.lux +++ b/stdlib/source/test/lux/world/file.lux @@ -1,28 +1,28 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - ["[0]" monad {"+" do}]] + ["[0]" monad (.only do)]] [control - ["[0]" io {"+" IO}] - ["[0]" try {"+" Try}] + ["[0]" io (.only IO)] + ["[0]" try (.only Try)] ["[0]" exception] [concurrency - ["[0]" async {"+" Async}] - ["[0]" atom {"+" Atom}]]] + ["[0]" async (.only Async)] + ["[0]" atom (.only Atom)]]] [data - ["[0]" binary {"+" Binary} ("[1]#[0]" monoid)] + ["[0]" binary (.only Binary) ("[1]#[0]" monoid)] ["[0]" text ("[1]#[0]" equivalence)] [collection - ["[0]" dictionary {"+" Dictionary}] + ["[0]" dictionary (.only Dictionary)] ["[0]" list]]] [macro ["^" pattern]] [math ["[0]" random]] [time - ["[0]" instant {"+" Instant}]]]] + ["[0]" instant (.only Instant)]]]] ["[0]" / "_" ["[1][0]" watch]] [\\library diff --git a/stdlib/source/test/lux/world/file/watch.lux b/stdlib/source/test/lux/world/file/watch.lux index 73e09ee96..e7beaa6a1 100644 --- a/stdlib/source/test/lux/world/file/watch.lux +++ b/stdlib/source/test/lux/world/file/watch.lux @@ -1,23 +1,23 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [predicate {"+" Predicate}] - [monad {"+" do}]] + [predicate (.only Predicate)] + [monad (.only do)]] [control - ["[0]" try {"+" Try}] + ["[0]" try (.only Try)] ["[0]" exception] [concurrency - ["[0]" async {"+" Async}]]] + ["[0]" async (.only Async)]]] [data - ["[0]" binary {"+" Binary} ("[1]#[0]" equivalence)] + ["[0]" binary (.only Binary) ("[1]#[0]" equivalence)] ["[0]" text ("[1]#[0]" equivalence) - ["%" format {"+" format}]] + ["%" format (.only format)]] [collection ["[0]" list]]] [math - ["[0]" random {"+" Random} ("[1]#[0]" monad)]]]] + ["[0]" random (.only Random) ("[1]#[0]" monad)]]]] [\\library ["[0]" / ["/[1]" //]]] diff --git a/stdlib/source/test/lux/world/input/keyboard.lux b/stdlib/source/test/lux/world/input/keyboard.lux index 5e2e33364..2c77b4e0c 100644 --- a/stdlib/source/test/lux/world/input/keyboard.lux +++ b/stdlib/source/test/lux/world/input/keyboard.lux @@ -1,20 +1,20 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" maybe]] [data ["[0]" bit ("[1]#[0]" equivalence)] [collection ["[0]" list] - ["[0]" set {"+" Set}]]] + ["[0]" set (.only Set)]]] [macro ["[0]" template]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat]]]]] [\\library diff --git a/stdlib/source/test/lux/world/net/http/client.lux b/stdlib/source/test/lux/world/net/http/client.lux index 560162875..e0b57ccd2 100644 --- a/stdlib/source/test/lux/world/net/http/client.lux +++ b/stdlib/source/test/lux/world/net/http/client.lux @@ -1,13 +1,13 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" Monad do}]] + [monad (.only Monad do)]] [control ["[0]" pipe] - ["[0]" io {"+" IO}] - ["[0]" try {"+" Try}] + ["[0]" io (.only IO)] + ["[0]" try (.only Try)] ["[0]" function] [concurrency ["[0]" async ("[1]#[0]" functor)]]] @@ -15,13 +15,13 @@ ["[0]" binary] ["[0]" product] ["[0]" text - ["%" format {"+" format}] + ["%" format (.only format)] [encoding ["[0]" utf8]]] [collection ["[0]" dictionary]]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["[0]" nat]]]]] [\\library diff --git a/stdlib/source/test/lux/world/net/http/status.lux b/stdlib/source/test/lux/world/net/http/status.lux index 90ad92906..5ef42f25d 100644 --- a/stdlib/source/test/lux/world/net/http/status.lux +++ b/stdlib/source/test/lux/world/net/http/status.lux @@ -1,11 +1,11 @@ (.using [library [lux {"-" all} - ["_" test {"+" Test}] + ["_" test (.only Test)] [data [collection ["[0]" list] - ["[0]" set {"+" Set}]]] + ["[0]" set (.only Set)]]] [macro ["[0]" template]] [math diff --git a/stdlib/source/test/lux/world/output/video/resolution.lux b/stdlib/source/test/lux/world/output/video/resolution.lux index 3d46dc916..6839d6c1e 100644 --- a/stdlib/source/test/lux/world/output/video/resolution.lux +++ b/stdlib/source/test/lux/world/output/video/resolution.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}] + [monad (.only do)] [\\specification ["$[0]" equivalence] ["$[0]" hash]]] @@ -12,9 +12,9 @@ [data [collection ["[0]" list] - ["[0]" set {"+" Set}]]] + ["[0]" set (.only Set)]]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat]]]]] [\\library diff --git a/stdlib/source/test/lux/world/program.lux b/stdlib/source/test/lux/world/program.lux index 6c82d00da..88183a6cb 100644 --- a/stdlib/source/test/lux/world/program.lux +++ b/stdlib/source/test/lux/world/program.lux @@ -1,9 +1,9 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control ["[0]" pipe] ["[0]" io] @@ -11,20 +11,20 @@ ["[0]" try] ["[0]" exception] [parser - [environment {"+" Environment}]]] + [environment (.only Environment)]]] [data ["[0]" text ("[1]#[0]" equivalence)] [collection ["[0]" dictionary] ["[0]" list]]] [math - ["[0]" random {"+" Random}] + ["[0]" random (.only Random)] [number ["n" nat]]]]] [\\library ["[0]" / [// - [file {"+" Path}]]]] + [file (.only Path)]]]] [\\specification ["$[0]" /]]) diff --git a/stdlib/source/test/lux/world/shell.lux b/stdlib/source/test/lux/world/shell.lux index 1c51086d6..2a86ff9be 100644 --- a/stdlib/source/test/lux/world/shell.lux +++ b/stdlib/source/test/lux/world/shell.lux @@ -1,17 +1,17 @@ (.using [library [lux "*" - ["_" test {"+" Test}] + ["_" test (.only Test)] [abstract - [monad {"+" do}]] + [monad (.only do)]] [control - ["[0]" try {"+" Try}] - ["[0]" exception {"+" exception:}] - ["[0]" io {"+" IO}] + ["[0]" try (.only Try)] + ["[0]" exception (.only exception:)] + ["[0]" io (.only IO)] [concurrency - ["[0]" async {"+" Async}]] + ["[0]" async (.only Async)]] [parser - ["[0]" environment {"+" Environment}]]] + ["[0]" environment (.only Environment)]]] [data ["[0]" text ("[1]#[0]" equivalence)] [collection @@ -24,7 +24,7 @@ [\\library ["[0]" / [// - [file {"+" Path}]]]] + [file (.only Path)]]]] [\\specification ["$[0]" /]]) diff --git a/stdlib/source/unsafe/lux/data/binary.lux b/stdlib/source/unsafe/lux/data/binary.lux index fe71e0fbc..6c91dcab6 100644 --- a/stdlib/source/unsafe/lux/data/binary.lux +++ b/stdlib/source/unsafe/lux/data/binary.lux @@ -5,13 +5,13 @@ ["[0]" ffi] [control [function - [inline {"+" inline:}]]] + [inline (.only inline:)]]] [data [collection ["[0]" array "_" ["[1]" \\unsafe]]]] [math - [number {"+" hex} + [number (.only hex) ["[0]" i64]]]]]) (with_expansions [<jvm> (these (type: .public Binary |