X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=GHC%2FBase.lhs;h=c590366b6829914b6139b3d99df8d902324cd431;hb=2e317d707ce3512be60ada74a22119cd0a054ca1;hp=5522e234b67fccfff017c04cd3858af9c5c3a303;hpb=6c25383bd6a481e195fef5ac19523c13bd8a1da8;p=haskell-directory.git diff --git a/GHC/Base.lhs b/GHC/Base.lhs index 5522e23..c590366 100644 --- a/GHC/Base.lhs +++ b/GHC/Base.lhs @@ -496,15 +496,6 @@ otherwise :: Bool otherwise = True \end{code} -\begin{code} -class IsString a where - fromString :: String -> a - -instance IsString [Char] where - fromString xs = xs -\end{code} - - %********************************************************* %* * \subsection{The @()@ type}