diff --git a/ci/MakeConstraints.hs b/ci/MakeConstraints.hs
index e6b40dfecb59b22ac83973c278e8d2bde06b7adc..0e049b8ec789b53cfe128d769a87ddfc7b91e163 100644
--- a/ci/MakeConstraints.hs
+++ b/ci/MakeConstraints.hs
@@ -47,7 +47,9 @@ allowNewerPkgs = S.fromList
   , "Cabal"
   , "containers"
   , "deepseq"
-  , "text" ] `S.union` bootPkgs
+  , "text"
+  , "ghc-boot"
+  , "ghc-boot-th" ] `S.union` bootPkgs
 
 constraints :: [String] -> Doc
 constraints constraints =