{-# LANGUAGE DeriveAnyClass #-} module Hercules.API.Build.LogLine where import Data.Word import Hercules.API.Prelude data LogLine = LogLine {LogLine -> Word64 i :: !Word64, LogLine -> Word64 ms :: !Word64, LogLine -> Text t :: !Text} deriving ((forall x. LogLine -> Rep LogLine x) -> (forall x. Rep LogLine x -> LogLine) -> Generic LogLine forall x. Rep LogLine x -> LogLine forall x. LogLine -> Rep LogLine x forall a. (forall x. a -> Rep a x) -> (forall x. Rep a x -> a) -> Generic a $cto :: forall x. Rep LogLine x -> LogLine $cfrom :: forall x. LogLine -> Rep LogLine x Generic, Int -> LogLine -> ShowS [LogLine] -> ShowS LogLine -> String (Int -> LogLine -> ShowS) -> (LogLine -> String) -> ([LogLine] -> ShowS) -> Show LogLine forall a. (Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a showList :: [LogLine] -> ShowS $cshowList :: [LogLine] -> ShowS show :: LogLine -> String $cshow :: LogLine -> String showsPrec :: Int -> LogLine -> ShowS $cshowsPrec :: Int -> LogLine -> ShowS Show, LogLine -> LogLine -> Bool (LogLine -> LogLine -> Bool) -> (LogLine -> LogLine -> Bool) -> Eq LogLine forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a /= :: LogLine -> LogLine -> Bool $c/= :: LogLine -> LogLine -> Bool == :: LogLine -> LogLine -> Bool $c== :: LogLine -> LogLine -> Bool Eq, LogLine -> () (LogLine -> ()) -> NFData LogLine forall a. (a -> ()) -> NFData a rnf :: LogLine -> () $crnf :: LogLine -> () NFData, [LogLine] -> Encoding [LogLine] -> Value LogLine -> Encoding LogLine -> Value (LogLine -> Value) -> (LogLine -> Encoding) -> ([LogLine] -> Value) -> ([LogLine] -> Encoding) -> ToJSON LogLine forall a. (a -> Value) -> (a -> Encoding) -> ([a] -> Value) -> ([a] -> Encoding) -> ToJSON a toEncodingList :: [LogLine] -> Encoding $ctoEncodingList :: [LogLine] -> Encoding toJSONList :: [LogLine] -> Value $ctoJSONList :: [LogLine] -> Value toEncoding :: LogLine -> Encoding $ctoEncoding :: LogLine -> Encoding toJSON :: LogLine -> Value $ctoJSON :: LogLine -> Value ToJSON, Value -> Parser [LogLine] Value -> Parser LogLine (Value -> Parser LogLine) -> (Value -> Parser [LogLine]) -> FromJSON LogLine forall a. (Value -> Parser a) -> (Value -> Parser [a]) -> FromJSON a parseJSONList :: Value -> Parser [LogLine] $cparseJSONList :: Value -> Parser [LogLine] parseJSON :: Value -> Parser LogLine $cparseJSON :: Value -> Parser LogLine FromJSON, Proxy LogLine -> Declare (Definitions Schema) NamedSchema (Proxy LogLine -> Declare (Definitions Schema) NamedSchema) -> ToSchema LogLine forall a. (Proxy a -> Declare (Definitions Schema) NamedSchema) -> ToSchema a declareNamedSchema :: Proxy LogLine -> Declare (Definitions Schema) NamedSchema $cdeclareNamedSchema :: Proxy LogLine -> Declare (Definitions Schema) NamedSchema ToSchema)