Only run upgrade checks when building with a supporting LF version

digital-asset · Jul 10, 2024 · d3864b7 · d3864b7
1 parent 1ec643d
commit d3864b7
Showing 1 changed file with 4 additions and 3 deletions.
diff --git a/sdk/compiler/damlc/daml-compiler/src/DA/Daml/Compiler/Dar.hs b/sdk/compiler/damlc/daml-compiler/src/DA/Daml/Compiler/Dar.hs
@@ -151,9 +151,10 @@ buildDar service PackageConfigFields {..} ifDir dalfInput warnBadInterfaceInstan
                      Nothing -> mergePkgs pMeta lfVersion . map fst <$> usesE GeneratePackage files
                      Just _ -> generateSerializedPackage pName pVersion pMeta files
 
-                 MaybeT $
-                     runDiagnosticCheck $ diagsToIdeResult (toNormalizedFilePath' pSrc) $
-                         TypeChecker.Upgrade.checkUpgrade lfVersion pTypecheckUpgrades warnBadInterfaceInstances pkg mbUpgradedPackage
+                 when (lfVersion `LF.supports` LF.featurePackageUpgrades) $
+                     MaybeT $
+                         runDiagnosticCheck $ diagsToIdeResult (toNormalizedFilePath' pSrc) $
+                             TypeChecker.Upgrade.checkUpgrade lfVersion pTypecheckUpgrades warnBadInterfaceInstances pkg mbUpgradedPackage
                  MaybeT $ finalPackageCheck (toNormalizedFilePath' pSrc) pkg
 
                  let pkgModuleNames = map (Ghc.mkModuleName . T.unpack) $ LF.packageModuleNames pkg