Removing output from test

This commit is contained in:
Freezeboy 2015-07-28 01:27:20 +02:00
parent 17ca343b45
commit b085e63aa7

View file

@ -148,7 +148,7 @@ generateJSSpec n gen = describe specLabel $ do
parseFromString jsStr `shouldSatisfy` isRight
where
specLabel = "generateJS(" ++ (show n) ++ ")"
output = putStrLn
output _ = return ()
genJS req = gen req
header :: TestNames -> String -> String -> String
header v headerName headerValue