aboutsummaryrefslogtreecommitdiff
path: root/bootstrap/src/BuildModel.hs
diff options
context:
space:
mode:
Diffstat (limited to 'bootstrap/src/BuildModel.hs')
-rw-r--r--bootstrap/src/BuildModel.hs5
1 files changed, 4 insertions, 1 deletions
diff --git a/bootstrap/src/BuildModel.hs b/bootstrap/src/BuildModel.hs
index 9bc6b48..86dbeab 100644
--- a/bootstrap/src/BuildModel.hs
+++ b/bootstrap/src/BuildModel.hs
@@ -60,6 +60,7 @@ data Source =
data CompileTimeInfo = CompileTimeInfo {
compileTimeInfoSourceFileName :: FilePath
+ , compileTimeInfoObjectFileProduced :: FilePath
}
processRawSource :: RawSource -> Source
@@ -93,7 +94,9 @@ processRawSource rawSource =
constructCompileTimeInfo :: Source -> [Source] -> FilePath -> CompileTimeInfo
constructCompileTimeInfo program@(Program{}) otherSources buildDirectory =
CompileTimeInfo
- { compileTimeInfoSourceFileName = programSourceFileName program
+ { compileTimeInfoSourceFileName = programSourceFileName program
+ , compileTimeInfoObjectFileProduced = (programObjectFileName program)
+ buildDirectory
}
constructCompileTimeInfo _ otherSources buildDirectory = undefined