/src-extra/util/Database/HsSqlPpp/Utils/Here.lhs

http://github.com/JakeWheat/hssqlppp · Haskell · 16 lines · 13 code · 3 blank · 0 comment · 0 complexity · f9f9ea136026f84d259b42371f6c48bf MD5 · raw file

  1. Multiline string support, mainly used to enter multiline sql strings
  2. robbed from http://old.nabble.com/Multi-line-string-literals-are-both-easy--and--elegant-in-Haskell-td19959973.html
  3. > module Database.HsSqlPpp.Utils.Here where
  4. >
  5. > import Language.Haskell.TH.Quote
  6. > --import Language.Haskell.TH.Syntax
  7. > import Language.Haskell.TH.Lib
  8. >
  9. > here :: QuasiQuoter
  10. > here = QuasiQuoter {quoteExp = litE . stringL
  11. > ,quotePat = litP . stringL
  12. > ,quoteType = undefined
  13. > ,quoteDec = undefined}