diff options
| author | Ian Lynagh <igloo@earth.li> | 2012-06-14 16:20:06 +0100 |
|---|---|---|
| committer | Ian Lynagh <igloo@earth.li> | 2012-06-14 16:20:06 +0100 |
| commit | 46c184e101092c53e9675bcfcb90cf06e513368d (patch) | |
| tree | 0693a2cd2ee06773587e743f46c2fac51c52b42a /compiler/main/StaticFlags.hs | |
| parent | 0f3d8ab9f8c174f9aba5764a6b1edaf2c873b8c6 (diff) | |
| download | haskell-46c184e101092c53e9675bcfcb90cf06e513368d.tar.gz | |
Change -dppr-user-length from a static to a dynamic flag
Diffstat (limited to 'compiler/main/StaticFlags.hs')
| -rw-r--r-- | compiler/main/StaticFlags.hs | 4 |
1 files changed, 0 insertions, 4 deletions
diff --git a/compiler/main/StaticFlags.hs b/compiler/main/StaticFlags.hs index 4c78070930..06cf19dbac 100644 --- a/compiler/main/StaticFlags.hs +++ b/compiler/main/StaticFlags.hs @@ -27,7 +27,6 @@ module StaticFlags ( WayName(..), Way(..), v_Ways, isRTSWay, mkBuildTag, -- Output style options - opt_PprUserLength, opt_PprCols, opt_PprCaseAsLet, opt_PprStyle_Debug, opt_TraceLevel, @@ -276,9 +275,6 @@ opt_TraceLevel :: Int opt_TraceLevel = lookup_def_int "-dtrace-level" 1 -- Standard level is 1 -- Less verbose is 0 -opt_PprUserLength :: Int -opt_PprUserLength = lookup_def_int "-dppr-user-length" 5 --ToDo: give this a name - opt_Fuel :: Int opt_Fuel = lookup_def_int "-dopt-fuel" maxBound |