build with ghc-8.6.3

This commit is contained in:
qz 2019-01-24 01:02:26 +03:00
parent 3246c201fd
commit 2a10e6c21a
3 changed files with 27 additions and 4 deletions

View File

@ -28,13 +28,14 @@ import Data.Store.Core (Poke(..), unsafeEncodeWith, pokeStatePtr,
data Encode = Encode {-# UNPACK #-} !Int !(Poke ())
instance Semigroup Encode where
{-# INLINE (<>) #-}
(Encode len1 f1) <> (Encode len2 f2) = Encode (len1 + len2) (f1 *> f2)
instance Monoid Encode where
{-# INLINE mempty #-}
mempty = Encode 0 . Poke $ \_ offset -> pure (offset, ())
{-# INLINE mappend #-}
(Encode len1 f1) `mappend` (Encode len2 f2) = Encode (len1 + len2) (f1 *> f2)
instance Show Encode where
show (Encode len _) = "Encode instance of length " ++ show len

22
stack-ghc8.6.3.yaml Normal file
View File

@ -0,0 +1,22 @@
# This file was automatically generated by 'stack init'
#
resolver: lts-13.4
packages:
- '.'
# Dependency packages to be pulled from upstream that are not in the resolver
# (e.g., acme-missiles-0.3)
extra-deps:
- socket-0.8.2.0
- socket-unix-0.2.0.0
# <<<<<<< HEAD
# =======
# - store-core-0.3
# - QuickCheck-2.9.2
# >>>>>>> QuickCheck tests for existing codecs
# Override default flag values for local packages and extra-deps
flags: {}
# Extra package databases containing global packages
extra-package-dbs: []

View File

@ -1 +1 @@
stack-ghc8.0.2.yaml
stack-ghc8.6.3.yaml