Re: DynFlags.lhs
Ian Lynagh <[email protected]>
| Newsgroups | gmane.comp.lang.haskell.cvs.ghc |
|---|---|
| Message-ID | <[email protected]> |
On Wed, Sep 19, 2012 at 07:28:23AM +0000, Simon Peyton-Jones wrote:
> | > Somehow compiling DynFlags.lhs has started taking a very long time, and
> | generates lots of code. I have not had time to investigate, but if anyone has any
> | idea what is happening I'd be happy to know.
> |
> | I've added some more stuff to it recently. In particular, a large type:
> | includes/dist-derivedconstants/header/GHCConstantsHaskellType.hs
It's mostly the Read instance, but partly the Show instance, of the
type. I've attached a simple example with just a Read instance;
compiling with
ghc -O -c W2.hs
takes a while.
--
Ian Lynagh, Haskell Consultant
Well-Typed LLP, http://www.well-typed.com/
_______________________________________________
Cvs-ghc mailing list
[email protected]
http://www.haskell.org/mailman/listinfo/cvs-ghc
W2.hs
(text/x-haskell, 6.2 KB)
module W2 (DT(..)) where
data DT = DT {
field1 :: Int
, field2 :: Int
, field3 :: Int
, field4 :: Int
, field5 :: Int
, field6 :: Int
, field7 :: Int
, field8 :: Int
, field9 :: Int
, field10 :: Int
, field11 :: Int
, field12 :: Int
, field13 :: Int
, field14 :: Int
, field15 :: Int
, field16 :: Int
, field17 :: Int
, field18 :: Int
, field19 :: Int
, field20 :: Int
, field21 :: Int
, field22 :: Int
, field23 :: Int
, field24 :: Int
, field25 :: Int
, field26 :: Int
, field27 :: Int
, field28 :: Int
, field29 :: Int
, field30 :: Int
, field31 :: Int
, field32 :: Int
, field33 :: Int
, field34 :: Int
, field35 :: Int
, field36 :: Int
, field37 :: Int
, field38 :: Int
, field39 :: Int
, field40 :: Int
, field41 :: Int
, field42 :: Int
, field43 :: Int
, field44 :: Int
, field45 :: Int
, field46 :: Int
, field47 :: Int
, field48 :: Int
, field49 :: Int
, field50 :: Int
, field51 :: Int
, field52 :: Int
, field53 :: Int
, field54 :: Int
, field55 :: Int
, field56 :: Int
, field57 :: Int
, field58 :: Int
, field59 :: Int
, field60 :: Int
, field61 :: Int
, field62 :: Int
, field63 :: Int
, field64 :: Int
, field65 :: Int
, field66 :: Int
, field67 :: Int
, field68 :: Int
, field69 :: Int
, field70 :: Int
, field71 :: Int
, field72 :: Int
, field73 :: Int
, field74 :: Int
, field75 :: Int
, field76 :: Int
, field77 :: Int
, field78 :: Int
, field79 :: Int
, field80 :: Int
, field81 :: Int
, field82 :: Int
, field83 :: Int
, field84 :: Int
, field85 :: Int
, field86 :: Int
, field87 :: Int
, field88 :: Int
, field89 :: Int
, field90 :: Int
, field91 :: Int
, field92 :: Int
, field93 :: Int
, field94 :: Int
, field95 :: Int
, field96 :: Int
, field97 :: Int
, field98 :: Int
, field99 :: Int
, field100 :: Int
, field101 :: Int
, field102 :: Int
, field103 :: Int
, field104 :: Int
, field105 :: Int
, field106 :: Int
, field107 :: Int
, field108 :: Int
, field109 :: Int
, field110 :: Int
, field111 :: Int
, field112 :: Int
, field113 :: Int
, field114 :: Int
, field115 :: Int
, field116 :: Int
, field117 :: Int
, field118 :: Int
, field119 :: Int
, field120 :: Int
, field121 :: Int
, field122 :: Int
, field123 :: Int
, field124 :: Int
, field125 :: Int
, field126 :: Int
, field127 :: Int
, field128 :: Int
, field129 :: Int
, field130 :: Int
, field131 :: Int
, field132 :: Int
, field133 :: Int
, field134 :: Int
, field135 :: Int
, field136 :: Int
, field137 :: Int
, field138 :: Int
, field139 :: Int
, field140 :: Int
, field141 :: Int
, field142 :: Int
, field143 :: Int
, field144 :: Int
, field145 :: Int
, field146 :: Int
, field147 :: Int
, field148 :: Int
, field149 :: Int
, field150 :: Int
, field151 :: Int
, field152 :: Int
, field153 :: Int
, field154 :: Int
, field155 :: Int
, field156 :: Int
, field157 :: Int
, field158 :: Int
, field159 :: Int
, field160 :: Int
, field161 :: Int
, field162 :: Int
, field163 :: Int
, field164 :: Int
, field165 :: Int
, field166 :: Int
, field167 :: Int
, field168 :: Int
, field169 :: Int
, field170 :: Int
, field171 :: Int
, field172 :: Int
, field173 :: Int
, field174 :: Int
, field175 :: Int
, field176 :: Int
, field177 :: Int
, field178 :: Int
, field179 :: Int
, field180 :: Int
, field181 :: Int
, field182 :: Int
, field183 :: Int
, field184 :: Int
, field185 :: Int
, field186 :: Int
, field187 :: Int
, field188 :: Int
, field189 :: Int
, field190 :: Int
, field191 :: Int
, field192 :: Int
, field193 :: Int
, field194 :: Int
, field195 :: Int
, field196 :: Int
, field197 :: Int
, field198 :: Int
, field199 :: Int
, field200 :: Int
} deriving (Read)