Repository : ssh://darcs.haskell.org//srv/darcs/ghc On branch : ghc-7.4
http://hackage.haskell.org/trac/ghc/changeset/902650db87f770a83c507a19f63d4e1a86fdad0f >--------------------------------------------------------------- commit 902650db87f770a83c507a19f63d4e1a86fdad0f Author: Manuel M T Chakravarty <[email protected]> Date: Mon Jan 16 12:58:42 2012 +1100 DataConIds need to be treated specially in VectInfo >--------------------------------------------------------------- compiler/main/TidyPgm.lhs | 2 +- 1 files changed, 1 insertions(+), 1 deletions(-) diff --git a/compiler/main/TidyPgm.lhs b/compiler/main/TidyPgm.lhs index 17e676a..51cfbed 100644 --- a/compiler/main/TidyPgm.lhs +++ b/compiler/main/TidyPgm.lhs @@ -513,7 +513,7 @@ tidyVectInfo (_, var_env) info@(VectInfo { vectInfoVar = vars tidy_var_v = lookup_var var_v , isExportedId tidy_var , isExportedId tidy_var_v - , not $ isImplicitId var + , isDataConWorkId var || not (isImplicitId var) ] tidy_scalarVars = mkVarSet [ lookup_var var _______________________________________________ Cvs-ghc mailing list [email protected] http://www.haskell.org/mailman/listinfo/cvs-ghc
