Skip to content

Commit 29935ea

Browse files
committed
Revert "Use io-classes-1.6"
This reverts commit 6da1293.
1 parent 89a057b commit 29935ea

File tree

5 files changed

+11
-13
lines changed

5 files changed

+11
-13
lines changed

cabal.project

Lines changed: 1 addition & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -11,7 +11,7 @@ repository cardano-haskell-packages
1111
d4a35cd3121aa00d18544bb0ac01c3e1691d618f462c46129271bccf39f7e8ee
1212

1313
index-state:
14-
hackage.haskell.org 2024-08-27T07:58:31Z
14+
hackage.haskell.org 2024-07-01T07:04:30Z
1515
, cardano-haskell-packages 2024-06-27T10:53:24Z
1616

1717
packages: ./typed-protocols

typed-protocols-cborg/src/Network/TypedProtocol/Codec/CBOR.hs

Lines changed: 3 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -11,7 +11,7 @@ module Network.TypedProtocol.Codec.CBOR
1111
) where
1212

1313
import Control.Monad.Class.MonadST (MonadST (..))
14-
import Control.Monad.ST hiding (stToIO)
14+
import Control.Monad.ST
1515

1616
import qualified Codec.CBOR.Decoding as CBOR (Decoder)
1717
import qualified Codec.CBOR.Encoding as CBOR (Encoding)
@@ -68,7 +68,7 @@ mkCodecCborStrictBS cborMsgEncode cborMsgDecode =
6868
:: (forall s. CBOR.Decoder s a)
6969
-> m (DecodeStep BS.ByteString DeserialiseFailure m a)
7070
convertCborDecoder cborDecode =
71-
convertCborDecoderBS cborDecode stToIO
71+
withLiftST (convertCborDecoderBS cborDecode)
7272

7373
convertCborDecoderBS
7474
:: forall s m a. Functor m
@@ -123,7 +123,7 @@ mkCodecCborLazyBS cborMsgEncode cborMsgDecode =
123123
:: (forall s. CBOR.Decoder s a)
124124
-> m (DecodeStep LBS.ByteString CBOR.DeserialiseFailure m a)
125125
convertCborDecoder cborDecode =
126-
convertCborDecoderLBS cborDecode stToIO
126+
withLiftST (convertCborDecoderLBS cborDecode)
127127

128128
convertCborDecoderLBS
129129
:: forall s m a. Monad m

typed-protocols-examples/typed-protocols-examples.cabal

Lines changed: 5 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -1,6 +1,6 @@
11
cabal-version: 3.0
22
name: typed-protocols-examples
3-
version: 0.2.0.3
3+
version: 0.2.0.2
44
synopsis: Examples and tests for the typed-protocols framework
55
-- description:
66
license: Apache-2.0
@@ -48,7 +48,8 @@ library
4848
cborg,
4949
serialise,
5050
contra-tracer,
51-
io-classes:{io-classes,si-timers},
51+
io-classes,
52+
si-timers,
5253
time,
5354
typed-protocols,
5455
typed-protocols-cborg
@@ -76,8 +77,9 @@ test-suite test
7677
, typed-protocols
7778
, typed-protocols-cborg
7879
, typed-protocols-examples
79-
, io-classes:{io-classes,si-timers}
80+
, io-classes
8081
, io-sim
82+
, si-timers
8183
, QuickCheck
8284
, tasty
8385
, tasty-quickcheck

typed-protocols/CHANGELOG.md

Lines changed: 0 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -1,9 +1,5 @@
11
# Revision history for typed-protocols-cborg
22

3-
## 0.1.1.1
4-
5-
* Use `io-classes-1.6`
6-
73
## 0.1.0.7 -- 2023-10-20
84

95
* Improved performance of `prop_codecs_splitsM` and `prop_codecs_compatM`.

typed-protocols/typed-protocols.cabal

Lines changed: 2 additions & 2 deletions
Original file line numberDiff line numberDiff line change
@@ -1,6 +1,6 @@
11
cabal-version: 3.0
22
name: typed-protocols
3-
version: 0.1.1.1
3+
version: 0.1.1.0
44
synopsis: A framework for strongly typed protocols
55
-- description:
66
license: Apache-2.0
@@ -32,7 +32,7 @@ library
3232
, TypeOperators
3333
, BangPatterns
3434
build-depends: base,
35-
io-classes ^>= 1.6
35+
io-classes >= 1.0 && < 1.4
3636

3737
hs-source-dirs: src
3838
default-language: Haskell2010

0 commit comments

Comments
 (0)