LC_COLLATE.
authorJarkko Hietaniemi <jhi@alpha.hut.fi>
Mon, 7 Oct 1996 19:03:00 +0000 (22:03 +0300)
committerAndy Dougherty <doughera@lafcol.lafayette.edu>
Mon, 7 Oct 1996 19:03:00 +0000 (22:03 +0300)
Big patch to add, document, and test LC_COLLATE support.

setlocale() allowed one argument only,
call to perl_init_fold() (in util.c) if setlocale() succeeded.

ext/POSIX/POSIX.xs

index 69849b1..def5fb1 100644 (file)
@@ -2719,9 +2719,16 @@ localeconv()
        RETVAL
 
 char *
-setlocale(category, locale)
+setlocale(category, locale = 0)
        int             category
        char *          locale
+    CODE:
+       RETVAL = setlocale(category, locale);
+       if (RETVAL)
+           perl_init_fold();
+    OUTPUT:
+       RETVAL
+
 
 double
 acos(x)