Merge branch 'master' of darcs.haskell.org:/srv/darcs//ghc
[ghc.git] / compiler / deSugar / Desugar.lhs
index ae9b0ec..8e72e1c 100644 (file)
@@ -112,7 +112,7 @@ deSugar hsc_env
 
                      let want_ticks = opt_Hpc
                                    || target == HscInterpreted
-                                   || (opt_SccProfilingOn
+                                   || (dopt Opt_SccProfilingOn dflags
                                        && case profAuto dflags of
                                             NoProfAuto -> False
                                             _          -> True)