napkin-0.5.14
Safe HaskellSafe-Inferred
LanguageGHC2021

Napkin.Backends.MsSql.ApiGen.ApiUnitBody

Description

Generate all API unit args i.e. what goes after :: in haskell function

Documentation

data BodyLeaf #

Constructors

ArgLeaf String

function argument name

KeywordLeaf String

conventional keyword, "(", ")", ",", "." | ConcatLeaf BodyLeaf

Instances

Instances details
Show BodyLeaf # 
Instance details

Defined in Napkin.Backends.MsSql.ApiGen.ApiUnitBody

Methods

showsPrec :: Int -> BodyLeaf -> ShowS #

show :: BodyLeaf -> String #

showList :: [BodyLeaf] -> ShowS #

Eq BodyLeaf # 
Instance details

Defined in Napkin.Backends.MsSql.ApiGen.ApiUnitBody

Methods

(==) :: BodyLeaf -> BodyLeaf -> Bool #

(/=) :: BodyLeaf -> BodyLeaf -> Bool #

argLeafName :: BodyLeaf -> Maybe String #

mkCombinationTreeOfBodies :: String -> MsSqlApiDefExpr -> CombinationTree BodyLeaf #

apiUnitBodies :: String -> [[(ArgName, ArgTypeLeaf)]] -> MsSqlApiDefExpr -> Q [Exp] #

dropCommasAfterKeyword :: [ParensOperatorArgument] -> [ParensOperatorArgument] #

type NonCommaKeyword = String #

type FunArgName = String #

data ParensOperatorArgument' #

Constructors

ParensOperatorArgument' [NonCommaKeyword] FunArgName 
ParensOperatorConst' [NonCommaKeyword] 

Instances

Instances details
Show ParensOperatorArgument' # 
Instance details

Defined in Napkin.Backends.MsSql.ApiGen.ApiUnitBody

Methods

showsPrec :: Int -> ParensOperatorArgument' -> ShowS #

show :: ParensOperatorArgument' -> String #

showList :: [ParensOperatorArgument'] -> ShowS #

Eq ParensOperatorArgument' # 
Instance details

Defined in Napkin.Backends.MsSql.ApiGen.ApiUnitBody

Methods

(==) :: ParensOperatorArgument' -> ParensOperatorArgument' -> Bool #

(/=) :: ParensOperatorArgument' -> ParensOperatorArgument' -> Bool #

data ParensOperator' #

Constructors

ParensOperator' [String] [ParensOperatorArgument'] 
ParensOperatorBomb' String 

Instances

Instances details
Show ParensOperator' # 
Instance details

Defined in Napkin.Backends.MsSql.ApiGen.ApiUnitBody

Methods

showsPrec :: Int -> ParensOperator' -> ShowS #

show :: ParensOperator' -> String #

showList :: [ParensOperator'] -> ShowS #

Eq ParensOperator' # 
Instance details

Defined in Napkin.Backends.MsSql.ApiGen.ApiUnitBody

Methods

(==) :: ParensOperator' -> ParensOperator' -> Bool #

(/=) :: ParensOperator' -> ParensOperator' -> Bool #

data AccumState #

Constructors

AccumOperatorNameParts [String] 
AccumNonCommaKeywords [String] [ParensOperatorArgument'] [String] 

Instances

Instances details
Show AccumState # 
Instance details

Defined in Napkin.Backends.MsSql.ApiGen.ApiUnitBody

Methods

showsPrec :: Int -> AccumState -> ShowS #

show :: AccumState -> String #

showList :: [AccumState] -> ShowS #

Eq AccumState # 
Instance details

Defined in Napkin.Backends.MsSql.ApiGen.ApiUnitBody

Methods

(==) :: AccumState -> AccumState -> Bool #

(/=) :: AccumState -> AccumState -> Bool #

bodyLeafToSexp :: AccumState -> [BodyLeaf] -> [ParensOperator'] #