diff options
| author | Ian Lynagh <igloo@earth.li> | 2008-06-20 19:30:03 +0000 |
|---|---|---|
| committer | Ian Lynagh <igloo@earth.li> | 2008-06-20 19:30:03 +0000 |
| commit | e761a777f2440ca1b8d8b40848cc5aa30d889ff6 (patch) | |
| tree | b27793ee161d4c49e2aa49d0152b639512d3aa7d /compiler/utils/StringBuffer.lhs | |
| parent | d78ab147ec3d8c3b06b6e922bed4cd9837c9c797 (diff) | |
| download | haskell-e761a777f2440ca1b8d8b40848cc5aa30d889ff6.tar.gz | |
Remove code that isn't used now that we assume that GHC >= 6.4
Diffstat (limited to 'compiler/utils/StringBuffer.lhs')
| -rw-r--r-- | compiler/utils/StringBuffer.lhs | 8 |
1 files changed, 0 insertions, 8 deletions
diff --git a/compiler/utils/StringBuffer.lhs b/compiler/utils/StringBuffer.lhs index 1a30edbc5a..a89c0d2ba9 100644 --- a/compiler/utils/StringBuffer.lhs +++ b/compiler/utils/StringBuffer.lhs @@ -49,15 +49,7 @@ import System.IO ( hGetBuf, hFileSize,IOMode(ReadMode), hClose import GHC.Exts -#if !defined(__GLASGOW_HASKELL__) || __GLASGOW_HASKELL__ >= 601 import System.IO ( openBinaryFile ) -#else -import IOExts ( openFileEx, IOModeEx(..) ) -#endif - -#if defined(__GLASGOW_HASKELL__) && __GLASGOW_HASKELL__ < 601 -openBinaryFile fp mode = openFileEx fp (BinaryMode mode) -#endif -- ----------------------------------------------------------------------------- -- The StringBuffer type |