diff --git a/gcc/ChangeLog b/gcc/ChangeLog
index 59e9c6553e9a..58498616ab22 100644
--- a/gcc/ChangeLog
+++ b/gcc/ChangeLog
@@ -1,3 +1,7 @@
+2011-12-16  Tristan Gingold  <gingold@adacore.com>
+
+	* config/alpha/vms.h (USE_TM_CLONE_REGISTRY): Define.
+
 2011-12-16  Tristan Gingold  <gingold@adacore.com>
 
 	* config/alpha/alpha.c (alpha_use_linkage): Follow transparent alias.
diff --git a/gcc/config/alpha/vms.h b/gcc/config/alpha/vms.h
index 32794c80368d..a84c15e063b4 100644
--- a/gcc/config/alpha/vms.h
+++ b/gcc/config/alpha/vms.h
@@ -23,6 +23,10 @@ along with GCC; see the file COPYING3.  If not see
    crtstuff.c and dealing with shared library initialization much easier.  */
 #define OBJECT_FORMAT_ELF
 
+/* Do not use TM clone registry as it currently doesn't work.  Alpha/VMS
+   object is too far from ELF for supporting TM out of the box.  */
+#define USE_TM_CLONE_REGISTRY 0
+
 /* This enables certain macros in alpha.h, which will make an indirect
    reference to an external symbol an invalid address.  This needs to be
    defined before we include alpha.h, since it determines which macros