From 04c7f49a732380a2b9f72b1b937171b341c24323 Mon Sep 17 00:00:00 2001
From: Eduardo Julian
Date: Sat, 9 Apr 2022 03:03:46 -0400
Subject: Better names for testing macros (plus better indentation).

---
 stdlib/source/test/aedifex/parser.lux | 40 +++++++++++++++++------------------
 1 file changed, 20 insertions(+), 20 deletions(-)

(limited to 'stdlib/source/test/aedifex/parser.lux')

diff --git a/stdlib/source/test/aedifex/parser.lux b/stdlib/source/test/aedifex/parser.lux
index a87131927..c63d1701c 100644
--- a/stdlib/source/test/aedifex/parser.lux
+++ b/stdlib/source/test/aedifex/parser.lux
@@ -78,23 +78,23 @@
       (_.covering //format._)
       (do random.monad
         [expected ..random]
-        (_.cover [/.project
-                  //format.Format //format.project]
-                 (|> expected
-                     //format.project
-                     list
-                     (<code>.result /.project)
-                     (pipe.case
-                       {try.#Success actual}
-                       (|> expected
-                           ..with_empty_profile
-                           dictionary.entries
-                           (list#each (function (_ [name profile])
-                                        [name (|> profile
-                                                  ..with_default_sources
-                                                  ..with_default_repository)]))
-                           (dictionary.of_list text.hash)
-                           (# //project.equivalence = actual))
-                       
-                       {try.#Failure error}
-                       false))))))
+        (_.coverage [/.project
+                     //format.Format //format.project]
+          (|> expected
+              //format.project
+              list
+              (<code>.result /.project)
+              (pipe.case
+                {try.#Success actual}
+                (|> expected
+                    ..with_empty_profile
+                    dictionary.entries
+                    (list#each (function (_ [name profile])
+                                 [name (|> profile
+                                           ..with_default_sources
+                                           ..with_default_repository)]))
+                    (dictionary.of_list text.hash)
+                    (# //project.equivalence = actual))
+                
+                {try.#Failure error}
+                false))))))
-- 
cgit v1.2.3