/src-extra/util/Database/HsSqlPpp/Utils/Here.lhs
Haskell | 16 lines | 13 code | 3 blank | 0 comment | 0 complexity | f9f9ea136026f84d259b42371f6c48bf MD5 | raw file
Possible License(s): BSD-3-Clause
1 2Multiline string support, mainly used to enter multiline sql strings 3 4robbed from http://old.nabble.com/Multi-line-string-literals-are-both-easy--and--elegant-in-Haskell-td19959973.html 5 6> module Database.HsSqlPpp.Utils.Here where 7> 8> import Language.Haskell.TH.Quote 9> --import Language.Haskell.TH.Syntax 10> import Language.Haskell.TH.Lib 11> 12> here :: QuasiQuoter 13> here = QuasiQuoter {quoteExp = litE . stringL 14> ,quotePat = litP . stringL 15> ,quoteType = undefined 16> ,quoteDec = undefined}