X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;ds=sidebyside;f=docs%2Fusers_guide%2Fprofiling.xml;fp=docs%2Fusers_guide%2Fprofiling.xml;h=f0d96ba98b952acf5148d8475972f5e4e45b5823;hb=0c12697ef809ab47dd10b6e292fe42140af72c3f;hp=51ae6f71c381e55e1a35100f92201351d2a5f34e;hpb=6790af558efad6467b9ec0fc40f7a2e43d437fc7;p=ghc-hetmet.git
diff --git a/docs/users_guide/profiling.xml b/docs/users_guide/profiling.xml
index 51ae6f7..f0d96ba 100644
--- a/docs/users_guide/profiling.xml
+++ b/docs/users_guide/profiling.xml
@@ -266,6 +266,22 @@ MAIN MAIN 0 0.0 0.0 100.0 100.0
far to the right as possible when parsing. (SCC stands for "Set
Cost Centre").
+ Here is an example of a program with a couple of SCCs:
+
+
+main :: IO ()
+main = do let xs = {-# SCC "X" #-} [1..1000000]
+ let ys = {-# SCC "Y" #-} [1..2000000]
+ print $ last xs
+ print $ last $ init xs
+ print $ last ys
+ print $ last $ init ys
+
+
+ which gives this heap profile when run:
+
+
+