X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=blobdiff_plain;f=compiler%2Fprofiling%2FSCCfinal.lhs;h=a254a08a38696644f1818f6c9dc29c99d7231043;hp=e4d199ccd69302b6988f0835f7b15584fb520953;hb=30c122df62ec75f9ed7f392f24c2925675bf1d06;hpb=7c7104a51d477c18f8950112c4bc22c4800367f3 diff --git a/compiler/profiling/SCCfinal.lhs b/compiler/profiling/SCCfinal.lhs index e4d199c..a254a08 100644 --- a/compiler/profiling/SCCfinal.lhs +++ b/compiler/profiling/SCCfinal.lhs @@ -25,8 +25,6 @@ This is now a sort-of-normal STG-to-STG pass (WDP 94/06), run by stg2stg. \begin{code} module SCCfinal ( stgMassageForProfiling ) 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 StgSyn