X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=compiler%2Futils%2FEncoding.hs;h=c790f386a4bc9a51996e935f5c8e967a83c63144;hb=9ffadf219cbc4f8ec57264786df936a3cee88aec;hp=2943768d56a607b85b69a4e9c7492d081a1ab255;hpb=947c866a3e655c61ed0d5f3dd1f10e4ecb4c2848;p=ghc-hetmet.git

diff --git a/compiler/utils/Encoding.hs b/compiler/utils/Encoding.hs
index 2943768..c790f38 100644
--- a/compiler/utils/Encoding.hs
+++ b/compiler/utils/Encoding.hs
@@ -1,3 +1,7 @@
+{-# OPTIONS_GHC -O #-}
+-- We always optimise this, otherwise performance of a non-optimised
+-- compiler is severely affected
+
 -- -----------------------------------------------------------------------------
 --
 -- (c) The University of Glasgow, 1997-2006
@@ -23,7 +27,6 @@ module Encoding (
 	zDecodeString
   ) where
 
-#define COMPILING_FAST_STRING
 #include "HsVersions.h"
 import Foreign
 import Data.Char	( ord, chr, isDigit, digitToInt, intToDigit,