New test.
[mono.git] / mono / metadata / security.c
index 771eb548bab0550f96b39747a377c8646be47064..9004f38233b30d11d2b654ca6deafc412139ae95 100644 (file)
@@ -427,7 +427,7 @@ ves_icall_System_Security_Principal_WindowsIdentity_GetRoles (gpointer token)
 
                                if (uniname) {
                                        MonoString *str = mono_string_new_utf16 (domain, uniname, size);
-                                       mono_array_set (array, MonoString *, i, str);
+                                       mono_array_setref (array, i, str);
                                        g_free (uniname);
                                }
                        }