eeva/servant
1
0
Fork 0
Code Issues Pull requests Projects Releases Wiki Activity

Add Semigroup import for GHC <= 8.2 compatibility

Browse source
This commit is contained in:
Ole Krüger 2020-07-02 17:37:47 +01:00 committed by Julian Ospald
parent 91a6452676
commit 86d0e16940
No known key found for this signature in database
GPG key ID: 3786C5262ECB4A3F
1 changed files with 4 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
servant-client-core/src/Servant/Client/Core/ServerSentEvents.hs
View file

@ -51,6 +51,10 @@ import Servant.Types.SourceT
(SourceT, StepT (..), foreachYieldStep, mapStepT, (SourceT, StepT (..), foreachYieldStep, mapStepT,
transformStepWithAtto) transformStepWithAtto)
-- For compatibility with GHC <= 8.2
import Data.Semigroup
(Semigroup (..))
-- | Line (or frame) of an event stream -- | Line (or frame) of an event stream
newtype EventStreamLine = EventStreamLine newtype EventStreamLine = EventStreamLine
{ unEventStreamLine :: ByteString.ByteString } { unEventStreamLine :: ByteString.ByteString }