12 Feb
2009
12 Feb
'09
2:40 p.m.
Here's a concrete suggestion: have Data.Binary.Put export the existing function tell :: Builder -> Put and also execPut :: PutM a -> Builder execPut = sndS . unPut