X-Git-Url: https://pd.if.org/git/?a=blobdiff_plain;f=functions%2Fstring%2Fstrxfrm.c;h=c17d867f6381c4dc235d4670047fbf38eeaf8977;hb=d446b1531b82def47b9b684517a7c629c7400aab;hp=57a106f1aa1b79c8b585ca241a7c9acfe4d80295;hpb=d02f38605b53cdff5460cc6b9e1b2a80c3a2ba4c;p=pdclib

diff --git a/functions/string/strxfrm.c b/functions/string/strxfrm.c
index 57a106f..c17d867 100644
--- a/functions/string/strxfrm.c
+++ b/functions/string/strxfrm.c
@@ -1,7 +1,3 @@
-/* $Id$ */
-
-/* Release $Name$ */
-
 /* strxfrm( char *, const char *, size_t )
 
    This file is part of the Public Domain C Library (PDCLib).
@@ -12,16 +8,18 @@
 
 #ifndef REGTEST
 
-/* TODO: Dummy function, no locale support yet. */
+#include <locale.h>
+
 size_t strxfrm( char * _PDCLIB_restrict s1, const char * _PDCLIB_restrict s2, size_t n )
 {
+    const _PDCLIB_ctype_t * ctype = _PDCLIB_lconv.ctype;
     size_t len = strlen( s2 );
     if ( len < n )
     {
         /* Cannot use strncpy() here as the filling of s1 with '\0' is not part
            of the spec.
         */
-        while ( n-- && ( *s1++ = *s2++ ) );
+        while ( n-- && ( *s1++ = ctype[(unsigned char)*s2++].collation ) );
     }
     return len;
 }
@@ -29,7 +27,8 @@ size_t strxfrm( char * _PDCLIB_restrict s1, const char * _PDCLIB_restrict s2, si
 #endif
 
 #ifdef TEST
-#include <_PDCLIB_test.h>
+
+#include "_PDCLIB_test.h"
 
 int main( void )
 {
@@ -46,5 +45,5 @@ int main( void )
     TESTCASE( s[10] == '\0' );
     return TEST_RESULTS;
 }
-#endif
 
+#endif