Skip to content

Commit 818a95b

Browse files
committed
docs: update example setup and add disabled test cases in Base.hs
1 parent 4242e40 commit 818a95b

File tree

1 file changed

+6
-1
lines changed

1 file changed

+6
-1
lines changed

src/Flat/Instances/Base.hs

Lines changed: 6 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -45,6 +45,7 @@ import Data.Functor.Identity (Identity (..))
4545
{- ORMOLU_DISABLE -}
4646
-- $setup
4747
-- >>> :set -XNegativeLiterals -XTypeApplications
48+
-- >>> :set -XDeriveAnyClass -XDeriveGeneric
4849
-- >>> import Flat.Instances.Test
4950
-- >>> import Data.Fixed
5051
-- >>> import Data.Int
@@ -59,7 +60,11 @@ import Data.Functor.Identity (Identity (..))
5960
-- >>> let y = 33
6061
{- ORMOLU_ENABLE -}
6162

62-
-- >>> y
63+
{- Other tests (disabled)
64+
>>> data SomeData = SomeData !Int64 !Word8 !Double deriving (Generic, Show, Flat,Eq )
65+
>>> test $ SomeData 1 1 1
66+
(True,80,"00000010 00000001 00111111 11110000 00000000 00000000 00000000 00000000 00000000 00000000")
67+
-}
6368

6469
-- | @since 0.4.4
6570
#if MIN_VERSION_base(4,8,0)

0 commit comments

Comments
 (0)