, toJson

import           Data.Aeson.Text      (encodeToLazyText)

import           Data.Text.Lazy       (Text)
import qualified Data.Text.Lazy       as Text

toJson :: ToJSON a => a -> Text
toJson = encodeToLazyText