module HaskellWorks.Data.Json.Internal.Token.Types (JsonToken(..)) where

data JsonToken s d
  = JsonTokenBraceL
  | JsonTokenBraceR
  | JsonTokenBracketL
  | JsonTokenBracketR
  | JsonTokenComma
  | JsonTokenColon
  | JsonTokenWhitespace
  | JsonTokenString s
  | JsonTokenBoolean Bool
  | JsonTokenNumber d
  | JsonTokenNull
  deriving (JsonToken s d -> JsonToken s d -> Bool
(JsonToken s d -> JsonToken s d -> Bool)
-> (JsonToken s d -> JsonToken s d -> Bool) -> Eq (JsonToken s d)
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
forall s d. (Eq s, Eq d) => JsonToken s d -> JsonToken s d -> Bool
/= :: JsonToken s d -> JsonToken s d -> Bool
$c/= :: forall s d. (Eq s, Eq d) => JsonToken s d -> JsonToken s d -> Bool
== :: JsonToken s d -> JsonToken s d -> Bool
$c== :: forall s d. (Eq s, Eq d) => JsonToken s d -> JsonToken s d -> Bool
Eq, Int -> JsonToken s d -> ShowS
[JsonToken s d] -> ShowS
JsonToken s d -> String
(Int -> JsonToken s d -> ShowS)
-> (JsonToken s d -> String)
-> ([JsonToken s d] -> ShowS)
-> Show (JsonToken s d)
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
forall s d. (Show s, Show d) => Int -> JsonToken s d -> ShowS
forall s d. (Show s, Show d) => [JsonToken s d] -> ShowS
forall s d. (Show s, Show d) => JsonToken s d -> String
showList :: [JsonToken s d] -> ShowS
$cshowList :: forall s d. (Show s, Show d) => [JsonToken s d] -> ShowS
show :: JsonToken s d -> String
$cshow :: forall s d. (Show s, Show d) => JsonToken s d -> String
showsPrec :: Int -> JsonToken s d -> ShowS
$cshowsPrec :: forall s d. (Show s, Show d) => Int -> JsonToken s d -> ShowS
Show)