Merge pull request #3756 from henricm/named-pipe-alertable-on-windows
[mono.git] / mono / metadata / string-icalls.c
index dc5e9ec57c936470ad4871fd1f531e139a95e797..abbccd6a19a633dbb8d8f2b6a4cf4a7d3fd2fa3c 100644 (file)
@@ -7,6 +7,7 @@
  *
  * Copyright 2001-2003 Ximian, Inc (http://www.ximian.com)
  * Copyright 2004-2009 Novell, Inc (http://www.novell.com)
+ * Licensed under the MIT license. See LICENSE file in the project root for full license information.
  */
 #include <config.h>
 #include <stdlib.h>
@@ -38,7 +39,7 @@ ves_icall_System_String_InternalAllocateStr (gint32 length)
 {
        MonoError error;
        MonoString *str = mono_string_new_size_checked (mono_domain_get (), length, &error);
-       mono_error_raise_exception (&error);
+       mono_error_set_pending_exception (&error);
 
        return str;
 }
@@ -46,11 +47,12 @@ ves_icall_System_String_InternalAllocateStr (gint32 length)
 MonoString  *
 ves_icall_System_String_InternalIntern (MonoString *str)
 {
+       MonoError error;
        MonoString *res;
 
-       res = mono_string_intern(str);
+       res = mono_string_intern_checked (str, &error);
        if (!res) {
-               mono_set_pending_exception (mono_domain_get ()->out_of_memory_ex);
+               mono_error_set_pending_exception (&error);
                return NULL;
        }
        return res;
@@ -59,7 +61,7 @@ ves_icall_System_String_InternalIntern (MonoString *str)
 MonoString * 
 ves_icall_System_String_InternalIsInterned (MonoString *str)
 {
-       return mono_string_is_interned(str);
+       return mono_string_is_interned (str);
 }
 
 int