aboutsummaryrefslogtreecommitdiff
path: root/src
diff options
context:
space:
mode:
authorBrad Richardson <brichardson@structint.com>2020-07-08 11:24:41 -0700
committerBrad Richardson <brichardson@structint.com>2020-07-08 11:24:41 -0700
commitb86c74bef761ec48ff17cf043a26b11b9bf3954b (patch)
tree593bd73ae01bfbc06fe485ce0e36aa15d61390a5 /src
parent572bd33f918f3d5ce48ee482cf90ce49c6888199 (diff)
downloadfpm-b86c74bef761ec48ff17cf043a26b11b9bf3954b.tar.gz
fpm-b86c74bef761ec48ff17cf043a26b11b9bf3954b.zip
Fix bug with case in program source file name.
Diffstat (limited to 'src')
-rw-r--r--src/Build.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/Build.hs b/src/Build.hs
index 67ec2f9..ffbf264 100644
--- a/src/Build.hs
+++ b/src/Build.hs
@@ -120,7 +120,7 @@ buildProgram programDirectory libraryDirectories sourceExtensions buildDirectory
need allObjectFiles
need archives
cmd compiler allObjectFiles archives ["-o", executable] flags
- buildDirectory </> programSource -<.> "o" %> \objectFile -> do
+ buildDirectory </> (map toLower programSource) -<.> "o" %> \objectFile -> do
let realObjectFile = foldl (</>) "" $ splitDirectories objectFile
let sourceFile = programDirectory </> programSource
need [sourceFile]