[project @ 2003-07-29 12:03:13 by ross]

[ghc-base.git] / Data / Array.hs

diff --git a/Data/Array.hs b/Data/Array.hs
index 499f791..0dd1b23 100644 (file)
--- a/Data/Array.hs
+++ b/Data/Array.hs
@@ -44,10 +44,9 @@ module  Data.Array
 
     ) where
 
-import Data.Dynamic
+import Data.Ix
 
 #ifdef __GLASGOW_HASKELL__
-import Data.Ix
 import GHC.Arr         -- Most of the hard work is done here
 import GHC.Err         ( undefined )
 #endif
@@ -56,5 +55,15 @@ import GHC.Err               ( undefined )
 import Hugs.Array
 #endif
 
-#include "Dynamic.h"
+#ifdef __NHC__
+import Array           -- Haskell'98 arrays
+#endif
+
+#ifndef __NHC__
+import Data.Typeable
+#endif
+
+#ifndef __NHC__
+#include "Typeable.h"
 INSTANCE_TYPEABLE2(Array,arrayTc,"Array")
+#endif