PDCLIB-1 (PDCLIB-3) Make wide character classification/collation information locale...

[pdclib] / functions / wctype / towctrans.c

diff --git a/functions/wctype/towctrans.c b/functions/wctype/towctrans.c
index aea9b1a303ae28474e1d58435cdb917e7be91b91..f5f4a1dd38d2e3c49c1e8e91ee393695b648d116 100644 (file)
--- a/functions/wctype/towctrans.c
+++ b/functions/wctype/towctrans.c
@@ -9,16 +9,21 @@
 #include <string.h>\r
 #include <_PDCLIB_locale.h>\r
 \r
-wint_t towctrans( wint_t wc, wctrans_t trans )\r
+wint_t _PDCLIB_towctrans_l( wint_t wc, wctrans_t trans, locale_t l )\r
 {\r
     switch( trans ) {\r
         case 0:                         return wc;\r
-        case _PDCLIB_WCTRANS_TOLOWER:   return towlower( wc );\r
-        case _PDCLIB_WCTRANS_TOUPPER:   return towupper( wc );\r
+        case _PDCLIB_WCTRANS_TOLOWER:   return _PDCLIB_towlower_l( wc, l );\r
+        case _PDCLIB_WCTRANS_TOUPPER:   return _PDCLIB_towupper_l( wc, l );\r
         default: abort();\r
     }\r
 }\r
 \r
+wint_t towctrans( wint_t wc, wctrans_t trans )\r
+{\r
+    return _PDCLIB_towctrans_l( wc, trans, _PDCLIB_threadlocale() );\r
+}\r
+\r
 #endif\r
 \r
 #ifdef TEST\r