[project @ 2000-05-29 01:14:15 by panne]

Backed out previous commit, the change was at the completely wrong place.
*please merge*

diff --git a/ghc/compiler/basicTypes/Literal.lhs b/ghc/compiler/basicTypes/Literal.lhs
index f373181..016cc8e 100644 (file)
--- a/ghc/compiler/basicTypes/Literal.lhs
+++ b/ghc/compiler/basicTypes/Literal.lhs
@@ -285,7 +285,6 @@ pprLit lit
                 | otherwise  -> ptext SLIT("__addr") <+> integer p
 
       MachLitLit s ty | code_style  -> ptext s
-                     | iface_style -> ptext SLIT("__litlit") <+> pprFSAsString s
                      | otherwise   -> parens (hsep [ptext SLIT("__litlit"), 
                                                     pprFSAsString s,
                                                     pprParendType ty])