[project @ 1999-05-21 14:46:19 by sof]
authorsof <unknown>
Fri, 21 May 1999 14:46:21 +0000 (14:46 +0000)
committersof <unknown>
Fri, 21 May 1999 14:46:21 +0000 (14:46 +0000)
commit263aaaa57bf5564d06de6a87ebccb980b1b5d285
tree2589b5d52d7c03d4f4bd1aa5bb4963adff7eebd2
parent472e4418fa0fe51627a51d15e040bd6cfa17ef62
[project @ 1999-05-21 14:46:19 by sof]
Made rts_evalIO() stricter, i.e.,

   rts_evalIO( action );

will now essentially cause `action' to be applied
to the following (imaginary) defn of `evalIO':

    evalIO :: IO a -> IO a
    evalIO action = action >>= \ x -> x `seq` return x

instead of just

    evalIO :: IO a -> IO a
    evalIO action = action >>= \ x -> return x

The old, lazier behaviour is now available via rts_evalLazyIO().
ghc/includes/RtsAPI.h
ghc/includes/SchedAPI.h
ghc/includes/StgMiscClosures.h
ghc/rts/RtsAPI.c
ghc/rts/StgMiscClosures.hc