From: dons Date: Sat, 2 Apr 2005 04:39:35 +0000 (+0000) Subject: [project @ 2005-04-02 04:39:35 by dons] X-Git-Tag: arity-anal-branch-point~12 X-Git-Url: http://git.megacz.com/?p=ghc-base.git;a=commitdiff_plain;h=c5739b9a47edd8003719fdc8c43b43947f95102f [project @ 2005-04-02 04:39:35 by dons] Typo in comment only: "Causes a the finalizers associated with a foreign pointer..." to "Causes the finalizers associated with a foreign pointer..." --- diff --git a/GHC/ForeignPtr.hs b/GHC/ForeignPtr.hs index 359333d..ee95828 100644 --- a/GHC/ForeignPtr.hs +++ b/GHC/ForeignPtr.hs @@ -237,7 +237,7 @@ castForeignPtr :: ForeignPtr a -> ForeignPtr b -- parameterised by one type into another type. castForeignPtr f = unsafeCoerce# f --- | Causes a the finalizers associated with a foreign pointer to be run +-- | Causes the finalizers associated with a foreign pointer to be run -- immediately. finalizeForeignPtr :: ForeignPtr a -> IO () finalizeForeignPtr foreignPtr = do