From fc8bebd3b3c5f050ea92e72eecbd9f6df09f28db Mon Sep 17 00:00:00 2001 From: Eduardo Julian Date: Sat, 4 Sep 2021 12:49:52 -0400 Subject: De-taggification | part 2 --- stdlib/source/test/aedifex/command/auto.lux | 30 +++++++++++++------------- stdlib/source/test/aedifex/command/build.lux | 28 ++++++++++++------------ stdlib/source/test/aedifex/command/clean.lux | 22 +++++++++---------- stdlib/source/test/aedifex/command/deploy.lux | 22 +++++++++---------- stdlib/source/test/aedifex/command/deps.lux | 20 ++++++++--------- stdlib/source/test/aedifex/command/install.lux | 24 ++++++++++----------- stdlib/source/test/aedifex/command/pom.lux | 8 +++---- stdlib/source/test/aedifex/command/test.lux | 16 +++++++------- stdlib/source/test/aedifex/command/version.lux | 18 ++++++++-------- 9 files changed, 94 insertions(+), 94 deletions(-) (limited to 'stdlib/source/test/aedifex/command') diff --git a/stdlib/source/test/aedifex/command/auto.lux b/stdlib/source/test/aedifex/command/auto.lux index 91506ca06..894e647be 100644 --- a/stdlib/source/test/aedifex/command/auto.lux +++ b/stdlib/source/test/aedifex/command/auto.lux @@ -1,21 +1,21 @@ (.module: [library - [lux #* - ["_" test (#+ Test)] + [lux "*" + ["_" test {"+" [Test]}] [abstract - [monad (#+ do)]] + [monad {"+" [do]}]] [control - [pipe (#+ case>)] + [pipe {"+" [case>]}] ["." try] [parser ["." environment]] [concurrency - ["." atom (#+ Atom)] - ["." async (#+ Async)]]] + ["." atom {"+" [Atom]}] + ["." async {"+" [Async]}]]] [data ["." binary] ["." text - ["%" format (#+ format)] + ["%" format {"+" [format]}] [encoding ["." utf8]]] [collection @@ -27,22 +27,22 @@ [time ["." instant]] [world - [console (#+ Console)] - ["." shell (#+ Exit Shell)] - ["." program (#+ Program)] + [console {"+" [Console]}] + ["." shell {"+" [Exit Shell]}] + ["." program {"+" [Program]}] ["." file ["." watch]]]]] - ["." // #_ + ["." // "_" ["$." version] ["$." build]] [\\program ["." / - ["//#" /// #_ - [command (#+ Command)] - ["#" profile (#+ Profile)] + ["//#" /// "_" + [command {"+" [Command]}] + ["#" profile {"+" [Profile]}] ["#." action] [dependency - [resolution (#+ Resolution)]]]]]) + [resolution {"+" [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 95363b079..3009e5011 100644 --- a/stdlib/source/test/aedifex/command/build.lux +++ b/stdlib/source/test/aedifex/command/build.lux @@ -1,16 +1,16 @@ (.module: [library - [lux #* - ["_" test (#+ Test)] + [lux "*" + ["_" test {"+" [Test]}] [abstract - [monad (#+ do)]] + [monad {"+" [do]}]] [control - [pipe (#+ case>)] - [io (#+ IO)] + [pipe {"+" [case>]}] + [io {"+" [IO]}] ["." try] ["." exception] [concurrency - ["." async (#+ Async)]] + ["." async {"+" [Async]}]] [parser ["." environment]]] [data @@ -18,24 +18,24 @@ [collection ["." dictionary]]] [math - ["." random (#+ Random)]] + ["." random {"+" [Random]}]] [world ["." file] - ["." shell (#+ Shell)] + ["." shell {"+" [Shell]}] ["." program]]]] - ["." // #_ + ["." // "_" ["@." version] - ["$/#" // #_ + ["$/#" // "_" ["#." package]]] [\\program ["." / - ["//#" /// #_ - ["#" profile (#+ Profile)] + ["//#" /// "_" + ["#" profile {"+" [Profile]}] ["#." action] ["#." artifact ["#/." type]] - ["#." dependency (#+ Dependency) - ["#/." resolution (#+ Resolution)]]]]]) + ["#." dependency {"+" [Dependency]} + ["#/." resolution {"+" [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 59908a364..7d7e613fe 100644 --- a/stdlib/source/test/aedifex/command/clean.lux +++ b/stdlib/source/test/aedifex/command/clean.lux @@ -1,27 +1,27 @@ (.module: [library - [lux #* - ["_" test (#+ Test)] + [lux "*" + ["_" test {"+" [Test]}] [abstract - ["." monad (#+ do)]] + ["." monad {"+" [do]}]] [control - ["." try (#+ Try)] + ["." try {"+" [Try]}] [concurrency - ["." async (#+ Async)]]] + ["." async {"+" [Async]}]]] [data - [binary (#+ Binary)] + [binary {"+" [Binary]}] ["." product] ["." text ("#\." equivalence) - ["%" format (#+ format)]] + ["%" format {"+" [format]}]] [collection ["." list ("#\." functor)] ["." set]]] [math - ["." random (#+ Random)] + ["." random {"+" [Random]}] [number ["n" nat]]] [world - ["." file (#+ Path)]]]] + ["." file {"+" [Path]}]]]] [// ["@." version] [// @@ -32,9 +32,9 @@ ["$." binary]]]]]] [\\program ["." / - ["//#" /// #_ + ["//#" /// "_" ["#" profile] - ["#." action (#+ Action)]]]]) + ["#." action {"+" [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 b36998b6f..77af48126 100644 --- a/stdlib/source/test/aedifex/command/deploy.lux +++ b/stdlib/source/test/aedifex/command/deploy.lux @@ -1,23 +1,23 @@ (.module: [library - [lux #* - ["_" test (#+ Test)] + [lux "*" + ["_" test {"+" [Test]}] [abstract - [monad (#+ do)]] + [monad {"+" [do]}]] [control ["." maybe] - ["." try (#+ Try)] + ["." try {"+" [Try]}] [concurrency - ["." async (#+ Async)]] + ["." async {"+" [Async]}]] [parser ["." environment]]] [data ["." binary ("#\." equivalence)] ["." text ("#\." equivalence) - ["%" format (#+ format)] + ["%" format {"+" [format]}] [encoding ["." utf8]]] - ["." format #_ + ["." format "_" ["#" binary] ["." tar] ["." xml]] @@ -27,7 +27,7 @@ ["." random]] [world ["." file] - ["." program (#+ Program)]]]] + ["." program {"+" [Program]}]]]] [program [compositor ["." export]]] @@ -39,14 +39,14 @@ ["$." repository]]] [\\program ["." / - ["//#" /// #_ + ["//#" /// "_" ["#" profile] ["#." action] ["#." pom] ["#." hash] - ["#." repository (#+ Repository) + ["#." repository {"+" [Repository]} ["#/." remote]] - ["#." artifact (#+ Artifact) + ["#." artifact {"+" [Artifact]} ["#/." extension]]]]]) (def: (execute! program repository fs artifact profile) diff --git a/stdlib/source/test/aedifex/command/deps.lux b/stdlib/source/test/aedifex/command/deps.lux index 95f757f7d..3047ccb2b 100644 --- a/stdlib/source/test/aedifex/command/deps.lux +++ b/stdlib/source/test/aedifex/command/deps.lux @@ -1,9 +1,9 @@ (.module: [library - [lux #* - ["_" test (#+ Test)] + [lux "*" + ["_" test {"+" [Test]}] [abstract - [monad (#+ do)] + [monad {"+" [do]}] ["." predicate]] [control ["." try] @@ -13,7 +13,7 @@ ["." environment]]] [data ["." text ("#\." equivalence) - ["%" format (#+ format)] + ["%" format {"+" [format]}] [encoding ["." utf8]]] [collection @@ -22,22 +22,22 @@ [format ["." xml]]] [math - ["." random (#+ Random)]] + ["." random {"+" [Random]}]] [world ["." program] ["." file]]]] - ["." // #_ + ["." // "_" ["@." version] - ["$/#" // #_ + ["$/#" // "_" ["#." package] ["#." artifact] - ["#." dependency #_ + ["#." dependency "_" ["#/." resolution]]]] [\\program ["." / - ["/#" // #_ + ["/#" // "_" ["#." clean] - ["/#" // #_ + ["/#" // "_" ["#" profile] ["#." action] ["#." pom] diff --git a/stdlib/source/test/aedifex/command/install.lux b/stdlib/source/test/aedifex/command/install.lux index 93d304d36..76f8cf768 100644 --- a/stdlib/source/test/aedifex/command/install.lux +++ b/stdlib/source/test/aedifex/command/install.lux @@ -1,27 +1,27 @@ (.module: [library - [lux #* - ["_" test (#+ Test)] + [lux "*" + ["_" test {"+" [Test]}] [abstract - ["." monad (#+ do)]] + ["." monad {"+" [do]}]] [control - ["." try (#+ Try) ("#\." functor)] + ["." try {"+" [Try]} ("#\." functor)] ["." exception] [concurrency - ["." async (#+ Async)]] + ["." async {"+" [Async]}]] [parser ["." environment]]] [data ["." binary] ["." text ("#\." equivalence) - ["%" format (#+ format)]] + ["%" format {"+" [format]}]] [collection - ["." set (#+ Set)]]] + ["." set {"+" [Set]}]]] [math ["." random]] [world ["." file] - ["." program (#+ Program)]]]] + ["." program {"+" [Program]}]]]] [// ["$." version] [// @@ -29,14 +29,14 @@ ["$." artifact]]] [\\program ["." / - ["/#" // #_ - ["/#" // #_ + ["/#" // "_" + ["/#" // "_" ["#" profile] - ["#." action (#+ Action)] + ["#." action {"+" [Action]}] ["#." local] ["#." artifact ["#/." extension]] - ["#." repository #_ + ["#." repository "_" ["#/." local]]]]]]) (def: .public (make_sources! fs sources) diff --git a/stdlib/source/test/aedifex/command/pom.lux b/stdlib/source/test/aedifex/command/pom.lux index 211ce1ad5..1bac5cf69 100644 --- a/stdlib/source/test/aedifex/command/pom.lux +++ b/stdlib/source/test/aedifex/command/pom.lux @@ -1,9 +1,9 @@ (.module: [library - [lux #* - ["_" test (#+ Test)] + [lux "*" + ["_" test {"+" [Test]}] [abstract - [monad (#+ do)]] + [monad {"+" [do]}]] [control ["." try ("#\." functor)] [concurrency @@ -25,7 +25,7 @@ ["@." profile]]] [\\program ["." / - ["//#" /// #_ + ["//#" /// "_" ["#" profile] ["#." action] ["#." pom]]]]) diff --git a/stdlib/source/test/aedifex/command/test.lux b/stdlib/source/test/aedifex/command/test.lux index 3e3cf85d7..0496428a6 100644 --- a/stdlib/source/test/aedifex/command/test.lux +++ b/stdlib/source/test/aedifex/command/test.lux @@ -1,9 +1,9 @@ (.module: [library - [lux #* - ["_" test (#+ Test)] + [lux "*" + ["_" test {"+" [Test]}] [abstract - [monad (#+ do)]] + [monad {"+" [do]}]] [control ["." try] ["." exception] @@ -22,17 +22,17 @@ ["." file] ["." shell] ["." program]]]] - ["." // #_ + ["." // "_" ["@." version] ["@." build] - ["$/#" // #_ + ["$/#" // "_" ["#." package]]] [\\program ["." / - ["/#" // #_ + ["/#" // "_" ["#." build] - ["/#" // #_ - ["#" profile (#+ Profile)] + ["/#" // "_" + ["#" profile {"+" [Profile]}] ["#." action] ["#." artifact ["#/." type]] diff --git a/stdlib/source/test/aedifex/command/version.lux b/stdlib/source/test/aedifex/command/version.lux index c1ab3814e..74223d02f 100644 --- a/stdlib/source/test/aedifex/command/version.lux +++ b/stdlib/source/test/aedifex/command/version.lux @@ -1,28 +1,28 @@ (.module: [library - [lux #* - ["_" test (#+ Test)] + [lux "*" + ["_" test {"+" [Test]}] [abstract - [monad (#+ do)]] + [monad {"+" [do]}]] [control ["." maybe] ["." try] - ["." exception (#+ exception:)] + ["." exception {"+" [exception:]}] [concurrency - ["." async (#+ Async)]]] + ["." async {"+" [Async]}]]] [data ["." text ("#\." equivalence) - ["%" format (#+ format)]]] + ["%" format {"+" [format]}]]] [math ["." random]] [tool [compiler ["." version] - ["." language #_ - ["#/." lux #_ + ["." language "_" + ["#/." lux "_" ["#" version]]]]] [world - ["." console (#+ Console Mock)]]]] + ["." console {"+" [Console Mock]}]]]] [/// ["@." profile]] [\\program -- cgit v1.2.3