[project @ 2004-03-23 10:03:18 by simonmar]
[ghc-hetmet.git] / ghc / compiler / HsVersions.h
index 853e586..ff6e5ae 100644 (file)
@@ -52,6 +52,12 @@ name = Util.global (value) :: IORef (ty); \
 {-# NOINLINE name #-}
 #endif
 
+#if __GLASGOW_HASKELL__ >= 620
+#define UNBOX_FIELD !!
+#else
+#define UNBOX_FIELD !
+#endif
+
 #define COMMA ,
 
 #ifdef DEBUG