diff --git a/ghc/compiler/basicTypes/Literal.lhs b/ghc/compiler/basicTypes/Literal.lhs
index f37318177c5e57974fb2e96dff8a1eae17ec93a0..016cc8e332abaf14dbcd90372c4d4360b2fb0e0c 100644
--- 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])