Use "-RTS" w/ profiling to allow extra args #1772

commercialhaskell · Feb 10, 2016 · efcadef · efcadef
1 parent 86954bc
commit efcadef
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/Stack/Options.hs b/src/Stack/Options.hs
@@ -109,7 +109,7 @@ buildOptsParser cmd =
                   | otherwise = opts
                   where bopts = boptsBenchmarkOpts opts
                         topts = boptsTestOpts opts
-                        additionalArgs = "+RTS" : catMaybes [trac, prof]
+                        additionalArgs = "+RTS" : catMaybes [trac, prof, Just "-RTS"]
                         trac = if tracing
                                   then Just "-xc"
                                   else Nothing