mirror of
https://github.com/unclechu/gRPC-haskell.git
synced 2024-09-30 10:17:24 +02:00
14 lines
693 B
Diff
14 lines
693 B
Diff
|
diff --git a/test/Data/Diverse/ManySpec.hs b/test/Data/Diverse/ManySpec.hs
|
||
|
|
index eb7203f..9672af8 100644
|
||
|
|
--- a/test/Data/Diverse/ManySpec.hs
|
||
|
|
+++ b/test/Data/Diverse/ManySpec.hs
|
||
|
|
@@ -305,7 +305,7 @@ spec = do
|
||
|
|
|
||
|
|
it "with duplicate fields has setter for unique fields 'amend''" $ do
|
||
|
|
let x = (5 :: Int) ./ False ./ 'X' ./ Just 'O' ./ (6 :: Int) ./ Just 'A' ./ nil
|
||
|
|
- amend' @ '[Bool, Char] x (True ./ 'B' ./ nil) `shouldBe`
|
||
|
|
+ amend' @'[Bool, Char] x (True ./ 'B' ./ nil) `shouldBe`
|
||
|
|
(5 :: Int) ./ True ./ 'B' ./ Just 'O' ./ (6 :: Int) ./ Just 'A' ./ nil
|
||
|
|
|
||
|
|
it "can be folded with 'Many' handlers using 'forMany' or 'collect'" $ do
|