Skip to content

Instantly share code, notes, and snippets.

@alpmestan

alpmestan/build Secret

Created July 30, 2019 10:49
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save alpmestan/66b32f20622160c74f4d4ffd24d518d8 to your computer and use it in GitHub Desktop.
Save alpmestan/66b32f20622160c74f4d4ffd24d518d8 to your computer and use it in GitHub Desktop.
ghc -fforce-recomp -ddump-simpl -prof -fprof-auto -O0 -o sm sm.hs
{-# LANGUAGE ScopedTypeVariables #-}
main :: IO ()
main = print $ g [1..10000000] a
where g xs x = map (`mod` x) xs
a :: Int = 324
Tue Jul 30 12:47 2019 Time and Allocation Profiling Report (Final)
sm +RTS -p -RTS
total time = 3.63 secs (3631 ticks @ 1000 us, 1 processor)
total alloc = 1,133,248,616 bytes (excludes profiling overheads)
COST CENTRE MODULE SRC %time %alloc
main Main sm.hs:(3,1)-(6,22) 70.4 73.2
main.g Main sm.hs:5:9-35 29.6 26.8
individual inherited
COST CENTRE MODULE SRC no. entries %time %alloc %time %alloc
MAIN MAIN <built-in> 116 0 0.0 0.0 100.0 100.0
CAF Main <entire-module> 231 0 0.0 0.0 64.4 99.7
main Main sm.hs:(3,1)-(6,22) 232 1 34.8 72.8 64.4 99.7
main.(...) Main sm.hs:6:9-22 236 1 0.0 0.0 0.0 0.0
main.a Main sm.hs:6:9-22 235 1 0.0 0.0 0.0 0.0
main.g Main sm.hs:5:9-35 234 1 29.6 26.8 29.6 26.8
CAF GHC.Conc.Signal <entire-module> 226 0 0.0 0.0 0.0 0.0
CAF GHC.IO.Encoding <entire-module> 216 0 0.0 0.0 0.0 0.0
CAF GHC.IO.Encoding.Iconv <entire-module> 214 0 0.0 0.0 0.0 0.0
CAF GHC.IO.Exception <entire-module> 208 0 0.0 0.0 0.0 0.0
CAF GHC.IO.Handle.FD <entire-module> 206 0 0.0 0.0 0.0 0.0
CAF GHC.TopHandler <entire-module> 186 0 0.0 0.0 0.0 0.0
main Main sm.hs:(3,1)-(6,22) 233 0 35.6 0.3 35.6 0.3
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment