Browse Source

junction: StrategyDescriptor: cleanup

junction
Denis Tereshkin 4 years ago
parent
commit
19893d77df
  1. 3
      src/ATrade/Driver/Junction/Types.hs

3
src/ATrade/Driver/Junction/Types.hs

@ -25,8 +25,7 @@ data StrategyDescriptor c s =
StrategyDescriptor StrategyDescriptor
{ {
baseStrategyName :: T.Text, baseStrategyName :: T.Text,
eventCallback :: EventCallback c s, eventCallback :: EventCallback c s
defaultState :: s
} }
data StrategyDescriptorE = forall c s. (FromDhall c, Default s, FromJSON s, ToJSON s) => StrategyDescriptorE (StrategyDescriptor c s) data StrategyDescriptorE = forall c s. (FromDhall c, Default s, FromJSON s, ToJSON s) => StrategyDescriptorE (StrategyDescriptor c s)

Loading…
Cancel
Save