Safe Haskell	None
Language	GHC2024

Arbiter.Test.Fixtures

Description

Shared payload types for the arbiter test suites.

Synopsis

data TestPayload
- = TestMessage Text
- | TestCalculation Int Int
data WorkerTestPayload
- = SimpleTask Text
- | FailingTask Int
- | SlowTask Int

Documentation

Source #data TestPayload

A payload for the core operation suites.

Constructors

TestMessage Text
TestCalculation Int Int

Instances

Instances details

FromJSON TestPayload Source #

Instance details

Defined in Arbiter.Test.Fixtures

Methods

#parseJSON :: Value -> Parser TestPayload

#parseJSONList :: Value -> Parser [TestPayload]

#omittedField :: Maybe TestPayload

ToJSON TestPayload Source #

Instance details

Defined in Arbiter.Test.Fixtures

Methods

#toJSON :: TestPayload -> Value

#toEncoding :: TestPayload -> Encoding

#toJSONList :: [TestPayload] -> Value

#toEncodingList :: [TestPayload] -> Encoding

#omitField :: TestPayload -> Bool

HasKind TestPayload Source #

Instance details

Defined in Arbiter.Test.Fixtures

Methods

#kindOf :: TestPayload -> Maybe Text

#kindsFor :: [Text]

Eq TestPayload Source #

Instance details

Defined in Arbiter.Test.Fixtures

Methods

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

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

Generic TestPayload Source #

Instance details

Defined in Arbiter.Test.Fixtures

Associated Types

type Rep TestPayload

Instance details

Defined in Arbiter.Test.Fixtures

type Rep TestPayload = D1 ('MetaData "TestPayload" "Arbiter.Test.Fixtures" "arbiter-test-common-0.1.0.0-inplace" 'False) (C1 ('MetaCons "TestMessage" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text)) :+: C1 ('MetaCons "TestCalculation" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Int) :*: S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Int)))

Methods

#from :: TestPayload -> Rep TestPayload x

#to :: Rep TestPayload x -> TestPayload

Show TestPayload Source #

Instance details

Defined in Arbiter.Test.Fixtures

Methods

#showsPrec :: Int -> TestPayload -> ShowS

#show :: TestPayload -> String

#showList :: [TestPayload] -> ShowS

type Rep TestPayload Source #

Instance details

Defined in Arbiter.Test.Fixtures

type Rep TestPayload = D1 ('MetaData "TestPayload" "Arbiter.Test.Fixtures" "arbiter-test-common-0.1.0.0-inplace" 'False) (C1 ('MetaCons "TestMessage" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text)) :+: C1 ('MetaCons "TestCalculation" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Int) :*: S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Int)))

Source #data WorkerTestPayload

A payload for the worker pool suites, with a failing and a slow variant.

Constructors

SimpleTask Text
FailingTask Int
SlowTask Int

Instances

Instances details

FromJSON WorkerTestPayload Source #

Instance details

Defined in Arbiter.Test.Fixtures

Methods

#parseJSON :: Value -> Parser WorkerTestPayload

#parseJSONList :: Value -> Parser [WorkerTestPayload]

#omittedField :: Maybe WorkerTestPayload

ToJSON WorkerTestPayload Source #

Instance details

Defined in Arbiter.Test.Fixtures

Methods

#toJSON :: WorkerTestPayload -> Value

#toEncoding :: WorkerTestPayload -> Encoding

#toJSONList :: [WorkerTestPayload] -> Value

#toEncodingList :: [WorkerTestPayload] -> Encoding

#omitField :: WorkerTestPayload -> Bool

HasKind WorkerTestPayload Source #

Instance details

Defined in Arbiter.Test.Fixtures

Methods

#kindOf :: WorkerTestPayload -> Maybe Text

#kindsFor :: [Text]

Eq WorkerTestPayload Source #

Instance details

Defined in Arbiter.Test.Fixtures

Methods

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

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

Generic WorkerTestPayload Source #

Instance details

Defined in Arbiter.Test.Fixtures

Associated Types

type Rep WorkerTestPayload

Instance details

Defined in Arbiter.Test.Fixtures

type Rep WorkerTestPayload = D1 ('MetaData "WorkerTestPayload" "Arbiter.Test.Fixtures" "arbiter-test-common-0.1.0.0-inplace" 'False) (C1 ('MetaCons "SimpleTask" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text)) :+: (C1 ('MetaCons "FailingTask" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Int)) :+: C1 ('MetaCons "SlowTask" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Int))))

Methods

#from :: WorkerTestPayload -> Rep WorkerTestPayload x

#to :: Rep WorkerTestPayload x -> WorkerTestPayload

Show WorkerTestPayload Source #

Instance details

Defined in Arbiter.Test.Fixtures

Methods

#showsPrec :: Int -> WorkerTestPayload -> ShowS

#show :: WorkerTestPayload -> String

#showList :: [WorkerTestPayload] -> ShowS

type Rep WorkerTestPayload Source #

Instance details

Defined in Arbiter.Test.Fixtures

type Rep WorkerTestPayload = D1 ('MetaData "WorkerTestPayload" "Arbiter.Test.Fixtures" "arbiter-test-common-0.1.0.0-inplace" 'False) (C1 ('MetaCons "SimpleTask" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Text)) :+: (C1 ('MetaCons "FailingTask" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Int)) :+: C1 ('MetaCons "SlowTask" 'PrefixI 'False) (S1 ('MetaSel ('Nothing :: Maybe Symbol) 'NoSourceUnpackedness 'NoSourceStrictness 'DecidedLazy) (Rec0 Int))))