aboutsummaryrefslogtreecommitdiff
path: root/bootstrap/src
diff options
context:
space:
mode:
Diffstat (limited to 'bootstrap/src')
-rw-r--r--bootstrap/src/BuildModel.hs4
1 files changed, 2 insertions, 2 deletions
diff --git a/bootstrap/src/BuildModel.hs b/bootstrap/src/BuildModel.hs
index 87c45c7..711f977 100644
--- a/bootstrap/src/BuildModel.hs
+++ b/bootstrap/src/BuildModel.hs
@@ -5,7 +5,7 @@ data RawSource = RawSource {
, rawSourceContents :: String
}
-data Source = Program
+data Source = Program { programSourceFileName :: String}
processRawSource :: RawSource -> Source
-processRawSource _ = Program
+processRawSource rawSource = Program $ rawSourceFilename rawSource