We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
2 parents 0e642ea + 86ad439 commit 31ed10bCopy full SHA for 31ed10b
src/Database/PostgreSQL/LibPQ/Enums.hsc
@@ -197,14 +197,12 @@ data Verbosity
197
= ErrorsTerse
198
| ErrorsDefault
199
| ErrorsVerbose
200
- | ErrorsSqlstate
201
deriving (Eq, Show)
202
203
instance FromCInt Verbosity where
204
- fromCInt (#const PQERRORS_TERSE) = Just ErrorsTerse
205
- fromCInt (#const PQERRORS_DEFAULT) = Just ErrorsDefault
206
- fromCInt (#const PQERRORS_VERBOSE) = Just ErrorsVerbose
207
- fromCInt (#const PQERRORS_SQLSTATE) = Just ErrorsSqlstate
+ fromCInt (#const PQERRORS_TERSE) = Just ErrorsTerse
+ fromCInt (#const PQERRORS_DEFAULT) = Just ErrorsDefault
+ fromCInt (#const PQERRORS_VERBOSE) = Just ErrorsVerbose
208
fromCInt _ = Nothing
209
210
instance ToCInt Verbosity where
0 commit comments