haskell: HACK: fix indexing on ghc 9.10

Author: lf-

glean/hs/Glean/Query/Thrift/Internal.hs

@@ -47,7 +47,7 @@ import Data.IORef
 import qualified Data.Map as Map
 import Data.Maybe
 import Data.Proxy
-import Data.Text as Text
+import Data.Text as Text hiding (show)
 import qualified Data.Text.Encoding as Text
 import Compat.Prettyprinter hiding ((<>))
 import qualified Data.Vector as Vector

glean/lang/haskell/HieIndexer/Index.hs

@@ -144,6 +144,10 @@ toNamespace occ
   | GHC.isTvOcc occ = Hs.Namespace_tyvar
   | GHC.isTcOcc occ = Hs.Namespace_tycon
   | GHC.isDataOcc occ = Hs.Namespace_datacon
+#if MIN_VERSION_ghc(9,10,0)
+  -- TODO: this is definitely wrong lol
+  | GHC.isFieldOcc occ = Hs.Namespace_var_
+#endif
   | otherwise = error "toNamespace"
 
 isRecFieldRef :: RecFieldContext -> Bool