aboutsummaryrefslogtreecommitdiff
path: root/ltests.c
diff options
context:
space:
mode:
authorRoberto Ierusalimschy <roberto@inf.puc-rio.br>2014-10-01 08:54:56 -0300
committerRoberto Ierusalimschy <roberto@inf.puc-rio.br>2014-10-01 08:54:56 -0300
commit798660c9cddef8a73f68058576e3d47eed2b1a27 (patch)
treea0aef60fd2f6910ea7ecf6be127f9035e9ce3e07 /ltests.c
parent34b6664dcb28b18ca3f08ed5e36da094b007eb7b (diff)
downloadlua-798660c9cddef8a73f68058576e3d47eed2b1a27.tar.gz
lua-798660c9cddef8a73f68058576e3d47eed2b1a27.tar.bz2
lua-798660c9cddef8a73f68058576e3d47eed2b1a27.zip
deprecated "cast macros" ('luaL_checkint', 'luaL_optint', etc.)
Diffstat (limited to 'ltests.c')
-rw-r--r--ltests.c18
1 files changed, 9 insertions, 9 deletions
diff --git a/ltests.c b/ltests.c
index efddc393..9057cde3 100644
--- a/ltests.c
+++ b/ltests.c
@@ -1,5 +1,5 @@
1/* 1/*
2** $Id: ltests.c,v 2.184 2014/09/01 17:58:55 roberto Exp roberto $ 2** $Id: ltests.c,v 2.185 2014/09/04 18:15:29 roberto Exp roberto $
3** Internal Module for Debugging of the Lua Implementation 3** Internal Module for Debugging of the Lua Implementation
4** See Copyright Notice in lua.h 4** See Copyright Notice in lua.h
5*/ 5*/
@@ -530,7 +530,7 @@ static int listk (lua_State *L) {
530 530
531static int listlocals (lua_State *L) { 531static int listlocals (lua_State *L) {
532 Proto *p; 532 Proto *p;
533 int pc = luaL_checkint(L, 2) - 1; 533 int pc = (int)luaL_checkinteger(L, 2) - 1;
534 int i = 0; 534 int i = 0;
535 const char *name; 535 const char *name;
536 luaL_argcheck(L, lua_isfunction(L, 1) && !lua_iscfunction(L, 1), 536 luaL_argcheck(L, lua_isfunction(L, 1) && !lua_iscfunction(L, 1),
@@ -659,7 +659,7 @@ static int stacklevel (lua_State *L) {
659 659
660static int table_query (lua_State *L) { 660static int table_query (lua_State *L) {
661 const Table *t; 661 const Table *t;
662 int i = luaL_optint(L, 2, -1); 662 int i = (int)luaL_optinteger(L, 2, -1);
663 luaL_checktype(L, 1, LUA_TTABLE); 663 luaL_checktype(L, 1, LUA_TTABLE);
664 t = hvalue(obj_at(L, 1)); 664 t = hvalue(obj_at(L, 1));
665 if (i == -1) { 665 if (i == -1) {
@@ -692,7 +692,7 @@ static int table_query (lua_State *L) {
692 692
693static int string_query (lua_State *L) { 693static int string_query (lua_State *L) {
694 stringtable *tb = &G(L)->strt; 694 stringtable *tb = &G(L)->strt;
695 int s = luaL_optint(L, 1, 0) - 1; 695 int s = (int)luaL_optinteger(L, 1, 0) - 1;
696 if (s == -1) { 696 if (s == -1) {
697 lua_pushinteger(L ,tb->size); 697 lua_pushinteger(L ,tb->size);
698 lua_pushinteger(L ,tb->nuse); 698 lua_pushinteger(L ,tb->nuse);
@@ -723,21 +723,21 @@ static int tref (lua_State *L) {
723 723
724static int getref (lua_State *L) { 724static int getref (lua_State *L) {
725 int level = lua_gettop(L); 725 int level = lua_gettop(L);
726 lua_rawgeti(L, LUA_REGISTRYINDEX, luaL_checkint(L, 1)); 726 lua_rawgeti(L, LUA_REGISTRYINDEX, luaL_checkinteger(L, 1));
727 lua_assert(lua_gettop(L) == level+1); 727 lua_assert(lua_gettop(L) == level+1);
728 return 1; 728 return 1;
729} 729}
730 730
731static int unref (lua_State *L) { 731static int unref (lua_State *L) {
732 int level = lua_gettop(L); 732 int level = lua_gettop(L);
733 luaL_unref(L, LUA_REGISTRYINDEX, luaL_checkint(L, 1)); 733 luaL_unref(L, LUA_REGISTRYINDEX, (int)luaL_checkinteger(L, 1));
734 lua_assert(lua_gettop(L) == level); 734 lua_assert(lua_gettop(L) == level);
735 return 0; 735 return 0;
736} 736}
737 737
738 738
739static int upvalue (lua_State *L) { 739static int upvalue (lua_State *L) {
740 int n = luaL_checkint(L, 2); 740 int n = (int)luaL_checkinteger(L, 2);
741 luaL_checktype(L, 1, LUA_TFUNCTION); 741 luaL_checktype(L, 1, LUA_TFUNCTION);
742 if (lua_isnone(L, 3)) { 742 if (lua_isnone(L, 3)) {
743 const char *name = lua_getupvalue(L, 1, n); 743 const char *name = lua_getupvalue(L, 1, n);
@@ -886,7 +886,7 @@ static int doremote (lua_State *L) {
886 886
887 887
888static int int2fb_aux (lua_State *L) { 888static int int2fb_aux (lua_State *L) {
889 int b = luaO_int2fb(luaL_checkint(L, 1)); 889 int b = luaO_int2fb((unsigned int)luaL_checkinteger(L, 1));
890 lua_pushinteger(L, b); 890 lua_pushinteger(L, b);
891 lua_pushinteger(L, luaO_fb2int(b)); 891 lua_pushinteger(L, luaO_fb2int(b));
892 return 2; 892 return 2;
@@ -1389,7 +1389,7 @@ static int sethook (lua_State *L) {
1389 else { 1389 else {
1390 const char *scpt = luaL_checkstring(L, 1); 1390 const char *scpt = luaL_checkstring(L, 1);
1391 const char *smask = luaL_checkstring(L, 2); 1391 const char *smask = luaL_checkstring(L, 2);
1392 int count = luaL_optint(L, 3, 0); 1392 int count = (int)luaL_optinteger(L, 3, 0);
1393 int mask = 0; 1393 int mask = 0;
1394 if (strchr(smask, 'c')) mask |= LUA_MASKCALL; 1394 if (strchr(smask, 'c')) mask |= LUA_MASKCALL;
1395 if (strchr(smask, 'r')) mask |= LUA_MASKRET; 1395 if (strchr(smask, 'r')) mask |= LUA_MASKRET;