Setup.hs: remove useless stuff

2016-09-03 14:03:00 +02:00
parent 8be4cdfe5f
commit c80706cbb5
2 changed files with 1 additions and 152 deletions
--- a/SetupCompat.hs
+++ b/SetupCompat.hs
@@ -54,13 +54,10 @@ $(ifelsedefD "componentsConfigs" [d|
   fst3 (x,_,_) = x

   sameKind CLibName CLibName = True
-   sameKind CLibName _ = False
   sameKind (CExeName _) (CExeName _) = True
-   sameKind (CExeName _) _ = False
   sameKind (CTestName _) (CTestName _) = True
-   sameKind (CTestName _) _ = False
   sameKind (CBenchName _) (CBenchName _) = True
-   sameKind (CBenchName _) _ = False
+   sameKind _ _ = False

   setClbis [(CLibName, clbi, _)] =
       get >>= \lbi ->