diff --git a/ghc/compiler/HsVersions.h b/ghc/compiler/HsVersions.h
index 77e9a22baa73bf52a88d7587bb4a01a5e5e2db1a..a5159181735956821de142962180c13ff2e2f419 100644
--- a/ghc/compiler/HsVersions.h
+++ b/ghc/compiler/HsVersions.h
@@ -110,6 +110,10 @@ you will screw up the layout where they are used in case expressions!
 # define minInt (minBound::Int)
 # define maxInt (maxBound::Int)
 #else
+# define STATE_TOK(x)  (S# x)
+# define ST_RET(x,y)   (x,y)
+# define unsafePerformST(x) unsafePerformPrimIO(x)
+# define ST_TO_PrimIO(x) x
 # define SYN_IE(a) a(..)
 # define EXP_MODULE(a) a..
 # define IMPORT_DELOOPER(mod) import mod