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)
@@ -72,7 +72,7 @@ getPattern (L (locA -> (RealSrcSpan patSpan _)) pat) = case pat of
         HsInt _ val   -> fromIntegralLit patSpan val
         HsRat _ val _ -> fromFractionalLit patSpan val
         _             -> Nothing
-#if __GLASGOW_HASKELL__ == 902
+#if __GLASGOW_HASKELL__ >= 902
     NPat _ (L (RealSrcSpan sSpan _) overLit) _ _ -> fromOverLit overLit sSpan
     NPlusKPat _ _ (L (RealSrcSpan sSpan _) overLit1) _ _ _ -> fromOverLit overLit1 sSpan
 #else
@@ -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