Safe Haskell	None
Language	GHC2024

Debug.TraceEmbrace.Config.Type.TraceMessage

Documentation

data TraceMessageElement Source #

Constructors

LiteralMessage	Constant tracing message
Variables	Variables e.g. `; x: 123; y: 321`
FullyQualifiedModule	Full Haskell module name (e.g. `Data.Map.Strict`)
ModuleName	Unqualified Haskell module name (e.g. `Strict`)
ShortenJavaModule	D.M.Strict
PackageName	Cabal package name
FunctionName	Function or method name containing tracing
LineNumber	Line number with tracing
Delimiter String

Instances

Instances details

FromJSON TraceMessageElement Source #

Instance details

Defined in Debug.TraceEmbrace.Config.Type.TraceMessage

Methods

parseJSON :: Value -> Parser TraceMessageElement #

parseJSONList :: Value -> Parser [TraceMessageElement] #

omittedField :: Maybe TraceMessageElement #

ToJSON TraceMessageElement Source #

Instance details

Defined in Debug.TraceEmbrace.Config.Type.TraceMessage

Methods

toJSON :: TraceMessageElement -> Value #

toEncoding :: TraceMessageElement -> Encoding #

toJSONList :: [TraceMessageElement] -> Value #

toEncodingList :: [TraceMessageElement] -> Encoding #

omitField :: TraceMessageElement -> Bool #

Generic TraceMessageElement Source #

Instance details

Defined in Debug.TraceEmbrace.Config.Type.TraceMessage

Associated Types

type Rep TraceMessageElement

Instance details

Defined in Debug.TraceEmbrace.Config.Type.TraceMessage

