From: Isaac Dupree Date: Mon, 6 Aug 2007 21:19:14 +0000 (+0000) Subject: comment FastMutInt possibilities X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=commitdiff_plain;h=d27302b92d741ae119bdf3cd52ba9dae251b6cf4 comment FastMutInt possibilities --- diff --git a/compiler/utils/FastMutInt.lhs b/compiler/utils/FastMutInt.lhs index bdcf502..90b4b9e 100644 --- a/compiler/utils/FastMutInt.lhs +++ b/compiler/utils/FastMutInt.lhs @@ -50,6 +50,10 @@ writeFastMutInt (FastMutInt arr) (I# i) = IO $ \s -> case writeIntArray# arr 0# i s of { s -> (# s, () #) } #else /* ! __GLASGOW_HASKELL__ */ +--maybe someday we could use +--http://haskell.org/haskellwiki/Library/ArrayRef +--which has an implementation of IOURefs +--that is unboxed in GHC and just strict in all other compilers... newtype FastMutInt = FastMutInt (IORef Int) -- If any default value was chosen, it surely would be 0,