hw-xml-0.4.0.0: app/App/Show.hs

module App.Show
  ( tshow
  ) where

import Data.Text (Text)

import qualified Data.Text as T

tshow :: Show a => a -> Text
tshow = T.pack . show