[project @ 2003-11-26 09:55:22 by simonmar]

[haskell-directory.git] / Data / Array / IO / Internals.hs

diff --git a/Data/Array/IO/Internals.hs b/Data/Array/IO/Internals.hs
index 5d81eab..0f6d94e 100644 (file)
--- a/Data/Array/IO/Internals.hs
+++ b/Data/Array/IO/Internals.hs
@@ -25,7 +25,7 @@ import Prelude
 import Data.Array.MArray
 import Data.Int
 import Data.Word
-import Data.Dynamic
+import Data.Typeable
 
 #ifdef __HUGS__
 import Hugs.IOArray
@@ -304,3 +304,4 @@ castIOUArray :: IOUArray ix a -> IO (IOUArray ix b)
 castIOUArray (IOUArray marr) = stToIO $ do
     marr' <- castSTUArray marr
     return (IOUArray marr')
+