13 Feb
2009
13 Feb
'09
12:40 a.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