diff options
| author | simonpj@microsoft.com <unknown> | 2009-10-29 12:01:55 +0000 |
|---|---|---|
| committer | simonpj@microsoft.com <unknown> | 2009-10-29 12:01:55 +0000 |
| commit | f96194794bf099020706c3816d1a5678b40addbb (patch) | |
| tree | 7290d705708527865d9d69056d40096e2389db45 /compiler/stgSyn | |
| parent | 016f155090557cd63f377b3ced95453bffd87d60 (diff) | |
| download | haskell-f96194794bf099020706c3816d1a5678b40addbb.tar.gz | |
Add Outputable.blankLine and use it
Diffstat (limited to 'compiler/stgSyn')
| -rw-r--r-- | compiler/stgSyn/StgLint.lhs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/stgSyn/StgLint.lhs b/compiler/stgSyn/StgLint.lhs index 21db424b43..cb08c40ba2 100644 --- a/compiler/stgSyn/StgLint.lhs +++ b/compiler/stgSyn/StgLint.lhs @@ -316,7 +316,7 @@ initL (LintM m) if isEmptyBag errs then Nothing else - Just (vcat (punctuate (text "") (bagToList errs))) + Just (vcat (punctuate blankLine (bagToList errs))) } instance Monad LintM where |