From 93eb82e1bf6d2f2a6b3b0adb85f4ab93cbb766a9 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Mon, 14 Mar 2022 03:33:01 -0400
Subject: De-sigil-ification: @

---
 stdlib/source/specification/compositor/common.lux | 44 +++++++++++------------
 1 file changed, 22 insertions(+), 22 deletions(-)

(limited to 'stdlib/source/specification/compositor/common.lux')

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)])))))
-- 
cgit v1.2.3