diff options
| author | Simon Peyton Jones <simonpj@microsoft.com> | 2013-03-01 17:55:07 +0000 |
|---|---|---|
| committer | Simon Peyton Jones <simonpj@microsoft.com> | 2013-03-01 17:55:07 +0000 |
| commit | 458c653a795ea06e7cbd24872e9961711f7044e8 (patch) | |
| tree | 20ff92004b77d45557e7c9377f04c2510d569550 | |
| parent | d3e7f0f37c7e020b41767e20bc344c683ae468a7 (diff) | |
| download | haskell-458c653a795ea06e7cbd24872e9961711f7044e8.tar.gz | |
Comment the fix to Trac #7702
| -rw-r--r-- | compiler/simplCore/CoreMonad.lhs | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/compiler/simplCore/CoreMonad.lhs b/compiler/simplCore/CoreMonad.lhs index 60123223ee..3afb8cdf5d 100644 --- a/compiler/simplCore/CoreMonad.lhs +++ b/compiler/simplCore/CoreMonad.lhs @@ -731,7 +731,9 @@ data CoreReader = CoreReader { } data CoreWriter = CoreWriter { - cw_simpl_count :: !SimplCount + cw_simpl_count :: !SimplCount + -- Making this strict fixes a nasty space leak + -- See Trac #7702 } emptyWriter :: DynFlags -> CoreWriter |