X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=compiler%2Fmain%2FDriverPipeline.hs;h=59f072197c8b47570f727bd6d75da01c8819cc27;hb=5ddee764beb312933256096d03df7c3ec47ac452;hp=fddeb6d50147544ca40d05ae561ba0f2af6e9fac;hpb=d5e97410a9d7309b53a8df78d69172d3b1592ba7;p=ghc-hetmet.git

diff --git a/compiler/main/DriverPipeline.hs b/compiler/main/DriverPipeline.hs
index fddeb6d..59f0721 100644
--- a/compiler/main/DriverPipeline.hs
+++ b/compiler/main/DriverPipeline.hs
@@ -880,6 +880,10 @@ runPhase cc_phase stop dflags basename suff input_fn get_output_fn maybe_loc
 		       ++ split_opt
 		       ++ include_paths
 		       ++ pkg_extra_cc_opts
+#ifdef HAVE_GCC_HAS_WRAPV
+                  -- We need consistent integer overflow (trac #952)
+               ++ ["-fwrapv"]
+#endif
 		       ))
 
 	return (next_phase, dflags, maybe_loc, output_fn)