Add special case for ghc 8.2.2

Author: fendor

test/unit/GhcModPluginSpec.hs

@@ -478,6 +478,9 @@ ghcmodSpec =
               , (Range (toPos (33, 15)) (toPos (33, 19)), "Test -> String")
               , (Range (toPos (33, 15)) (toPos (33, 19)), "[Test] -> ShowS")
               , (Range (toPos (33, 15)) (toPos (33, 19)), "Int -> Test -> ShowS")
+#if __GLASGOW_HASKELL__ < 840
+              , (Range (toPos (33, 15)) (toPos (33, 19)), "[Test] -> ShowS")
+#endif
               ]
       testCommand testPlugins act "ghcmod" "type" arg res
 
@@ -493,6 +496,9 @@ ghcmodSpec =
               , (Range (toPos (33, 21)) (toPos (33, 23)), "Test -> Test -> Bool")
               , (Range (toPos (33, 21)) (toPos (33, 23)), "Test -> Test -> Bool")
               , (Range (toPos (33, 21)) (toPos (33, 23)), "Test -> Test -> Bool")
+#if __GLASGOW_HASKELL__ < 840
+              , (Range (toPos (33, 21)) (toPos (33, 23)), "Test -> Test -> Bool")
+#endif
               ]
       testCommand testPlugins act "ghcmod" "type" arg res