X-Git-Url: https://git.njae.me.uk/?a=blobdiff_plain;f=src%2Ftask5%2Ftask5.hs;h=909b4268f9f448690d0232486e631a239aaa2fe7;hb=8df06839ba3dc64b556e964e5e04d65c0a01cf8e;hp=3140b3763a85b15ac9b11cf161987a525fd01369;hpb=5fcd6565317ea77d297bf3c6a349754f9bbd94cf;p=summerofcode2018soln.git diff --git a/src/task5/task5.hs b/src/task5/task5.hs index 3140b37..909b426 100644 --- a/src/task5/task5.hs +++ b/src/task5/task5.hs @@ -13,6 +13,7 @@ main = do let expanded = expand uncommented print $ countNonSpace uncommented print $ countNonSpace expanded + -- TIO.writeFile "data/05-output.ppm" expanded countNonSpace :: Text -> Int