Bulat Ziganshin wrote:
plus a b = unsafePerformIO (modifyIORef counter (+1)) `seq` a+b

Erm... might it be better to use an MVar? (To avoid lost updates if there are multiple render threads.)

_______________________________________________
Haskell-Cafe mailing list
Haskell-Cafe@haskell.org
http://www.haskell.org/mailman/listinfo/haskell-cafe

Reply via email to