A memory leak means that a program allocates more memory than necessary for its execution. Although Haskell implementations use garbage collectors, programmers must still keep memory management in mind. A garbage collector can reliably prevent dangling pointers, but it is easily possible to produce memory leaks, especially in connection with lazy evaluation. Note that a leak will not only consume more and more memory but it will also slow down the garbage collector considerably! Maybe it is even the reason for the widely spread opinion that garbage collectors are slow or not suited for realtime applications.
1 Types of leaks
1.1 Holding a reference for a too long time
Consider for example:
let xs = [1..1000000::Integer] in sum xs * product xs
Since we want to avoid code duplication, we like to achieve this by turning the list definition into a function with a dummy argument.
let makeXs n = [1..n::Integer] in sum (makeXs 1000000) * product (makeXs 1000000)
1.2 Building up unevaluated expressions
Another typical cause of memory leaks are unevaluated expressions,the classical example being to sum up the numbers of a list (known as
foldl (+) 0 [1..1000000::Integer]
The problem is, that the runtime system does not know, whether the intermediate sums are actually needed at a later point, and thus it leaves them unevaluated.I.e. it stores something equivalent to
foldl' (+) 0 [1..1000000::Integer]
2 Detection of memory leaks
A memory leak can be detected by writing a test that should require only a limitted amount of memory and then run the compiled program with restricted heap size. E.g. you can restrict the heap size to 4 MB like in this example:
$ ./mytest +RTS -M4m -RTS