Revert "Remove deprecated functions from the ghci package"

This change force the bootstrap compiler to have ghc-internal.
As such it breaks our build with ghc 9.8.4. A better solution
would be to make this conditional on the ghc version in the
cabal file!

This reverts commit 2a88814.

Author: angerman

libraries/ghci/GHCi/CreateBCO.hs

@@ -6,6 +6,10 @@
 {-# LANGUAGE UnboxedTuples #-}
 {-# LANGUAGE RecordWildCards #-}
 {-# LANGUAGE CPP #-}
+{-# OPTIONS_GHC -Wno-warnings-deprecations #-}
+-- TODO We want to import GHC.Internal.Base (BCO, mkApUpd0#, newBCO#) instead
+-- of from GHC.Exts when we can require of the bootstrap compiler to have
+-- ghc-internal.
 
 --
 --  (c) The University of Glasgow 2002-2006
@@ -26,8 +30,7 @@ import Data.Array.Base
 import Foreign hiding (newArray)
 import Unsafe.Coerce (unsafeCoerce)
 import GHC.Arr          ( Array(..) )
-import GHC.Exts   hiding ( BCO, mkApUpd0#, newBCO# )
-import GHC.Internal.Base ( BCO, mkApUpd0#, newBCO# )
+import GHC.Exts
 import GHC.IO
 import Control.Exception ( ErrorCall(..) )
 

libraries/ghci/GHCi/TH.hs

@@ -1,6 +1,9 @@
 {-# LANGUAGE ScopedTypeVariables, StandaloneDeriving, DeriveGeneric,
     TupleSections, RecordWildCards, InstanceSigs, CPP #-}
 {-# OPTIONS_GHC -fno-warn-name-shadowing #-}
+{-# OPTIONS_GHC -Wno-warnings-deprecations #-}
+-- TODO We want to import GHC.Internal.Desugar instead of GHC.Desugar when we
+-- can require of the bootstrap compiler to have ghc-internal.
 
 -- |
 -- Running TH splices
@@ -109,7 +112,7 @@ import Data.IORef
 import Data.Map (Map)
 import qualified Data.Map as M
 import Data.Maybe
-import GHC.Internal.Desugar (AnnotationWrapper(..))
+import GHC.Desugar (AnnotationWrapper(..))
 import qualified GHC.Boot.TH.Syntax as TH
 import Unsafe.Coerce
 

libraries/ghci/ghci.cabal.in

@@ -86,7 +86,11 @@ library
         rts,
         array            == 0.5.*,
         base             >= 4.8 && < 4.23,
-        ghc-internal     >= 9.1001.0 && <=@[email protected],
+        -- ghc-internal     == @ProjectVersionForLib@.*
+        -- TODO: Use GHC.Internal.Desugar and GHC.Internal.Base from
+        -- ghc-internal instead of ignoring the deprecation warning in GHCi.TH
+        -- and GHCi.CreateBCO when we require ghc-internal of the bootstrap
+        -- compiler
         ghc-prim         >= 0.5.0 && < 0.14,
         binary           == 0.8.*,
         bytestring       >= 0.10 && < 0.13,