alternate-number-format: relax __GLASGOW_HASKELL__ bounds

Author: wz1000

plugins/hls-alternate-number-format-plugin/src/Ide/Plugin/Literals.hs

@@ -14,7 +14,7 @@ module Ide.Plugin.Literals (
 import           Data.Maybe                    (maybeToList)
 import           Data.Text                     (Text)
 import qualified Data.Text                     as T
-#if __GLASGOW_HASKELL__ == 908
+#if __GLASGOW_HASKELL__ >= 908
 import qualified Data.Text.Encoding            as T
 #endif
 import           Development.IDE.GHC.Compat    hiding (getSrcSpan)
@@ -103,7 +103,7 @@ fromFractionalLit s fl@FL{fl_text} = fmap (\txt' -> FracLiteral (LiteralSrcSpan
 
 fromSourceText :: SourceText -> Maybe Text
 fromSourceText = \case
-#if __GLASGOW_HASKELL__ == 908
+#if __GLASGOW_HASKELL__ >= 908
   SourceText s -> Just $ T.decodeUtf8 $ bytesFS s
 #else
   SourceText s -> Just $ T.pack s

plugins/hls-explicit-fixity-plugin/test/Main.hs

@@ -34,7 +34,8 @@ tests = testGroup "Explicit fixity"
     , hoverTest "(<|>)" (Position 21 8) "infixl 3 `<|>`"
     , hoverTest "fixity define" (Position 23 11) "infixr 7 `>>:`"
     , hoverTest "record" (Position 28 10) "infix 9 `>>::`"
-    , hoverTest "wildcards" (Position 30 5) "infixr 7 `>>:`  \n  \ninfix 9 `>>::`"
+    , hoverTest "wildcards1" (Position 30 5) "infixr 7 `>>:`"
+    , hoverTest "wildcards2" (Position 30 5) "infix 9 `>>::`"
     , hoverTest "function" (Position 32 11) "infixl 1 `f`"
     , hoverTest "signature" (Position 35 2) "infixr 9 `>>>:`"
     , hoverTest "operator" (Position 36 2) "infixr 9 `>>>:`"