diff options
| author | Brad Richardson <brichardson@structint.com> | 2020-07-08 11:24:41 -0700 |
|---|---|---|
| committer | Brad Richardson <brichardson@structint.com> | 2020-07-08 11:24:41 -0700 |
| commit | b86c74bef761ec48ff17cf043a26b11b9bf3954b (patch) | |
| tree | 593bd73ae01bfbc06fe485ce0e36aa15d61390a5 /src/Build.hs | |
| parent | 572bd33f918f3d5ce48ee482cf90ce49c6888199 (diff) | |
| download | fpm-b86c74bef761ec48ff17cf043a26b11b9bf3954b.tar.gz fpm-b86c74bef761ec48ff17cf043a26b11b9bf3954b.zip | |
Fix bug with case in program source file name.
Diffstat (limited to 'src/Build.hs')
| -rw-r--r-- | src/Build.hs | 2 |
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] |