Re: Text collation

[Kevin Ryde]

address@hidden (Ludovic Courtès) writes:
>
> +/* Throw an exception corresponding to error ERR.  */
> +static void inline
> +scm_locale_error (const char *func_name, int err)
> +{
> +  SCM s_err;
> +
> +  s_err = scm_from_int (err);
> +  scm_error (scm_system_error_key, func_name,
> +          "Failed to install locale",
> +          scm_cons (scm_strerror (s_err), SCM_EOL),
> +          scm_cons (s_err, SCM_EOL));
> +}

This doesn't display,

    <unnamed port>:3:1: In procedure string-locale<? in expression 
(string-locale<?
    "x" "y" ...):
    <unnamed port>:3:1: Failed to install locale
    Exception during displaying of error: misc-error
    ABORT: (system-error)

It'd be good if it was a standard SCM_SYSERROR and was detected on
creating a locale.

Incidentally, in the fallback code there seems to be something fishy
after a failed install.  If you try to use the offending locale object
a second time it succeeds.