On Sat, Jul 25, 2009 at 01:10:02PM +0200, Bernhard Lehnert wrote:
> let a = 0
> onActivateLeaf menuAddOne $ do
> let a = a+1
> print a
If you want variables in the impure sense, use IORefs.
import Data.IORef
...
a <- newIORef 0
onActivateLeaf menuAddOne $ do
modifyIORef a (+1)
print a
--
Felipe.