(ves_exec_method): use stackval_to_data as pointed out by lupus

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

diff --git a/mono/interpreter/ChangeLog b/mono/interpreter/ChangeLog
index 0c2b0baffcd07a76cc8e01953bee315638ed4446..86effec7b4e2e8314bf0f591963222b5346412f3 100644 (file)
--- a/mono/interpreter/ChangeLog
+++ b/mono/interpreter/ChangeLog
@@ -1,6 +1,7 @@
 2002-05-20  Radek Doulik  <rodo@ximian.com>
 
        * interp.c (dump_stack): print boxed values for --noptr
+       (ves_exec_method): use stackval_to_data as pointed out by lupus
 
 2002-05-17  Radek Doulik  <rodo@ximian.com>
 

diff --git a/mono/interpreter/interp.c b/mono/interpreter/interp.c
index 99f5e417b944ba8478f2f0451626f5289f98eb63..d6ed34ffc35d50556947595983834b658188fbd5 100644 (file)
--- a/mono/interpreter/interp.c
+++ b/mono/interpreter/interp.c
@@ -2899,8 +2899,12 @@ array_constructed:
                        sp [-1].type = VAL_OBJ;
                        if (class->byval_arg.type == MONO_TYPE_VALUETYPE && !class->enumtype) 
                                sp [-1].data.p = mono_value_box (domain, class, sp [-1].data.p);
-                       else
+                       else {
+#if G_BYTE_ORDER != G_LITTLE_ENDIAN
+                               stackval_to_data (&class->byval_arg, &sp [-1], (char*)&sp [-1]);
+#endif
                                sp [-1].data.p = mono_value_box (domain, class, &sp [-1]);
+                       }
                        /* need to vt_free (sp); */
 
                        ip += 4;