diff options
author | Ben Gamari <ben@smart-cactus.org> | 2022-11-21 13:27:23 -0500 |
---|---|---|
committer | Ben Gamari <ben@smart-cactus.org> | 2022-11-21 13:27:23 -0500 |
commit | 3a56337be36496ae4c11eb9afff092ebc0283256 (patch) | |
tree | a8b461b6f7ac334a3d7a4e391265c22bdee8aaae /hadrian/src/Rules/Program.hs | |
parent | 451aeac3b07f171f148995717d0d9a1eefe08f0e (diff) | |
download | haskell-wip/drop-touch.tar.gz |
Drop dependence on `touch`wip/drop-touch
This drops GHC's dependence on the `touch` program, instead implementing
it within GHC. This eliminates an external dependency and means that we
have one fewer program to keep track of in the `configure` script
Diffstat (limited to 'hadrian/src/Rules/Program.hs')
-rw-r--r-- | hadrian/src/Rules/Program.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/hadrian/src/Rules/Program.hs b/hadrian/src/Rules/Program.hs index 71cccd628f..b0f42b3eae 100644 --- a/hadrian/src/Rules/Program.hs +++ b/hadrian/src/Rules/Program.hs @@ -105,7 +105,7 @@ buildProgram bin ctx@(Context{..}) rs = do (True, s) | s > stage0InTree -> do srcDir <- buildRoot <&> (-/- (stageString stage0InTree -/- "bin")) copyFile (srcDir -/- takeFileName bin) bin - (False, s) | s > stage0InTree && (package `elem` [touchy, unlit]) -> do + (False, s) | s > stage0InTree && (package `elem` [unlit]) -> do srcDir <- stageLibPath stage0InTree <&> (-/- "bin") copyFile (srcDir -/- takeFileName bin) bin _ -> buildBinary rs bin ctx |