diff options
Diffstat (limited to 'src/Language/GraphQL/Encoder.hs')
| -rw-r--r-- | src/Language/GraphQL/Encoder.hs | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/src/Language/GraphQL/Encoder.hs b/src/Language/GraphQL/Encoder.hs index 266f314..c315091 100644 --- a/src/Language/GraphQL/Encoder.hs +++ b/src/Language/GraphQL/Encoder.hs @@ -41,10 +41,10 @@ variableDefinition :: VariableDefinition -> Text variableDefinition (VariableDefinition var ty dv) = variable var <> ":" <> type_ ty <> maybe mempty defaultValue dv -defaultValue :: DefaultValue -> Text +defaultValue :: Value -> Text defaultValue val = "=" <> value val -variable :: Variable -> Text +variable :: Name -> Text variable var = "$" <> var selectionSet :: SelectionSet -> Text @@ -113,10 +113,10 @@ booleanValue False = "false" stringValue :: Text -> Text stringValue = quotes -listValue :: ListValue -> Text +listValue :: [Value] -> Text listValue = bracketsCommas value -objectValue :: ObjectValue -> Text +objectValue :: [ObjectField] -> Text objectValue = bracesCommas objectField objectField :: ObjectField -> Text |