2004-07-05 Zoltan Varga <vargaz@freemail.hu>

[mono.git] / mono / metadata / unicode.c

diff --git a/mono/metadata/unicode.c b/mono/metadata/unicode.c
index cb14f36788a53ae7dc71ca3bb15c17b6849b1afa..4b55fb58cf755db6ba75147bb59d7d4a06e5026a 100644 (file)
--- a/mono/metadata/unicode.c
+++ b/mono/metadata/unicode.c
@@ -15,7 +15,7 @@
 #include <mono/metadata/unicode.h>
 #include <mono/metadata/exception.h>
 
-static MonoUnicodeCategory catmap[] = {
+static const MonoUnicodeCategory catmap[] = {
        /* G_UNICODE_CONTROL = */              Control,
        /* G_UNICODE_FORMAT = */               Format,
        /* G_UNICODE_UNASSIGNED = */           OtherNotAssigned,
@@ -48,136 +48,3 @@ static MonoUnicodeCategory catmap[] = {
        /* G_UNICODE_SPACE_SEPARATOR = */      SpaceSeperator,
 };
 
-double 
-ves_icall_System_Char_GetNumericValue (gunichar2 c)
-{
-       MONO_ARCH_SAVE_REGS;
-
-       return (double)g_unichar_digit_value (c);
-}
-
-MonoUnicodeCategory 
-ves_icall_System_Char_GetUnicodeCategory (gunichar2 c)
-{
-       MONO_ARCH_SAVE_REGS;
-
-       return catmap [g_unichar_type (c)];
-}
-
-gboolean 
-ves_icall_System_Char_IsControl (gunichar2 c)
-{
-       MONO_ARCH_SAVE_REGS;
-
-       return g_unichar_iscntrl (c);
-}
-
-gboolean 
-ves_icall_System_Char_IsDigit (gunichar2 c)
-{
-       MONO_ARCH_SAVE_REGS;
-
-       return g_unichar_isdigit (c);
-}
-
-gboolean 
-ves_icall_System_Char_IsLetter (gunichar2 c)
-{
-       MONO_ARCH_SAVE_REGS;
-
-       return g_unichar_isalpha (c);
-}
-
-gboolean 
-ves_icall_System_Char_IsLower (gunichar2 c)
-{
-       MONO_ARCH_SAVE_REGS;
-
-       return g_unichar_islower (c);
-}
-
-gboolean 
-ves_icall_System_Char_IsUpper (gunichar2 c)
-{
-       MONO_ARCH_SAVE_REGS;
-
-       return g_unichar_isupper (c);
-}
-
-gboolean 
-ves_icall_System_Char_IsNumber (gunichar2 c)
-{
-       GUnicodeType t = g_unichar_type (c);
-
-       MONO_ARCH_SAVE_REGS;
-
-       return t == G_UNICODE_DECIMAL_NUMBER ||
-               t == G_UNICODE_LETTER_NUMBER ||
-               t == G_UNICODE_OTHER_NUMBER;
-}
-
-gboolean 
-ves_icall_System_Char_IsPunctuation (gunichar2 c)
-{
-       MONO_ARCH_SAVE_REGS;
-
-       return g_unichar_ispunct (c);
-}
-
-gboolean 
-ves_icall_System_Char_IsSeparator (gunichar2 c)
-{
-       GUnicodeType t = g_unichar_type (c);
-
-       MONO_ARCH_SAVE_REGS;
-
-       return (t == G_UNICODE_LINE_SEPARATOR ||
-               t == G_UNICODE_PARAGRAPH_SEPARATOR ||
-               t == G_UNICODE_SPACE_SEPARATOR);
-}
-
-gboolean 
-ves_icall_System_Char_IsSurrogate (gunichar2 c)
-{
-       MONO_ARCH_SAVE_REGS;
-
-       return (g_unichar_type (c) == G_UNICODE_SURROGATE);
-}
-
-gboolean 
-ves_icall_System_Char_IsSymbol (gunichar2 c)
-{
-       GUnicodeType t = g_unichar_type (c);
-
-       MONO_ARCH_SAVE_REGS;
-
-       return (t == G_UNICODE_CURRENCY_SYMBOL ||
-               t == G_UNICODE_MODIFIER_SYMBOL ||
-               t == G_UNICODE_MATH_SYMBOL ||
-               t == G_UNICODE_OTHER_SYMBOL);
-}
-
-gboolean 
-ves_icall_System_Char_IsWhiteSpace (gunichar2 c)
-{
-       MONO_ARCH_SAVE_REGS;
-
-       return g_unichar_isspace (c);
-}
-
-gunichar2
-ves_icall_System_Char_ToLower (gunichar2 c)
-{
-       MONO_ARCH_SAVE_REGS;
-
-       return g_unichar_tolower (c);
-}
-
-gunichar2
-ves_icall_System_Char_ToUpper (gunichar2 c)
-{
-       MONO_ARCH_SAVE_REGS;
-
-       return g_unichar_toupper (c);
-}
-