formatting

This commit is contained in:
Keagan McClelland
2021-09-23 14:53:47 -06:00
parent 8c00f709ed
commit 9f0056a1ab

View File

@@ -242,7 +242,7 @@ time label m = do
start <- liftIO getCurrentTime
res <- m
end <- liftIO getCurrentTime
putStrLn $ label <> show (diffUTCTime end start)
putStrLn $ label <> ": " <> show (diffUTCTime end start)
pure res