Add exceptions to the restricted function hint.

Author: peterwicksstringfield

ghcide/.hlint.yaml

@@ -114,9 +114,9 @@
   # Things that are unsafe in Haskell base library
   - {name: unsafeInterleaveIO, within: []}
   - {name: unsafeDupablePerformIO, within: []}
-  - {name: unsafeCoerce, within: []}
+  - {name: unsafeCoerce, within: [Ide.Plugin.Eval.Code]}
   # Things that are a bit dangerous in the GHC API
-  - {name: nameModule, within: []}
+  - {name: nameModule, within: [Compat.HieBin]}
 
 # Add custom hints for this project
 #

plugins/hls-eval-plugin/src/Ide/Plugin/Eval/Code.hs

@@ -80,8 +80,6 @@ asStmts (Example e _) = NE.toList e
 asStmts (Property t _) =
     ["prop11 = " ++ t, "(propEvaluation prop11 :: IO String)"]
 
-{- HLINT ignore evalExpr "Avoid restricted function" -}
-
 -- |Evaluate an expression (either a pure expression or an IO a)
 evalExpr :: GhcMonad m => [Char] -> m String
 evalExpr e = do