diff --git a/Data/Array.hs b/Data/Array.hs
index f9067c6fa32920b74d57f328da24560c03548612..d9b2fadd90fbc468be537b094b0146d461cb88c8 100644
--- a/Data/Array.hs
+++ b/Data/Array.hs
@@ -69,7 +69,7 @@ import Hugs.Array
 
 #ifdef __NHC__
 import Array		-- Haskell'98 arrays
-#endif
+#else
 
 import Control.Applicative
 import Data.Foldable
@@ -95,3 +95,4 @@ instance Ix i => Foldable (Array i) where
 instance Ix i => Traversable (Array i) where
     traverse f arr = listArray (bounds arr) <$> traverse f (elems arr)
 
+#endif
diff --git a/Makefile.nhc98 b/Makefile.nhc98
new file mode 100644
index 0000000000000000000000000000000000000000..1031fc74e2337e377c499d720655a5789dc80971
--- /dev/null
+++ b/Makefile.nhc98
@@ -0,0 +1,20 @@
+THISPKG	= array
+SEARCH	=
+EXTRA_H_FLAGS   =
+EXTRA_HBC_FLAGS =
+
+DIRS	= \
+	Data Data/Array
+
+SRCS	= \
+	Data/Array.hs
+
+# Here are the main rules.
+include ../Makefile.common
+
+# some extra rules
+
+# Here are any extra dependencies.
+
+# C-files dependencies.
+