add GHC.HetMet.{hetmet_kappa,hetmet_kappa_app}

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

diff --git a/Data/String.hs b/Data/String.hs
index c2dc17e..ac1e416 100644 (file)
--- a/Data/String.hs
+++ b/Data/String.hs
@@ -1,4 +1,5 @@
-{-# OPTIONS_GHC -XNoImplicitPrelude #-}
+{-# LANGUAGE CPP, NoImplicitPrelude, FlexibleInstances #-}
+
 -----------------------------------------------------------------------------
 -- |
 -- Module      :  Data.String
@@ -35,6 +36,7 @@ import Data.List (lines, words, unlines, unwords)
 class IsString a where
     fromString :: String -> a
 
+#ifndef __NHC__
 instance IsString [Char] where
     fromString xs = xs
-
+#endif