From fdfd7036806fe62ffaf054b61fbf16bbfb002b7c Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Wed, 11 Jul 2018 19:47:40 -0400
Subject: - Improvements to import syntax [part 2].

---
 stdlib/source/lux/data/format/json.lux | 41 ++++++++++++++++++----------------
 1 file changed, 22 insertions(+), 19 deletions(-)

(limited to 'stdlib/source/lux/data/format/json.lux')

diff --git a/stdlib/source/lux/data/format/json.lux b/stdlib/source/lux/data/format/json.lux
index cd7b82be0..0316b5a9b 100644
--- a/stdlib/source/lux/data/format/json.lux
+++ b/stdlib/source/lux/data/format/json.lux
@@ -1,25 +1,28 @@
 (.module: {#.doc "Functionality for reading and writing values in the JSON format.
 
                   For more information, please see: http://www.json.org/"}
-  [lux (#- Array)]
-  (lux (control [monad (#+ do Monad)]
-                [equivalence (#+ Equivalence)]
-                codec
-                ["p" parser ("parser/" Monad<Parser>)])
-       (data [bool]
-             [text ("text/" Equivalence<Text> Monoid<Text>)]
-             (text ["l" lexer])
-             [number ("frac/" Codec<Text,Frac>) ("nat/" Codec<Text,Nat>)]
-             [maybe]
-             ["e" error]
-             [sum]
-             [product]
-             (collection [list ("list/" Fold<List> Monad<List>)]
-                         [row (#+ Row row) ("row/" Monad<Row>)]
-                         ["dict" dictionary (#+ Dictionary)]))
-       [macro (#+ Monad<Meta> with-gensyms)]
-       (macro ["s" syntax (#+ syntax:)]
-              [code])))
+  [lux (#- Array)
+   [control
+    [monad (#+ do Monad)]
+    [equivalence (#+ Equivalence)]
+    codec
+    ["p" parser ("parser/" Monad<Parser>)]]
+   [data
+    [bool]
+    [text ("text/" Equivalence<Text> Monoid<Text>)
+     ["l" lexer]]
+    [number ("frac/" Codec<Text,Frac>) ("nat/" Codec<Text,Nat>)]
+    [maybe]
+    ["e" error]
+    [sum]
+    [product]
+    [collection
+     [list ("list/" Fold<List> Monad<List>)]
+     [row (#+ Row row) ("row/" Monad<Row>)]
+     ["dict" dictionary (#+ Dictionary)]]]
+   [macro (#+ Monad<Meta> with-gensyms)
+    ["s" syntax (#+ syntax:)]
+    [code]]])
 
 (do-template [<name> <type>]
   [(type: #export <name> <type>)]
-- 
cgit v1.2.3