benchmark/Streamly/Benchmark/Data/Serialize/RecNonCompatible.hs · streamly

git.iko.soy/streamly

on a11fe00 help sign in

21 lines 720 B history raw

1{-# LANGUAGE TemplateHaskell #-}

3module Streamly.Benchmark.Data.Serialize.RecNonCompatible

4 ( RecNonCompatible(..)

5 , valRecNonCompatible

6 ) where

8--------------------------------------------------------------------------------

9-- Imports

10--------------------------------------------------------------------------------

12import Streamly.Benchmark.Data.Serialize.TH (genLargeRecord)

14import qualified Streamly.Internal.Data.Serialize.TH as Serialize

16--------------------------------------------------------------------------------

17-- Code

18--------------------------------------------------------------------------------

20$(genLargeRecord "RecNonCompatible" 50)

21$(Serialize.deriveSerialize ''RecNonCompatible)