[svn:parrot] r48177 - in branches/gsoc_nfg: include/parrot src/string

[darbelo at svn.parrot.org]

Author: darbelo
Date: Sun Jul 25 23:44:16 2010
New Revision: 48177
URL: https://trac.parrot.org/parrot/changeset/48177

Log:
Remove an uncalled function.  Our uses of ICU don't need a data directory.

Modified:
   branches/gsoc_nfg/include/parrot/string_primitives.h
   branches/gsoc_nfg/src/string/primitives.c

Modified: branches/gsoc_nfg/include/parrot/string_primitives.h
==============================================================================
--- branches/gsoc_nfg/include/parrot/string_primitives.h	Sun Jul 25 23:43:58 2010	(r48176)
+++ branches/gsoc_nfg/include/parrot/string_primitives.h	Sun Jul 25 23:44:16 2010	(r48177)
@@ -29,11 +29,6 @@
         __attribute__nonnull__(1);
 
 PARROT_EXPORT
-void string_set_data_directory(PARROT_INTERP, ARGIN(const char *dir))
-        __attribute__nonnull__(1)
-        __attribute__nonnull__(2);
-
-PARROT_EXPORT
 Parrot_UInt4 string_unescape_one(PARROT_INTERP,
     ARGMOD(UINTVAL *offset),
     ARGIN(const STRING *string))
@@ -45,9 +40,6 @@
 #define ASSERT_ARGS_Parrot_char_digit_value __attribute__unused__ int _ASSERT_ARGS_CHECK = (0)
 #define ASSERT_ARGS_str_dup_remove_quotes __attribute__unused__ int _ASSERT_ARGS_CHECK = (\
        PARROT_ASSERT_ARG(old))
-#define ASSERT_ARGS_string_set_data_directory __attribute__unused__ int _ASSERT_ARGS_CHECK = (\
-       PARROT_ASSERT_ARG(interp) \
-    , PARROT_ASSERT_ARG(dir))
 #define ASSERT_ARGS_string_unescape_one __attribute__unused__ int _ASSERT_ARGS_CHECK = (\
        PARROT_ASSERT_ARG(interp) \
     , PARROT_ASSERT_ARG(offset) \

Modified: branches/gsoc_nfg/src/string/primitives.c
==============================================================================
--- branches/gsoc_nfg/src/string/primitives.c	Sun Jul 25 23:43:58 2010	(r48176)
+++ branches/gsoc_nfg/src/string/primitives.c	Sun Jul 25 23:44:16 2010	(r48177)
@@ -33,43 +33,6 @@
 
 /*
 
-=item C<void string_set_data_directory(PARROT_INTERP, const char *dir)>
-
-Set the directory where ICU finds its data files (encodings, locales,
-etc.).
-
-=cut
-
-*/
-
-PARROT_EXPORT
-void
-string_set_data_directory(PARROT_INTERP, ARGIN(const char *dir))
-{
-    ASSERT_ARGS(string_set_data_directory)
-#if PARROT_HAS_ICU
-    u_setDataDirectory(dir);
-
-    /* Since u_setDataDirectory doesn't have a result code, we'll spot
-       check that everything is okay by making sure that '9' had decimal
-       value 9. Using 57 rather than '9' so that the encoding of this
-       source code file isn't an issue.... (Don't want to get bitten by
-       EBCDIC.) */
-
-    if (!u_isdigit(57) || (u_charDigitValue(57) != 9))
-        Parrot_ex_throw_from_c_args(interp, NULL, EXCEPTION_ICU_ERROR,
-            "string_set_data_directory: ICU data files not found"
-            "(apparently) for directory [%s]", dir);
-#else
-    UNUSED(dir);
-
-    Parrot_ex_throw_from_c_args(interp, NULL, EXCEPTION_ICU_ERROR,
-        "string_set_data_directory: parrot compiled without ICU support");
-#endif
-}
-
-/*
-
 =item C<Parrot_UInt4 string_unescape_one(PARROT_INTERP, UINTVAL *offset, const
 STRING *string)>