Anyone know of an efficient way to convert a ST.Trans Array to a ByteString?

Or is this it?

https://github.com/haskell-works/conduit-succinct-json/commit/1427f10ce67dee86bdda8b7356d92d692c61100d

Cheers,

-John