Note which rpc params are optional

This commit is contained in:
Joe Nelson
2016-09-11 15:15:38 -07:00
parent 466090c79b
commit 25c2cd1f2d
3 changed files with 22 additions and 17 deletions
+6 -3
View File
@@ -16,12 +16,15 @@ data DbStructure = DbStructure {
, dbProcs :: [(Text,ProcDescription)]
} deriving (Show, Eq)
type PgArgName = Text
type PgArgType = Text
data PgArg = PgArg {
pgaName :: Text
, pgaType :: Text
, pgaReq :: Bool
} deriving (Show, Eq)
data ProcDescription = ProcDescription {
pdName :: Text
, pdArgs :: [(PgArgName, PgArgType)]
, pdArgs :: [PgArg]
, pdReturnType :: Text
} deriving (Show, Eq)