Skip to content

Commit 127e3bb

Browse files
author
Richard Feldman
authored
Merge pull request #65 from antew/master
Add support for +RTS/-RTS flags from GHC
2 parents 1dfd51e + 40c832b commit 127e3bb

File tree

2 files changed

+16
-1
lines changed

2 files changed

+16
-1
lines changed

index.js

Lines changed: 3 additions & 1 deletion
Original file line numberDiff line numberDiff line change
@@ -187,6 +187,7 @@ function compilerArgsFromOptions(options, emitWarning) {
187187
case "warn": return ["--warn"];
188188
case "debug": return ["--debug"];
189189
case "docs": return ["--docs", value]
190+
case "runtimeOptions": return ["+RTS", value, "-RTS"]
190191
default:
191192
if (supportedOptions.indexOf(opt) === -1) {
192193
emitWarning('Unknown Elm compiler option: ' + opt);
@@ -206,5 +207,6 @@ module.exports = {
206207
compileWorker: require("./worker.js")(compile),
207208
compileToString: compileToString,
208209
compileToStringSync: compileToStringSync,
209-
findAllDependencies: findAllDependencies
210+
findAllDependencies: findAllDependencies,
211+
_prepareProcessArgs: prepareProcessArgs
210212
};

test/compile.js

Lines changed: 13 additions & 0 deletions
Original file line numberDiff line numberDiff line change
@@ -82,6 +82,19 @@ describe("#compileToString", function() {
8282
});
8383
});
8484

85+
it("adds runtime options as arguments", function () {
86+
var opts = {
87+
yes: true,
88+
verbose: true,
89+
cwd: fixturesDir,
90+
runtimeOptions: "-A128M -H128M -n8m"
91+
};
92+
93+
return expect(compiler
94+
._prepareProcessArgs("a.elm", opts)
95+
.join(" ")).to.equal("a.elm --yes +RTS -A128M -H128M -n8m -RTS");
96+
});
97+
8598
it("reports errors on bad syntax", function () {
8699
var opts = {
87100
yes: true,

0 commit comments

Comments
 (0)