Better text formatting for types.

1 files changed, 53 insertions, 55 deletions

diff --git a/stdlib/source/program/compositor.lux b/stdlib/source/program/compositor.lux
index 2b6850cf8..1b7e161d1 100644
--- a/stdlib/source/program/compositor.lux
+++ b/stdlib/source/program/compositor.lux
@@ -1,59 +1,57 @@
 (.using
-  [library
-   [lux {"-" Module}
-    [type {"+" :sharing}]
-    ["@" target]
-    ["[0]" debug]
-    [abstract
-     ["[0]" monad {"+" do}]]
-    [control
-     ["[0]" io {"+" IO io}]
-     ["[0]" try {"+" Try}]
-     [concurrency
-      ["[0]" async {"+" Async} ("[1]#[0]" monad)]]]
-    [data
-     [binary {"+" Binary}]
-     ["[0]" product]
-     ["[0]" text
-      ["%" format {"+" format}]]
-     [collection
-      ["[0]" dictionary {"+" Dictionary}]]]
-    [time
-     ["[0]" instant]]
-    ["[0]" world "_"
-     ["[0]" file]
-     ["[0]" console]
-     ["[1]/[0]" program]]
-    [tool
-     [compiler
-      ["[0]" phase]
-      [default
-       ["[0]" platform {"+" Platform}]]
-      [language
-       ["$" lux
-        ["[1]/[0]" program {"+" Program}]
-        ["[0]" syntax]
-        ["[0]" analysis
-         [macro {"+" Expander}]]
-        ["[0]" generation {"+" Buffer Context}]
-        ["[0]" directive]
-        [phase
-         [extension {"+" Extender}]]]]
-      [meta
-       [packager {"+" Packager}]
-       [archive {"+" Archive}
-        [descriptor {"+" Module}]]
-       [cache
-        ["[0]" dependency]]
-       [io
-        ["ioW" archive]]]]
-     ... ["[0]" interpreter]
-     ]]]
-  ["[0]" / "_"
-   ["[1][0]" cli {"+" Service}]
-   ["[1][0]" static {"+" Static}]
-   ["[1][0]" export]
-   ["[1][0]" import]])
+ [library
+  [lux {"-" Module}
+   [type {"+" :sharing}]
+   ["@" target]
+   ["[0]" debug]
+   [abstract
+    ["[0]" monad {"+" do}]]
+   [control
+    ["[0]" io {"+" IO io}]
+    ["[0]" try {"+" Try}]
+    [concurrency
+     ["[0]" async {"+" Async} ("[1]#[0]" monad)]]]
+   [data
+    [binary {"+" Binary}]
+    ["[0]" product]
+    ["[0]" text
+     ["%" format {"+" format}]]
+    [collection
+     ["[0]" dictionary {"+" Dictionary}]]]
+   [time
+    ["[0]" instant]]
+   ["[0]" world "_"
+    ["[0]" file]
+    ["[0]" console]
+    ["[1]/[0]" program]]
+   [tool
+    [compiler
+     ["[0]" phase]
+     [default
+      ["[0]" platform {"+" Platform}]]
+     [language
+      ["$" lux
+       ["[1]/[0]" program {"+" Program}]
+       ["[0]" syntax]
+       ["[0]" generation {"+" Buffer Context}]
+       ["[0]" directive]
+       ["[0]" analysis
+        [macro {"+" Expander}]]
+       [phase
+        [extension {"+" Extender}]]]]
+     [meta
+      [packager {"+" Packager}]
+      [archive {"+" Archive}
+       [descriptor {"+" Module}]]
+      [io
+       ["ioW" archive]]]]
+    ... ["[0]" interpreter]
+    ]]]
+ ["[0]" / "_"
+  ["[1][0]" cli {"+" Service}]
+  ["[1][0]" static {"+" Static}]
+  ["[1][0]" export]
+  ["[1][0]" import]])
 
 (def: (or_crash! failure_description action)
   (All (_ a)