{-# LINE 1 "DB/HSQL/PG/Status.hsc" #-}
module DB.HSQL.PG.Status where
{-# LINE 2 "DB/HSQL/PG/Status.hsc" #-}

import Foreign(Word32)


{-# LINE 6 "DB/HSQL/PG/Status.hsc" #-}
-- |
type ConnStatusType = Word32
{-# LINE 8 "DB/HSQL/PG/Status.hsc" #-}
type ExecStatusType = Word32
{-# LINE 9 "DB/HSQL/PG/Status.hsc" #-}


-- |
connectionOk:: ConnStatusType
connectionOk = (0)
{-# LINE 14 "DB/HSQL/PG/Status.hsc" #-}


-- |
pgTuplesOk:: ExecStatusType
pgTuplesOk = (2)
{-# LINE 19 "DB/HSQL/PG/Status.hsc" #-}


-- |
pgCommandOk:: ExecStatusType
pgCommandOk = (1)
{-# LINE 24 "DB/HSQL/PG/Status.hsc" #-}


-- |
pgFatalError:: ExecStatusType
pgFatalError = (7)