wcscoll does not collate properly, even en_US

["A. Wilcox" <awilfox@adelielinux.org>]

[-- Attachment #1.1: Type: text/plain, Size: 1022 bytes --]

Hi.

My understanding is that musl does not want to support collation in
non-English languages (at least, not yet), but collation is supported in
American English.

glib's test suite is failing on musl now because the locale code is just
functional enough to make glib not skip the tests entirely (1.1.16
failed the 'setlocale is giving us the locale we set back' test), yet
collation doesn't work.  wcscoll is giving the same result as wcscmp.
This is wrong; a simple test case is attached.  Run on a glibc machine,
a FreeBSD machine, and a Solaris machine, it will output:

Amy
bug
cat
Gaz
Tom

On musl it (incorrectly) currently outputs:

Amy
Gaz
Tom
bug
cat

Does this mean my understanding was wrong and musl does not even support
AmE collation?  This is going to affect everything from `ls` to GUI file
managers like Dolphin or Nautilus to email software sorting by sender or
subject.

Regards,
--arw

-- 
A. Wilcox (awilfox)
Project Lead, Adélie Linux
http://adelielinux.org

[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #1.2: wcscoll-test.c --]
[-- Type: text/x-csrc; name="wcscoll-test.c", Size: 900 bytes --]

#include <locale.h>	/* setlocale */
#include <stdio.h>	/* wprintf */
#include <stdlib.h>	/* calloc, free, qsort, EXIT_* */
#include <string.h>	/* mbstowcs */
#include <wchar.h>	/* wcscoll */

static int my_collate(const void *p1, const void *p2)
{
	return wcscoll(*(const wchar_t **)p1, *(const wchar_t **)p2);
}

int main(void)
{
	char *loc;
	const char *stuff[5] = { "bug", "Amy", "Tom", "Gaz", "cat" };
	wchar_t *strs[5];
	setlocale(LC_ALL, "en_US.UTF-8");
	loc = setlocale(LC_ALL, NULL);
	if(loc == NULL || strcmp(loc, "en_US.UTF-8") != 0)
	{
		perror("setlocale");
		return EXIT_FAILURE;
	}

	for(int i = 0; i < 5; i++)
	{
		strs[i] = calloc(sizeof(wchar_t), 4);
		mbstowcs(strs[i], stuff[i], 3);
	}

	qsort(&strs, 5, sizeof(wchar_t *), my_collate);

	for(int i = 0; i < 5; i++)
	{
		wprintf(L"%ls\n", strs[i]);
		free(strs[i]);
	}
	return EXIT_SUCCESS;
}

[-- Attachment #2: OpenPGP digital signature --]
[-- Type: application/pgp-signature, Size: 819 bytes --]