git.iko.soy/typeable/postgresql-simple
on master help sign in
Remove unused datatype
5d4908aLeon P Smith
src/Database/PostgreSQL/Simple/Internal.hs−5
@@ -36,7 +36,6 @@ import Data.Word
36import Database.PostgreSQL.LibPQ(Oid(..))
36import Database.PostgreSQL.LibPQ(Oid(..))
37import qualified Database.PostgreSQL.LibPQ as PQ
37import qualified Database.PostgreSQL.LibPQ as PQ
38import Database.PostgreSQL.LibPQ(ExecStatus(..))
38import Database.PostgreSQL.LibPQ(ExecStatus(..))
39−import Database.PostgreSQL.Simple.BuiltinTypes (BuiltinType)
40import Database.PostgreSQL.Simple.Ok
39import Database.PostgreSQL.Simple.Ok
41import Database.PostgreSQL.Simple.Types (Query(..))
40import Database.PostgreSQL.Simple.Types (Query(..))
42import Control.Monad.Trans.State.Strict
41import Control.Monad.Trans.State.Strict
@@ -69,10 +68,6 @@ data Connection = Connection {
69 , connectionObjects :: {-# UNPACK #-} !(MVar (IntMap.IntMap TypeInfo))
68 , connectionObjects :: {-# UNPACK #-} !(MVar (IntMap.IntMap TypeInfo))
70 }
69 }
71
70
72−data SqlType
73− = Builtin BuiltinType
74− | Other Oid
75−
76data SqlError = SqlError {
71data SqlError = SqlError {
77 sqlState :: ByteString
72 sqlState :: ByteString
78 , sqlExecStatus :: ExecStatus
73 , sqlExecStatus :: ExecStatus