GitHub/lua
1
0
Fork 0
mirror of https://github.com/lua/lua.git synced 2025-01-14 05:43:00 +08:00
Code Issues Projects Releases Wiki Activity

category for "setlocale" is given by name

Browse Source
This commit is contained in:
Roberto Ierusalimschy 1998-06-18 14:04:28 -03:00
parent c9902be294
commit 955a811aa1
1 changed files with 5 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
liolib.c
View File

@ -1,5 +1,5 @@
/* /*
** $Id: liolib.c,v 1.19 1998/06/02 21:20:54 roberto Exp roberto $ ** $Id: liolib.c,v 1.20 1998/06/05 22:17:44 roberto Exp roberto $
** Standard I/O (and system) library ** Standard I/O (and system) library
** See Copyright Notice in lua.h ** See Copyright Notice in lua.h
*/ */
@ -326,8 +326,10 @@ static void setloc (void)
{ {
static int cat[] = {LC_ALL, LC_COLLATE, LC_CTYPE, LC_MONETARY, LC_NUMERIC, static int cat[] = {LC_ALL, LC_COLLATE, LC_CTYPE, LC_MONETARY, LC_NUMERIC,
LC_TIME}; LC_TIME};
int op = (int)luaL_opt_number(2, 0); static char *catnames[] = {"all", "collate", "ctype", "monetary",
luaL_arg_check(0 <= op && op <= 5, 2, "invalid option"); "numeric", "time", NULL};
int op = luaL_findstring(luaL_opt_string(2, "all"), catnames);
luaL_arg_check(op != -1, 2, "invalid option");
lua_pushstring(setlocale(cat[op], luaL_check_string(1))); lua_pushstring(setlocale(cat[op], luaL_check_string(1)));
} }