Better names for testing macros (plus better indentation).

1 files changed, 58 insertions, 58 deletions

diff --git a/stdlib/source/test/lux/documentation.lux b/stdlib/source/test/lux/documentation.lux
index c5b8620e4..684556ecf 100644
--- a/stdlib/source/test/lux/documentation.lux
+++ b/stdlib/source/test/lux/documentation.lux
@@ -51,70 +51,70 @@
                  (all _.and
                       (_.for [/.Definition]
                              (all _.and
-                                  (_.cover [/.default]
-                                           (case (`` (/.default (~~ (template.symbol [.._] [g!default]))))
-                                             (pattern (list definition))
-                                             (and (|> definition
-                                                      (the /.#definition)
-                                                      (text#= (template.text [g!default])))
-                                                  (|> definition
-                                                      (the /.#documentation)
-                                                      md.markdown
-                                                      (text#= "")
-                                                      not))
+                                  (_.coverage [/.default]
+                                    (case (`` (/.default (~~ (template.symbol [.._] [g!default]))))
+                                      (pattern (list definition))
+                                      (and (|> definition
+                                               (the /.#definition)
+                                               (text#= (template.text [g!default])))
+                                           (|> definition
+                                               (the /.#documentation)
+                                               md.markdown
+                                               (text#= "")
+                                               not))
 
-                                             _
-                                             false))
-                                  (_.cover [/.documentation:]
-                                           (case ..documentation:
-                                             (pattern (list documentation:))
-                                             (and (|> documentation:
-                                                      (the /.#definition)
-                                                      (text#= (template.text [/.documentation:])))
-                                                  (|> documentation:
-                                                      (the /.#documentation)
-                                                      md.markdown
-                                                      (text.contains? 'definition_description')))
+                                      _
+                                      false))
+                                  (_.coverage [/.documentation:]
+                                    (case ..documentation:
+                                      (pattern (list documentation:))
+                                      (and (|> documentation:
+                                               (the /.#definition)
+                                               (text#= (template.text [/.documentation:])))
+                                           (|> documentation:
+                                               (the /.#documentation)
+                                               md.markdown
+                                               (text.contains? 'definition_description')))
 
-                                             _
-                                             false))
+                                      _
+                                      false))
                                   ))
                       (_.for [/.Module]
                              (all _.and
-                                  (_.cover [/.module /.documentation]
-                                           (let [sub (`` (/.module /._
-                                                                   (~~ (template.text ['sub_description']))
-                                                                   []
-                                                                   []))
-                                                 super (`` (/.module .._
-                                                                     (~~ (template.text ['super_description']))
-                                                                     [..documentation:]
-                                                                     [sub]))]
-                                             (and (text.contains? (template.text ['sub_description'])
-                                                                  (/.documentation sub))
-                                                  (text.contains? (/.documentation sub)
-                                                                  (/.documentation super))
-                                                  (text.contains? (template.text ['super_description'])
-                                                                  (/.documentation super))
-                                                  (case ..documentation:
-                                                    (pattern (list documentation:))
-                                                    (text.contains? (md.markdown (the /.#documentation documentation:))
-                                                                    (/.documentation super))
+                                  (_.coverage [/.module /.documentation]
+                                    (let [sub (`` (/.module /._
+                                                            (~~ (template.text ['sub_description']))
+                                                            []
+                                                            []))
+                                          super (`` (/.module .._
+                                                              (~~ (template.text ['super_description']))
+                                                              [..documentation:]
+                                                              [sub]))]
+                                      (and (text.contains? (template.text ['sub_description'])
+                                                           (/.documentation sub))
+                                           (text.contains? (/.documentation sub)
+                                                           (/.documentation super))
+                                           (text.contains? (template.text ['super_description'])
+                                                           (/.documentation super))
+                                           (case ..documentation:
+                                             (pattern (list documentation:))
+                                             (text.contains? (md.markdown (the /.#documentation documentation:))
+                                                             (/.documentation super))
 
-                                                    _
-                                                    false))))
+                                             _
+                                             false))))
                                   ))
-                      (_.cover [/.unqualified_symbol]
-                               (`` (and (~~ (template [<example>]
-                                              [(macro_error <example>)]
-                                              
-                                              [(/.default g!default)]
-                                              [(/.documentation: g!default
-                                                 (~~ (template.text ['definition_description'])))]
-                                              [(/.module g!default
-                                                         ""
-                                                         [..documentation:]
-                                                         [sub])]
-                                              )))))
+                      (_.coverage [/.unqualified_symbol]
+                        (`` (and (~~ (template [<example>]
+                                       [(macro_error <example>)]
+                                       
+                                       [(/.default g!default)]
+                                       [(/.documentation: g!default
+                                          (~~ (template.text ['definition_description'])))]
+                                       [(/.module g!default
+                                                  ""
+                                                  [..documentation:]
+                                                  [sub])]
+                                       )))))
                       )))))
   )