From 35c0807799717cd720ab28b35851c1a01a67445d Mon Sep 17 00:00:00 2001 From: Eduardo Julian Date: Tue, 7 Sep 2021 22:50:21 -0400 Subject: De-taggification | part 4 --- stdlib/source/specification/compositor.lux | 30 +++++++++++++++--------------- 1 file changed, 15 insertions(+), 15 deletions(-) (limited to 'stdlib/source/specification/compositor.lux') diff --git a/stdlib/source/specification/compositor.lux b/stdlib/source/specification/compositor.lux index d8d1a718c..a2569f334 100644 --- a/stdlib/source/specification/compositor.lux +++ b/stdlib/source/specification/compositor.lux @@ -4,30 +4,30 @@ [abstract [monad {"+" [do]}]] [control - ["." io {"+" [IO]}] - ["." try]] + ["[0]" io {"+" [IO]}] + ["[0]" try]] [math ["r" random]] [tool [compiler - ["." analysis] - ["." directive] + ["[0]" analysis] + ["[0]" directive] [phase [macro {"+" [Expander]}] [generation {"+" [Bundle]}]] [default [platform {"+" [Platform]}]]]]] - ["." / "_" - ["#." common {"+" [Runner Definer]}] - ["#./" analysis "_" - ["#." type]] - ["#./" generation "_" - ["#." primitive] - ["#." structure] - ["#." reference] - ["#." case] - ["#." function] - ["#." common]]]) + ["[0]" / "_" + ["[1][0]" common {"+" [Runner Definer]}] + ["[1]./" analysis "_" + ["[1][0]" type]] + ["[1]./" generation "_" + ["[1][0]" primitive] + ["[1][0]" structure] + ["[1][0]" reference] + ["[1][0]" case] + ["[1][0]" function] + ["[1][0]" common]]]) (def: (test runner definer state expander) (-> Runner Definer analysis.State+ Expander Test) -- cgit v1.2.3