sort-by-pinyin-2017.10.18: src/Text/Here.hs

-- |

module Text.Here where

import Language.Haskell.TH.Quote
import Language.Haskell.TH.Syntax
import Language.Haskell.TH.Lib


here :: QuasiQuoter
here =
  QuasiQuoter
    {
      quoteExp = litE . stringL
    , quotePat = litP . stringL
    }