frequent-substring-0.1.0.0: src/Util.hs

module Util
  ( showText
  ) where

import Data.Text (pack, Text)

showText :: (Show a) => a -> Text
showText = pack . show