[commit: ghc] wip/nfs-locking: Remove Shake database on clean. (0bde9c1)

[git at git.haskell.org]

Repository : ssh://git@git.haskell.org/ghc

On branch  : wip/nfs-locking
Link       : http://ghc.haskell.org/trac/ghc/changeset/0bde9c13cd854c1297296a77be53ec7940045f71/ghc

>---------------------------------------------------------------

commit 0bde9c13cd854c1297296a77be53ec7940045f71
Author: Andrey Mokhov <andrey.mokhov at gmail.com>
Date:   Fri Jan 22 14:38:21 2016 +0000

    Remove Shake database on clean.
    
    See #131. [skip ci]


>---------------------------------------------------------------

0bde9c13cd854c1297296a77be53ec7940045f71
 src/Rules/Clean.hs | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/src/Rules/Clean.hs b/src/Rules/Clean.hs
index 2b4094a..eb7f8de 100644
--- a/src/Rules/Clean.hs
+++ b/src/Rules/Clean.hs
@@ -27,4 +27,6 @@ cleanRules = do
             forM_ [Stage0 ..] $ \stage -> do
                 let dir = pkgPath pkg -/- targetDirectory stage pkg
                 removeDirectoryIfExists dir
+        putBuild $ "| Remove the Shake database " ++ shakeFilesPath ++ "..."
+        removeFilesAfter shakeFilesPath ["//*"]
         putSuccess $ "| Done. "