projects
/
ghc-hetmet.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
5da0e96
)
Fix multi-line string (minor glitch in stage-1 compiler)
author
simonpj@microsoft.com
<unknown>
Thu, 11 Nov 2010 13:45:03 +0000
(13:45 +0000)
committer
simonpj@microsoft.com
<unknown>
Thu, 11 Nov 2010 13:45:03 +0000
(13:45 +0000)
compiler/utils/Outputable.lhs
patch
|
blob
|
history
diff --git
a/compiler/utils/Outputable.lhs
b/compiler/utils/Outputable.lhs
index
d6f950a
..
e178e99
100644
(file)
--- a/
compiler/utils/Outputable.lhs
+++ b/
compiler/utils/Outputable.lhs
@@
-83,11
+83,11
@@
import System.FilePath
#if __GLASGOW_HASKELL__ >= 701
-import GHC.Show ( showMultiLineString )
+import GHC.Show ( showMultiLineString )
#else
showMultiLineString :: String -> [String]
-- Crude version
-showMultiLineString s = [s]
+showMultiLineString s = [ showList s "" ]
#endif
\end{code}