16 Feb
2001
16 Feb
'01
6:27 p.m.
Fri, 16 Feb 2001 10:01:06 -0800, Levent Erkok <erkok@cse.ogi.edu> pisze:
The non-strict version is not good either, because it won't do the effects!
data Box a = Box {unbox :: a} fixIO m = let x = unsafePerformIO (liftM Box (m (unbox x))) in return (unbox $! x) -- __("< Marcin Kowalczyk * qrczak@knm.org.pl http://qrczak.ids.net.pl/ \__/ ^^ SYGNATURA ZASTÊPCZA QRCZAK