[project @ 2002-04-11 12:03:29 by simonpj]
[ghc-hetmet.git] / ghc / compiler / HsVersions.h
index 72c1185..4900e56 100644 (file)
@@ -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