More undecidable fixes.

Signed-off-by: Edward Z. Yang <[email protected]>
haskell · Aug 4, 2016 · c2399c3 · c2399c3
1 parent 1b73d02
commit c2399c3
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/cabal-install/Distribution/Client/InstallPlan.hs b/cabal-install/Distribution/Client/InstallPlan.hs
@@ -214,7 +214,7 @@ mkInstallPlan index indepGoals =
 internalError :: String -> a
 internalError msg = error $ "InstallPlan: internal error: " ++ msg
 
-instance (IsUnit ipkg, IsUnit srcpkg,
+instance (IsNode ipkg, Key ipkg ~ UnitId, IsNode srcpkg, Key srcpkg ~ UnitId,
           Binary ipkg, Binary srcpkg)
        => Binary (GenericInstallPlan ipkg srcpkg) where
     put GenericInstallPlan {