path: root/testsuite/tests/profiling/should_run/2592.hs

main = let xs = [1..] in print (length (xs ++ xs))