X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=compiler%2Fmain%2FTidyPgm.lhs;h=64f3498ad422aa5c8e76584d091a51b3f4366669;hp=ca021222dae6bd078c0f19729168abc15d645315;hb=30c122df62ec75f9ed7f392f24c2925675bf1d06;hpb=7c7104a51d477c18f8950112c4bc22c4800367f3

diff --git a/compiler/main/TidyPgm.lhs b/compiler/main/TidyPgm.lhs
index ca02122..64f3498 100644
--- a/compiler/main/TidyPgm.lhs
+++ b/compiler/main/TidyPgm.lhs
@@ -45,9 +45,6 @@ import FastBool hiding ( fastOr )
 import Data.List	( partition )
 import Data.Maybe	( isJust )
 import Data.IORef	( IORef, readIORef, writeIORef )
-
-_dummy :: FS.FastString
-_dummy = FSLIT("")
 \end{code}