More interestingly, the problem goes away if I enable profiling. That&#39;s kind of worrisome.<div><br></div><div>  - Clark<br><br>On Monday, April 22, 2013, Clark Gaebel  wrote:<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
Hi everyone!<div><br></div><div>For some reason, this leaks thunks:</div><div><br></div><div><div>module Main where</div><div><br></div><div>import Control.Monad</div><div>import <a href="http://Control.Monad.MC" target="_blank">Control.Monad.MC</a> -- from monte-carlo</div>

<div>import Control.Monad.ST.Strict</div><div><br></div><div>go :: Int -&gt; MCT (ST s) ()</div><div>go k = replicateM_ k (return ())</div><div><br></div><div>main = print $ runST $ evalMCT (go 100000000) rng</div><div>    where</div>

<div>        rng = mt19937 0</div></div><div><br></div><div>while this does not:</div><div><br></div><div><div>module Main where</div><div><br></div><div>import Control.Monad</div><div>import <a href="http://Control.Monad.MC" target="_blank">Control.Monad.MC</a></div>

<div><br></div><div>go :: Int -&gt; MC ()</div><div>go k = replicateM_ k (return ())</div><div><br></div><div>main = print $ evalMC (go 100000000) rng</div><div>    where</div><div>        rng = mt19937 0</div></div><div>

<br></div><div>Can anyone help me figure out what&#39;s going on here?</div><div><br></div><div>Thanks,</div><div>  - Clark</div>
</blockquote></div>