diff options
Diffstat (limited to 'stdlib/source/specification/compositor/common.lux')
| -rw-r--r-- | stdlib/source/specification/compositor/common.lux | 44 |
1 files changed, 22 insertions, 22 deletions
diff --git a/stdlib/source/specification/compositor/common.lux b/stdlib/source/specification/compositor/common.lux index d9a7e1e24..f97ca894e 100644 --- a/stdlib/source/specification/compositor/common.lux +++ b/stdlib/source/specification/compositor/common.lux @@ -1,23 +1,23 @@ (.using - [lux "*" - [abstract - [monad {"+" do}]] - [control - ["[0]" io {"+" IO}] - ["[0]" try {"+" Try}]] - [tool - [compiler - ["[0]" reference] - ["[0]" analysis] - ["[0]" synthesis {"+" Synthesis}] - ["[0]" directive] - ["[0]" phase - ["[0]" macro {"+" Expander}] - ["[0]" generation {"+" Operation}] - [extension {"+" Extender} - ["[0]" bundle]]] - [default - ["[0]" platform {"+" Platform}]]]]]) + [lux "*" + [abstract + [monad {"+" do}]] + [control + ["[0]" io {"+" IO}] + ["[0]" try {"+" Try}]] + [tool + [compiler + ["[0]" reference] + ["[0]" analysis] + ["[0]" synthesis {"+" Synthesis}] + ["[0]" directive] + ["[0]" phase + ["[0]" macro {"+" Expander}] + ["[0]" generation {"+" Operation}] + [extension {"+" Extender} + ["[0]" bundle]]] + [default + ["[0]" platform {"+" Platform}]]]]]) (type: .public Runner (-> Text Synthesis (Try Any))) @@ -72,9 +72,9 @@ [?state (platform.initialize target expander analysis_bundle platform generation_bundle directive_bundle program extender)] (in (do try.monad [[directive_bundle directive_state] ?state - .let [generation_state (value@ [directive.#generation - directive.#state] - directive_state)]] + .let [generation_state (the [directive.#generation + directive.#state] + directive_state)]] (in [[directive_bundle directive_state] (..runner platform generation_state) (..definer platform generation_state)]))))) |