From d653c11d6445a9744d5cbd10c9f0ffbac9922a7d Mon Sep 17 00:00:00 2001
From: Brad Richardson <everythingfunctional@protonmail.com>
Date: Sun, 27 Sep 2020 15:25:13 -0500
Subject: Fix test build issue hapenning on Windows

---
 bootstrap/src/Build.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

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
-- 
cgit v1.2.3