2010-05-31 Zoltan Varga <vargaz@gmail.com>

	* aot-compiler.c (patch_to_string): New debugging helper function.

svn path=/trunk/mono/; revision=158207

diff --git a/mono/mini/ChangeLog b/mono/mini/ChangeLog
index 639243b69df459d8c3c0d3efb4c7564b61fe604c..651f2fbf129a02de5000b28ef0824cadc6fddd1f 100755 (executable)
--- a/mono/mini/ChangeLog
+++ b/mono/mini/ChangeLog
@@ -1,3 +1,7 @@
+2010-05-31  Zoltan Varga  <vargaz@gmail.com>
+
+       * aot-compiler.c (patch_to_string): New debugging helper function.
+
 2010-05-30  Zoltan Varga  <vargaz@gmail.com>
 
        * exceptions-amd64.c (get_throw_trampoline): Fix the xdebug name of the corlib

diff --git a/mono/mini/aot-compiler.c b/mono/mini/aot-compiler.c
index 2811af7abdf728764c43f464d2ad65810fcc66c9..6d3e58520687c01007b8b0d387ed999b65280f63 100644 (file)
--- a/mono/mini/aot-compiler.c
+++ b/mono/mini/aot-compiler.c
@@ -1871,6 +1871,26 @@ compare_patches (gconstpointer a, gconstpointer b)
                return 0;
 }
 
+static G_GNUC_UNUSED char*
+patch_to_string (MonoJumpInfo *patch_info)
+{
+       GString *str;
+
+       str = g_string_new ("");
+
+       g_string_append_printf (str, "%s(", get_patch_name (patch_info->type));
+
+       switch (patch_info->type) {
+       case MONO_PATCH_INFO_VTABLE:
+               mono_type_get_desc (str, &patch_info->data.klass->byval_arg, TRUE);
+               break;
+       default:
+               break;
+       }
+       g_string_append_printf (str, ")");
+       return g_string_free (str, FALSE);
+}
+
 /*
  * is_plt_patch:
  *