diff options
| author | ross <unknown> | 2003-06-03 09:41:51 +0000 |
|---|---|---|
| committer | ross <unknown> | 2003-06-03 09:41:51 +0000 |
| commit | 06e14415fa8aef5be7d01314d08fcd87873cd0da (patch) | |
| tree | b134799381191b998863467fb461a039023ddcea /ghc/compiler/stranal/StrictAnal.lhs | |
| parent | 56af76cc6a264621bfd18071f21e6a608e691e47 (diff) | |
| download | haskell-06e14415fa8aef5be7d01314d08fcd87873cd0da.tar.gz | |
[project @ 2003-06-03 09:41:48 by ross]
change trailing comments on #else/#endif lines to C style to avoid
warnings from gcc 3.3's preprocessor.
Diffstat (limited to 'ghc/compiler/stranal/StrictAnal.lhs')
| -rw-r--r-- | ghc/compiler/stranal/StrictAnal.lhs | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/ghc/compiler/stranal/StrictAnal.lhs b/ghc/compiler/stranal/StrictAnal.lhs index 13e18373b9..d143a15b86 100644 --- a/ghc/compiler/stranal/StrictAnal.lhs +++ b/ghc/compiler/stranal/StrictAnal.lhs @@ -461,7 +461,7 @@ pp_stats (SaStats tlam dlam tc dc tlet dlet) ptext SLIT("; Let vars: "), int (iBox dlet), char '/', int (iBox tlet) ] -#else {-OMIT_STRANAL_STATS-} +#else /* OMIT_STRANAL_STATS */ -- identity monad type SaM a = a @@ -475,7 +475,7 @@ tickLambda var = panic "OMIT_STRANAL_STATS: tickLambda" tickCases vars = panic "OMIT_STRANAL_STATS: tickCases" tickLet var = panic "OMIT_STRANAL_STATS: tickLet" -#endif {-OMIT_STRANAL_STATS-} +#endif /* OMIT_STRANAL_STATS */ mapSa :: (a -> SaM b) -> [a] -> SaM [b] |