diff --git a/src/Stack/Build/Execute.hs b/src/Stack/Build/Execute.hs
index f751165547..8a05f07fd9 100644
--- a/src/Stack/Build/Execute.hs
+++ b/src/Stack/Build/Execute.hs
@@ -2044,7 +2044,7 @@ singleBuild
                      (packageBuildType package == C.Simple)
                      (displayException err)
         _ -> pure ()
-      when hasLibrary $ cabal KeepTHLoading ["register"]
+      when (hasLibrary || hasInternalLibrary) $ cabal KeepTHLoading ["register"]
 
     -- copy ddump-* files
     case T.unpack <$> boptsDdumpDir eeBuildOpts of