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 /compiler/GHC/Driver/Main.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 'compiler/GHC/Driver/Main.hs')
| -rw-r--r-- | compiler/GHC/Driver/Main.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/compiler/GHC/Driver/Main.hs b/compiler/GHC/Driver/Main.hs index 5ca7487c27..8fcb687822 100644 --- a/compiler/GHC/Driver/Main.hs +++ b/compiler/GHC/Driver/Main.hs @@ -250,6 +250,7 @@ import GHC.Utils.Outputable import GHC.Utils.Misc import GHC.Utils.Logger import GHC.Utils.TmpFs +import GHC.Utils.Touch import GHC.Data.FastString import GHC.Data.Bag @@ -1263,7 +1264,7 @@ hscMaybeWriteIface logger dflags is_simple iface old_iface mod_location = do -- .hie files. let hie_file = ml_hie_file mod_location whenM (doesFileExist hie_file) $ - GHC.SysTools.touch logger dflags "Touching hie file" hie_file + GHC.Utils.Touch.touch hie_file else -- See Note [Strictness in ModIface] forceModIface iface |