init-locale ( -- )

Vocabulary

x11

Inputs

None

Outputs

None

Definition

USING: alien.c-types io kernel x11.xlib ;

IN: x11

: init-locale ( -- )
    LC_ALL "" setlocale
    [ "setlocale() failed" print flush ] unless
    XSupportsLocale c-bool>
    [ "XSupportsLocale() failed" print flush ] unless ;