Have main function in each test module

test/ArtDecoCard.purs

@@ -96,6 +96,6 @@ testArtDecoCards = do
       })
   }
 
-testArtDecoCard :: Effect Unit
-testArtDecoCard = do
+main :: Effect Unit
+main = do
   testArtDecoCards

test/JobsUnifiedTopCard.purs

@@ -18,8 +18,8 @@ import Node.JsDom (jsDomFromFile)
 import Partial.Unsafe (unsafePartial)
 import Test.Assert (assert, assertEqual)
 
-testJobsUnifiedTopCard :: Effect Unit
-testJobsUnifiedTopCard = do
+main :: Effect Unit
+main = do
   dom <- jsDomFromFile "test/examples/job_offer.html"
 
   wep <- runQuery $ PageJO.query dom

test/Main.purs

@@ -3,12 +3,12 @@ module Test.Main where
 import Prelude
 
 import Effect (Effect)
-import Test.ArtDecoCard (testArtDecoCard)
-import Test.JobsUnifiedTopCard (testJobsUnifiedTopCard)
-import Test.UIStringParser (testUIStringParser)
+import Test.ArtDecoCard as ArtDecoCard
+import Test.JobsUnifiedTopCard as JobsUnifiedTopCard
+import Test.UIStringParser as UIStringParser
 
 main :: Effect Unit
 main = do
-  testArtDecoCard
-  testJobsUnifiedTopCard
-  testUIStringParser
+  ArtDecoCard.main
+  JobsUnifiedTopCard.main
+  UIStringParser.main

test/UIStringParser.purs

@@ -1,5 +1,5 @@
 module Test.UIStringParser
-  ( testUIStringParser
+  ( main
   )
   where
 
@@ -89,8 +89,8 @@ testUIParserDotSeparated = do
     expected: Right(UIStringDotSeparated (UIStringPlain "") (UIStringPlain "Boulogne-Billancourt, Île-de-France, France"))
   }
 
-testUIStringParser :: Effect Unit
-testUIStringParser = do
+main :: Effect Unit
+main = do
   testMonthYearParser
   testTimeSpanParser
   testDurationParser