Add test for grep

psibi · Sep 22, 2018 · b106ae2 · b106ae2
1 parent f1100df
commit b106ae2
Showing 1 changed file with 6 additions and 0 deletions.
diff --git a/test/Spec.hs b/test/Spec.hs
@@ -14,6 +14,10 @@ renderPageToFile :: FilePath -> FilePath -> IO ()
 renderPageToFile mdfile opfile = do
   withBinaryFile opfile WriteMode (\handle -> renderPage mdfile handle)
 
+-- For adding new command, you need to add:
+-- A new ".md" file for that command
+-- A new ".golden" file for the expected output
+
 commandTest :: String -> TestTree
 commandTest str = goldenVsFile (str <> " test") (golden str) (output str) (renderPageToFile (md str) (output str))
     where
@@ -26,6 +30,8 @@ gtests :: TestTree
 gtests = testGroup "(render test)" 
          [
           commandTest "ls"
+         , commandTest "ps"
+         , commandTest "grep"
          ]
 
 main :: IO ()