Как исправить предупреждение QuasiQuoter?

Question

Я использую simple quasiquoter from the Haskell Wiki для многострочных строк.

import Language.Haskell.TH 
import Language.Haskell.TH.Quote 

str = QuasiQuoter { quoteExp = stringE } 

Я получаю следующее предупреждение:

Fields of ‘QuasiQuoter’ not initialised: quotePat, quoteType, 
              quoteDec 
    In the expression: QuasiQuoter {quoteExp = stringE} 
    In an equation for ‘str’: str = QuasiQuoter {quoteExp = stringE} 

Что такое правильный способ подавить это предупреждение? Должен ли я инициализировать quotePat и т. Д., Возможно, не определен или что-то еще?

Answer 1

из https://hackage.haskell.org/package/template-haskell/docs/Language-Haskell-TH-Quote.html#t:QuasiQuoter

, если вы заинтересованы только в определении quasiquoter, который будет использоваться для выражений, вы бы определить QuasiQuoter только quoteExp и оставить остальные поля затушили с ошибками.

Так что, используя неопределенные поля QQ, кажется, все в порядке. Если вы хотите просто подавить воюние, вы можете попробовать:

qqUndef = QuasiQuoter {quoteExp = undefined , 
         quotePat = undefined , 
         quoteType = undefined, 
         quoteDec = undefined } 

-- replace only quoteExp 
str = qqUndef { quoteExp = stringE }