We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
1 parent 4242e40 commit 818a95bCopy full SHA for 818a95b
1 file changed
src/Flat/Instances/Base.hs
@@ -45,6 +45,7 @@ import Data.Functor.Identity (Identity (..))
45
{- ORMOLU_DISABLE -}
46
-- $setup
47
-- >>> :set -XNegativeLiterals -XTypeApplications
48
+-- >>> :set -XDeriveAnyClass -XDeriveGeneric
49
-- >>> import Flat.Instances.Test
50
-- >>> import Data.Fixed
51
-- >>> import Data.Int
@@ -59,7 +60,11 @@ import Data.Functor.Identity (Identity (..))
59
60
-- >>> let y = 33
61
{- ORMOLU_ENABLE -}
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
+-}
68
69
-- | @since 0.4.4
70
#if MIN_VERSION_base(4,8,0)
0 commit comments