From 78e0d871d5abfa920746d9af3c1e13611aea40e6 Mon Sep 17 00:00:00 2001 From: Danny Navarro Date: Tue, 26 Jan 2016 13:38:02 +0100 Subject: Garden --- Data/GraphQL/AST.hs | 6 ++---- 1 file changed, 2 insertions(+), 4 deletions(-) (limited to 'Data/GraphQL/AST.hs') diff --git a/Data/GraphQL/AST.hs b/Data/GraphQL/AST.hs index 4140c9c..1303908 100644 --- a/Data/GraphQL/AST.hs +++ b/Data/GraphQL/AST.hs @@ -1,8 +1,8 @@ module Data.GraphQL.AST where import Data.Int (Int32) +import Data.String (IsString(fromString)) import Data.Text (Text, pack) -import Data.String -- * Name @@ -39,9 +39,7 @@ data Selection = SelectionField Field | SelectionInlineFragment InlineFragment deriving (Eq,Show) -data Field = Field Alias Name [Argument] - [Directive] - SelectionSet +data Field = Field Alias Name [Argument] [Directive] SelectionSet deriving (Eq,Show) type Alias = Name -- cgit v1.2.3