Safe Haskell | Safe-Inferred |
---|---|
Language | Haskell2010 |
Documentation
data GeneratorContext Source #
GeneratorContext | |
|
Instances
data MutatedHeader Source #
Instances
FromJSON MutatedHeader Source # | |
ToJSON MutatedHeader Source # | |
Show MutatedHeader Source # | |
Defined in Test.Ouroboros.Consensus.Protocol.Praos.Header showsPrec ∷ Int → MutatedHeader → ShowS # show ∷ MutatedHeader → String # showList ∷ [MutatedHeader] → ShowS # | |
Eq MutatedHeader Source # | |
Defined in Test.Ouroboros.Consensus.Protocol.Praos.Header (==) ∷ MutatedHeader → MutatedHeader → Bool # (/=) ∷ MutatedHeader → MutatedHeader → Bool # |
NoMutation | No mutation |
MutateKESKey | Mutate the KES key, ie. sign the header with a different KES key. |
MutateColdKey | Mutate the cold key, ie. sign the operational certificate with a different cold key. |
MutateKESPeriod | Mutate the KES period in the operational certificate to be after the start of the KES period. |
MutateKESPeriodBefore | Mutate KES period to be before the current KES period |
MutateCounterOver1 | Mutate certificate counter to be greater than expected |
MutateCounterUnder | Mutate certificate counter to be lower than expected |
Instances
FromJSON Mutation Source # | |
ToJSON Mutation Source # | |
Generic Mutation Source # | |
Show Mutation Source # | |
Eq Mutation Source # | |
type Rep Mutation Source # | |
Defined in Test.Ouroboros.Consensus.Protocol.Praos.Header type Rep Mutation = D1 ('MetaData "Mutation" "Test.Ouroboros.Consensus.Protocol.Praos.Header" "ouroboros-consensus-protocol-0.9.0.2-inplace-unstable-protocol-testlib" 'False) ((C1 ('MetaCons "NoMutation" 'PrefixI 'False) (U1 ∷ Type → Type) :+: (C1 ('MetaCons "MutateKESKey" 'PrefixI 'False) (U1 ∷ Type → Type) :+: C1 ('MetaCons "MutateColdKey" 'PrefixI 'False) (U1 ∷ Type → Type))) :+: ((C1 ('MetaCons "MutateKESPeriod" 'PrefixI 'False) (U1 ∷ Type → Type) :+: C1 ('MetaCons "MutateKESPeriodBefore" 'PrefixI 'False) (U1 ∷ Type → Type)) :+: (C1 ('MetaCons "MutateCounterOver1" 'PrefixI 'False) (U1 ∷ Type → Type) :+: C1 ('MetaCons "MutateCounterUnder" 'PrefixI 'False) (U1 ∷ Type → Type)))) |