summaryrefslogtreecommitdiff
path: root/compiler/main/SysTools.lhs
diff options
context:
space:
mode:
authorChris Heller <hellertime@gmail.com>2014-01-02 16:55:52 -0500
committerAustin Seipp <austin@well-typed.com>2014-01-07 07:08:44 -0600
commit032969f7c7493d774958e65e61690bd2a995fbbc (patch)
tree01698c2e6b1a648487c480530409bfef6103ea31 /compiler/main/SysTools.lhs
parentd783f12dae2581d2feccf53a43fbf2d1a6fb6d05 (diff)
downloadhaskell-032969f7c7493d774958e65e61690bd2a995fbbc.tar.gz
Re-order preprocessor args to agree with User Guide (fixes #8602)
The section of the User Guide in reference is 4.12.4 Signed-off-by: Austin Seipp <austin@well-typed.com>
Diffstat (limited to 'compiler/main/SysTools.lhs')
-rw-r--r--compiler/main/SysTools.lhs2
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/main/SysTools.lhs b/compiler/main/SysTools.lhs
index 46f8a86234..d0545fd06e 100644
--- a/compiler/main/SysTools.lhs
+++ b/compiler/main/SysTools.lhs
@@ -395,7 +395,7 @@ runPp :: DynFlags -> [Option] -> IO ()
runPp dflags args = do
let prog = pgm_F dflags
opts = map Option (getOpts dflags opt_F)
- runSomething dflags "Haskell pre-processor" prog (opts ++ args)
+ runSomething dflags "Haskell pre-processor" prog (args ++ opts)
runCc :: DynFlags -> [Option] -> IO ()
runCc dflags args = do