Skip to content

Commit f9a5029

Browse files
committed
Add PQERRORS_SQLSTATE enum to type Verbosity
1 parent 8518aba commit f9a5029

File tree

1 file changed

+5
-3
lines changed

1 file changed

+5
-3
lines changed

src/Database/PostgreSQL/LibPQ/Enums.hsc

Lines changed: 5 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -197,12 +197,14 @@ data Verbosity
197197
= ErrorsTerse
198198
| ErrorsDefault
199199
| ErrorsVerbose
200+
| ErrorsSqlstate
200201
deriving (Eq, Show)
201202

202203
instance FromCInt Verbosity where
203-
fromCInt (#const PQERRORS_TERSE) = Just ErrorsTerse
204-
fromCInt (#const PQERRORS_DEFAULT) = Just ErrorsDefault
205-
fromCInt (#const PQERRORS_VERBOSE) = Just ErrorsVerbose
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
206208
fromCInt _ = Nothing
207209

208210
instance ToCInt Verbosity where

0 commit comments

Comments
 (0)