generic-library/msgpack
1
0
Fork 0
mirror of https://github.com/msgpack/msgpack-c.git synced 2025-10-26 18:42:42 +01:00
Code Issues Projects Releases Wiki Activity

haskell: finish template-haskell deriving implement

Browse Source
This commit is contained in:
tanakh
2010-09-24 01:24:13 +09:00
parent 6aa196cf55
commit 93bed9c5df
4 changed files with 75 additions and 19 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
haskell/test/Test.hs
View File

@@ -7,7 +7,7 @@ import qualified Data.ByteString.Char8 as B
import qualified Data.ByteString.Lazy.Char8 as L
import Data.MessagePack
mid :: (ObjectGet a, ObjectPut a) => a -> a
mid :: (Packable a, Unpackable a) => a -> a
mid = unpack . pack
prop_mid_int a = a == mid a