diff --git a/src/Hadrian/Haskell/Cabal/Type.hs b/src/Hadrian/Haskell/Cabal/Type.hs
index 5aafa742c1..1383051c34 100644
--- a/src/Hadrian/Haskell/Cabal/Type.hs
+++ b/src/Hadrian/Haskell/Cabal/Type.hs
@@ -20,5 +20,4 @@ instance Binary Cabal
 instance Hashable Cabal where
     hashWithSalt salt = hashWithSalt salt . show
 
-instance NFData Cabal where
-    rnf (Cabal a b c d e f) = a `seq` b `seq` c `seq` d `seq` e `seq` f `seq` ()
+instance NFData Cabal
diff --git a/src/Rules.hs b/src/Rules.hs
index e226bfee12..e33f24bcf4 100644
--- a/src/Rules.hs
+++ b/src/Rules.hs
@@ -132,7 +132,3 @@ oracleRules = do
     Hadrian.Oracles.Path.pathOracle
     Hadrian.Oracles.TextFile.textFileOracle
     Oracles.ModuleFiles.moduleFilesOracle
-
--- programsStage1Only :: [Package]
--- programsStage1Only = [ deriveConstants, genapply, genprimopcode, ghc, ghcCabal
---                      , ghcPkg, hp2ps, hpc, hsc2hs, runGhc ]