X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=compiler%2FcoreSyn%2FCoreFVs.lhs;h=7b0f027f090652efd21023c08fb196f2ce43d23a;hb=d107207d57f6102f580578e7c168b7317b04b9c4;hp=57316c7211fa77a3c6fb159b523bd25da3db6fb1;hpb=8840bd9df7dad261444c3cfa1ffb5b83fd19917d;p=ghc-hetmet.git

diff --git a/compiler/coreSyn/CoreFVs.lhs b/compiler/coreSyn/CoreFVs.lhs
index 57316c7..7b0f027 100644
--- a/compiler/coreSyn/CoreFVs.lhs
+++ b/compiler/coreSyn/CoreFVs.lhs
@@ -30,8 +30,6 @@ module CoreFVs (
 	freeVarsOf		-- CoreExprWithFVs -> IdSet
     ) where
 
--- XXX This define is a bit of a hack, and should be done more nicely
-#define FAST_STRING_NOT_NEEDED 1
 #include "HsVersions.h"
 
 import CoreSyn