blob: 46fdad6dab5e0e6614ba5c447c242809dac71bd7 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
|
import Debug.Trace
main :: IO ()
main = do
putStrLn $ trace "one" "two"
putStrLn $ traceShow (3 :: Int) "four"
putStrLn $ traceId "five"
print $ traceShowId (6 :: Int)
putStrLn $ traceWith (take 3) "seven"
putStrLn $ traceShowWith length "eight"
traceIO "nine"
traceM "ten"
|
