Browse Source

Clear build on GHC 7.10

Marcos Dumay de Medeiros 8 years ago
parent
commit
d65729cd93

+ 0 - 1
src/System/IO/Uniform.hs

@@ -16,7 +16,6 @@ module System.IO.Uniform (
 import Data.ByteString (ByteString)
 import Data.ByteString (ByteString)
 import qualified Data.ByteString.Lazy as LBS
 import qualified Data.ByteString.Lazy as LBS
 import Control.Exception
 import Control.Exception
-import Control.Applicative ((<$>))
 import System.IO.Error
 import System.IO.Error
 
 
 import Data.Default.Class
 import Data.Default.Class

+ 0 - 5
src/System/IO/Uniform/ByteString.hs

@@ -11,11 +11,6 @@ import Data.ByteString (ByteString)
 import qualified Data.ByteString as BS
 import qualified Data.ByteString as BS
 import qualified Data.ByteString.Lazy as LBS
 import qualified Data.ByteString.Lazy as LBS
 import qualified Data.ByteString.Builder as BSBuild
 import qualified Data.ByteString.Builder as BSBuild
---import qualified Data.List as L
---import Control.Exception
---import Control.Applicative ((<$>))
-import Data.Monoid (mappend)
---import qualified Network.Socket as Soc
 import System.IO.Error
 import System.IO.Error
 import Control.Concurrent.MVar
 import Control.Concurrent.MVar
 
 

+ 0 - 14
src/System/IO/Uniform/File.hs

@@ -7,23 +7,9 @@ import System.IO.Uniform
 import System.IO.Uniform.External
 import System.IO.Uniform.External
 
 
 import Foreign
 import Foreign
---import Foreign.C.Types
 import Foreign.C.String
 import Foreign.C.String
 import Foreign.C.Error
 import Foreign.C.Error
---import qualified Data.IP as IP
---import Data.ByteString (ByteString)
 import qualified Data.ByteString as BS
 import qualified Data.ByteString as BS
---import qualified Data.ByteString.Lazy as LBS
---import qualified Data.ByteString.Builder as BSBuild
---import qualified Data.List as L
---import Control.Exception
-import Control.Applicative ((<$>))
---import Data.Monoid (mappend)
---import qualified Network.Socket as Soc
---import System.IO.Error
---import Control.Concurrent.MVar
-
---import Data.Default.Class
 
 
 import System.Posix.Types (Fd(..))
 import System.Posix.Types (Fd(..))
 
 

+ 0 - 8
src/System/IO/Uniform/Network.hs

@@ -17,19 +17,11 @@ import Foreign.C.Types
 import Foreign.C.String
 import Foreign.C.String
 import Foreign.C.Error
 import Foreign.C.Error
 import qualified Data.IP as IP
 import qualified Data.IP as IP
---import Data.ByteString (ByteString)
 import qualified Data.ByteString as BS
 import qualified Data.ByteString as BS
---import qualified Data.ByteString.Lazy as LBS
---import qualified Data.ByteString.Builder as BSBuild
 import qualified Data.List as L
 import qualified Data.List as L
 import Control.Exception
 import Control.Exception
-import Control.Applicative ((<$>))
---import Data.Monoid (mappend)
 import qualified Network.Socket as Soc
 import qualified Network.Socket as Soc
 import System.IO.Error
 import System.IO.Error
---import Control.Concurrent.MVar
-
---import Data.Default.Class
 
 
 import System.Posix.Types (Fd(..))
 import System.Posix.Types (Fd(..))
 
 

+ 0 - 1
src/System/IO/Uniform/Streamline.hs

@@ -55,7 +55,6 @@ import System.IO.Uniform.Streamline.Scanner
 import Data.Default.Class
 import Data.Default.Class
 
 
 import Control.Monad.Trans.Class
 import Control.Monad.Trans.Class
-import Control.Applicative
 import Control.Monad (ap)
 import Control.Monad (ap)
 import Control.Monad.IO.Class
 import Control.Monad.IO.Class
 import System.IO.Error
 import System.IO.Error

+ 0 - 1
src/System/IO/Uniform/Streamline/Scanner.hs

@@ -5,7 +5,6 @@ module System.IO.Uniform.Streamline.Scanner (
   anyScanner
   anyScanner
   )where
   )where
 
 
-import Control.Applicative
 import Data.Default.Class
 import Data.Default.Class
 import Data.Word8 (Word8)
 import Data.Word8 (Word8)