Better names for testing macros (plus better indentation).

1 files changed, 38 insertions, 38 deletions

diff --git a/stdlib/source/test/lux/type/primitive.lux b/stdlib/source/test/lux/type/primitive.lux
index 5b4a3fe06..f438abcb2 100644
--- a/stdlib/source/test/lux/type/primitive.lux
+++ b/stdlib/source/test/lux/type/primitive.lux
@@ -60,45 +60,45 @@
                        [expected_foo (random.lower_case 5)
                         expected_bar random.nat]
                        (all _.and
-                            (_.cover [/.abstraction]
-                                     (and (exec (is (g!Foo Text)
-                                                    (/.abstraction g!Foo expected_foo))
-                                            true)
-                                          (exec (is (g!Bar Text)
-                                                    (/.abstraction expected_bar))
-                                            true)))
-                            (_.cover [/.representation]
-                                     (and (|> expected_foo
-                                              (/.abstraction g!Foo)
-                                              (is (g!Foo Bit))
-                                              (/.representation g!Foo)
-                                              (text#= expected_foo))
-                                          (|> (/.abstraction expected_bar)
-                                              (is (g!Bar Bit))
-                                              /.representation
-                                              (n.= expected_bar))))
-                            (_.cover [/.transmutation]
-                                     (and (exec (|> expected_foo
-                                                    (/.abstraction g!Foo)
-                                                    (is (g!Foo .Macro))
-                                                    (/.transmutation g!Foo)
-                                                    (is (g!Foo .Lux)))
-                                            true)
-                                          (exec (|> (/.abstraction expected_bar)
-                                                    (is (g!Bar .Macro))
-                                                    /.transmutation
-                                                    (is (g!Bar .Lux)))
-                                            true)))
+                            (_.coverage [/.abstraction]
+                              (and (exec (is (g!Foo Text)
+                                             (/.abstraction g!Foo expected_foo))
+                                     true)
+                                   (exec (is (g!Bar Text)
+                                             (/.abstraction expected_bar))
+                                     true)))
+                            (_.coverage [/.representation]
+                              (and (|> expected_foo
+                                       (/.abstraction g!Foo)
+                                       (is (g!Foo Bit))
+                                       (/.representation g!Foo)
+                                       (text#= expected_foo))
+                                   (|> (/.abstraction expected_bar)
+                                       (is (g!Bar Bit))
+                                       /.representation
+                                       (n.= expected_bar))))
+                            (_.coverage [/.transmutation]
+                              (and (exec (|> expected_foo
+                                             (/.abstraction g!Foo)
+                                             (is (g!Foo .Macro))
+                                             (/.transmutation g!Foo)
+                                             (is (g!Foo .Lux)))
+                                     true)
+                                   (exec (|> (/.abstraction expected_bar)
+                                             (is (g!Bar .Macro))
+                                             /.transmutation
+                                             (is (g!Bar .Lux)))
+                                     true)))
                             (_.for [/.Frame]
                                    (all _.and
-                                        (_.cover [/.current]
-                                                 (text#= (template.text [g!Bar])
-                                                         (..current)))
-                                        (_.cover [/.specific]
-                                                 (text#= (template.text [g!Foo])
-                                                         (..specific)))
-                                        (_.cover [/.no_active_frames]
-                                                 (and no_current!
-                                                      no_specific!))
+                                        (_.coverage [/.current]
+                                          (text#= (template.text [g!Bar])
+                                                  (..current)))
+                                        (_.coverage [/.specific]
+                                          (text#= (template.text [g!Foo])
+                                                  (..specific)))
+                                        (_.coverage [/.no_active_frames]
+                                          (and no_current!
+                                               no_specific!))
                                         ))
                             )))))))))