Haskell:如何告诉 hlint 不要: `Warning: Use string literal`

Question

我有一个单元测试文件:

module X04PatMatTest where

import AssertError
import Test.HUnit
import X04PatMat

...

和 hlint 提示:

X04PatMatTest.hs:15:69: Warning: Use string literal 
Found:
  ['a', 'b', 'd']
Why not:
  "abd"

由于种种原因，我很想放 ['a', 'b', 'd']在测试代​​码中。

我尝试了各种排列

{-# ANN X04PatMatTest "HLint: ignore Warning: Use string literal" #-}

就像将编译指示作为文件的第一行，在模块声明之后，名称为 module而不是 X04... ，更改 Warning至 warn ...

什么是魔法？

Answer 1

您需要以另一种方式编写编译指示。经过一些试验和错误，我想出了以下内容:

module Test where

import Data.Char(toUpper)

{-# ANN module "HLint: ignore Use string literal" #-}
main :: IO ()
main = putStrLn ['a','b','c']

注意你必须写 "module"而不是模块的名称