X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fcompiler%2FHsVersions.h;h=4900e5663abbd9bd6b4339a9682c1c60131576ad;hb=9003a18c4efa4548ae80709aef9963f7b544ded3;hp=72c1185e09881aea555ccd157d0896ec6f288089;hpb=1181f398e73359a2e6387364b4fe270d4cc78f36;p=ghc-hetmet.git

diff --git a/ghc/compiler/HsVersions.h b/ghc/compiler/HsVersions.h
index 72c1185..4900e56 100644
--- a/ghc/compiler/HsVersions.h
+++ b/ghc/compiler/HsVersions.h
@@ -49,6 +49,7 @@ import qualified FastString
 # define USE_FAST_STRINGS 1
 # define FAST_STRING	FastString.FastString
 # define SLIT(x)	(FastString.mkFastCharString# (x#))
+# define FSLIT(x)	(FastString.mkFastString# (x#))
 # define _NULL_		FastString.nullFastString
 # define _NIL_		(FastString.mkFastString "")
 # define _CONS_		FastString.consFS