module DB.HSQL.PG.Status where import Foreign(Word32) #include -- | type ConnStatusType = #type ConnStatusType type ExecStatusType = #type ExecStatusType -- | connectionOk:: ConnStatusType connectionOk = (#const CONNECTION_OK) -- | pgTuplesOk:: ExecStatusType pgTuplesOk = (#const PGRES_TUPLES_OK) -- | pgCommandOk:: ExecStatusType pgCommandOk = (#const PGRES_COMMAND_OK) -- | pgFatalError:: ExecStatusType pgFatalError = (#const PGRES_FATAL_ERROR)