summaryrefslogtreecommitdiff
path: root/hadrian/src/Rules/Clean.hs
diff options
context:
space:
mode:
authorBen Gamari <ben@smart-cactus.org>2020-10-17 16:05:57 -0400
committerMarge Bot <ben+marge-bot@smart-cactus.org>2020-10-27 14:02:00 -0400
commitf3d8ab2ef6ffe30ec91c795e0223392dd96ea61a (patch)
treef73fa4af01f01eab917775d8e8df910872bb21b3 /hadrian/src/Rules/Clean.hs
parent4950dd075ce79e13d24362d669e134ed5a4ddec7 (diff)
downloadhaskell-f3d8ab2ef6ffe30ec91c795e0223392dd96ea61a.tar.gz
build system: Clean mingw tarballs
Tamar noticed in !4293 that the build systems fail to clean up the mingw tarballs directory (`ghc-tarballs`). Fix this in both the make build system and Hadrian.
Diffstat (limited to 'hadrian/src/Rules/Clean.hs')
-rw-r--r--hadrian/src/Rules/Clean.hs5
1 files changed, 5 insertions, 0 deletions
diff --git a/hadrian/src/Rules/Clean.hs b/hadrian/src/Rules/Clean.hs
index abf6933b56..48c1cb616f 100644
--- a/hadrian/src/Rules/Clean.hs
+++ b/hadrian/src/Rules/Clean.hs
@@ -18,6 +18,11 @@ cleanSourceTree = do
forM_ [Stage0 ..] $ removeDirectory . (path -/-) . stageString
removeDirectory "sdistprep"
cleanFsUtils
+ cleanMingwTarballs
+
+cleanMingwTarballs :: Action ()
+cleanMingwTarballs = do
+ liftIO $ IO.removeDirectoryRecursive "ghc-tarballs"
-- Clean all temporary fs files copied by configure into the source folder
cleanFsUtils :: Action ()