diff options
author | LKedward <laurence.kedward@bristol.ac.uk> | 2020-09-28 09:40:24 +0100 |
---|---|---|
committer | LKedward <laurence.kedward@bristol.ac.uk> | 2020-09-28 09:40:24 +0100 |
commit | 0fde6016d381466e33e4f4ba9281ed11e72d0cb8 (patch) | |
tree | ac7a139625db21879508d1e0c8ca4b596a9b5675 /bootstrap | |
parent | e04de5a30490e4c9efb38cda424fe30c164c1eb9 (diff) | |
parent | 90ddc6fe0a718737ab085493401b1c5277913449 (diff) | |
download | fpm-0fde6016d381466e33e4f4ba9281ed11e72d0cb8.tar.gz fpm-0fde6016d381466e33e4f4ba9281ed11e72d0cb8.zip |
Merge remote-tracking branch 'upstream/master' into auto-discovery
Diffstat (limited to 'bootstrap')
-rw-r--r-- | bootstrap/src/Build.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/bootstrap/src/Build.hs b/bootstrap/src/Build.hs index ffbf264..cdcbb02 100644 --- a/bootstrap/src/Build.hs +++ b/bootstrap/src/Build.hs @@ -259,7 +259,7 @@ createSourceToObjectMap buildDirectory libraryDirectory sourceFile = sourceFileToObjectFile :: FilePath -> FilePath -> FilePath -> FilePath sourceFileToObjectFile buildDirectory libraryDirectory sourceFile = - buildDirectory + (foldl (</>) "" $ splitDirectories buildDirectory) </> map toLower (pathSeparatorsToUnderscores |