type Rep TraceMessageElement = D1 ('MetaData "TraceMessageElement" "Debug.TraceEmbrace.Config.Type.TraceMessage" "trace-embrace-1.2.0-inplace" 'False) (((C1 ('MetaCons "LiteralMessage" 'PrefixI 'False) (U1 :: Type -> Type) :+: C1 ('MetaCons "Variables" 'PrefixI 'False) (U1 :: Type -> Type)) :+: (C1 ('MetaCons "FullyQualifiedModule" 'PrefixI 'False) (U1 :: Type -> Type) :+: C1 ('MetaCons "ModuleName" 'PrefixI 'False) (U1 :: Type -> Type))) :+: ((C1 ('MetaCons "ShortenJavaModule" 'PrefixI 'False) (U1 :: Type -> Type) :+: C1 ('MetaCons "PackageName" 'PrefixI 'False) (U1 :: Type -> Type)) :+: (C1 ('MetaCons "FunctionName" 'PrefixI 'False) (U1 :: Type -> Type) :+: (C1 ('MetaCons "LineNumber" 'PrefixI 'False) (U1 :: Type -> Type) :+: C1 ('MetaCons "Delimiter" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 String))))))

Methods

from :: TraceMessageElement -> Rep TraceMessageElement x #

to :: Rep TraceMessageElement x -> TraceMessageElement #

Show TraceMessageElement Source #

Instance details

Defined in Debug.TraceEmbrace.Config.Type.TraceMessage

Methods

showsPrec :: Int -> TraceMessageElement -> ShowS #

show :: TraceMessageElement -> String #

showList :: [TraceMessageElement] -> ShowS #

Eq TraceMessageElement Source #

TraceMessageElement delimiter

Instance details

Defined in Debug.TraceEmbrace.Config.Type.TraceMessage

Methods

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

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

Lift TraceMessageElement Source #

Instance details

Defined in Debug.TraceEmbrace.Config.Type.TraceMessage

Methods

lift :: Quote m => TraceMessageElement -> m Exp #

liftTyped :: forall (m :: Type -> Type). Quote m => TraceMessageElement -> Code m TraceMessageElement #

type Rep TraceMessageElement Source #

Instance details

Defined in Debug.TraceEmbrace.Config.Type.TraceMessage

type Rep TraceMessageElement = D1 ('MetaData "TraceMessageElement" "Debug.TraceEmbrace.Config.Type.TraceMessage" "trace-embrace-1.2.0-inplace" 'False) (((C1 ('MetaCons "LiteralMessage" 'PrefixI 'False) (U1 :: Type -> Type) :+: C1 ('MetaCons "Variables" 'PrefixI 'False) (U1 :: Type -> Type)) :+: (C1 ('MetaCons "FullyQualifiedModule" 'PrefixI 'False) (U1 :: Type -> Type) :+: C1 ('MetaCons "ModuleName" 'PrefixI 'False) (U1 :: Type -> Type))) :+: ((C1 ('MetaCons "ShortenJavaModule" 'PrefixI 'False) (U1 :: Type -> Type) :+: C1 ('MetaCons "PackageName" 'PrefixI 'False) (U1 :: Type -> Type)) :+: (C1 ('MetaCons "FunctionName" 'PrefixI 'False) (U1 :: Type -> Type) :+: (C1 ('MetaCons "LineNumber" 'PrefixI 'False) (U1 :: Type -> Type) :+: C1 ('MetaCons "Delimiter" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 String))))))

data TraceMessageFormatG (a :: Type -> Type) Source #

Constructors

TraceMessageFormat
Fields entrySeparator :: Columnar a SeparatorValidator String `"; "` is default keyValueSeparator :: Columnar a SeparatorValidator String `": "` is default retValPrefix :: Columnar a SeparatorValidator String " => " traceLinePattern :: Columnar a NonEmpty [TraceMessageElement]

Instances

Instances details

FromJSON TraceMessageFormat Source #

Instance details

Defined in Debug.TraceEmbrace.Config.Type.TraceMessage

Methods

parseJSON :: Value -> Parser TraceMessageFormat #

parseJSONList :: Value -> Parser [TraceMessageFormat] #

omittedField :: Maybe TraceMessageFormat #

FromJSON TraceMessageFormatMaybe Source #

Instance details

Defined in Debug.TraceEmbrace.Config.Type.TraceMessage

Methods

parseJSON :: Value -> Parser TraceMessageFormatMaybe #

parseJSONList :: Value -> Parser [TraceMessageFormatMaybe] #

omittedField :: Maybe TraceMessageFormatMaybe #

ToJSON TraceMessageFormat Source #

Instance details

Defined in Debug.TraceEmbrace.Config.Type.TraceMessage

Methods

toJSON :: TraceMessageFormat -> Value #

toEncoding :: TraceMessageFormat -> Encoding #

toJSONList :: [TraceMessageFormat] -> Value #

toEncodingList :: [TraceMessageFormat] -> Encoding #

omitField :: TraceMessageFormat -> Bool #

ToJSON TraceMessageFormatMaybe Source #

Instance details

Defined in Debug.TraceEmbrace.Config.Type.TraceMessage

Methods

toJSON :: TraceMessageFormatMaybe -> Value #

toEncoding :: TraceMessageFormatMaybe -> Encoding #

toJSONList :: [TraceMessageFormatMaybe] -> Value #

toEncodingList :: [TraceMessageFormatMaybe] -> Encoding #

omitField :: TraceMessageFormatMaybe -> Bool #

Semigroup TraceMessageFormatMaybe Source #

Instance details

Defined in Debug.TraceEmbrace.Config.Type.TraceMessage

Methods

(<>) :: TraceMessageFormatMaybe -> TraceMessageFormatMaybe -> TraceMessageFormatMaybe #

sconcat :: NonEmpty TraceMessageFormatMaybe -> TraceMessageFormatMaybe #

stimes :: Integral b => b -> TraceMessageFormatMaybe -> TraceMessageFormatMaybe #

Generic TraceMessageFormat Source #

Instance details

Defined in Debug.TraceEmbrace.Config.Type.TraceMessage

Associated Types

type Rep (TraceMessageFormatG Identity)
Instance details Defined in Debug.TraceEmbrace.Config.Type.TraceMessage type Rep (TraceMessageFormatG Identity) = D1 ('MetaData "TraceMessageFormatG" "Debug.TraceEmbrace.Config.Type.TraceMessage" "trace-embrace-1.2.0-inplace" 'False) (C1 ('MetaCons "TraceMessageFormat" 'PrefixI 'True) ((S1 ('MetaSel ('Just "entrySeparator") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Columnar Identity SeparatorValidator String)) :: S1 ('MetaSel ('Just "keyValueSeparator") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Columnar Identity SeparatorValidator String))) :: (S1 ('MetaSel ('Just "retValPrefix") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Columnar Identity SeparatorValidator String)) :*: S1 ('MetaSel ('Just "traceLinePattern") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Columnar Identity NonEmpty [TraceMessageElement])))))
type Rep (TraceMessageFormatG Identity)
Instance details Defined in Debug.TraceEmbrace.Config.Type.TraceMessage type Rep (TraceMessageFormatG Identity) = D1 ('MetaData "TraceMessageFormatG" "Debug.TraceEmbrace.Config.Type.TraceMessage" "trace-embrace-1.2.0-inplace" 'False) (C1 ('MetaCons "TraceMessageFormat" 'PrefixI 'True) ((S1 ('MetaSel ('Just "entrySeparator") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Columnar Identity SeparatorValidator String)) :: S1 ('MetaSel ('Just "keyValueSeparator") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Columnar Identity SeparatorValidator String))) :: (S1 ('MetaSel ('Just "retValPrefix") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Columnar Identity SeparatorValidator String)) :*: S1 ('MetaSel ('Just "traceLinePattern") 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 (Columnar Identity NonEmpty [TraceMessageElement])))))