diff options
author | Peter Breitenlohner <peb@mppmu.mpg.de> | 2010-01-25 12:30:04 +0000 |
---|---|---|
committer | Peter Breitenlohner <peb@mppmu.mpg.de> | 2010-01-25 12:30:04 +0000 |
commit | 65c37b17f39210ff32ba3ec1415d5f5a3f8e86ff (patch) | |
tree | a23710d061b8695f9eec30cbf5591e6016432089 /Build/source/texk/web2c/luatexdir/lua/ltokenlib.c | |
parent | a6ff9d2b253991c7c8eb94f2977abb10ad466480 (diff) |
texk/web2c/luatexdir: compiler warnings
git-svn-id: svn://tug.org/texlive/trunk@16817 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/source/texk/web2c/luatexdir/lua/ltokenlib.c')
-rw-r--r-- | Build/source/texk/web2c/luatexdir/lua/ltokenlib.c | 16 |
1 files changed, 7 insertions, 9 deletions
diff --git a/Build/source/texk/web2c/luatexdir/lua/ltokenlib.c b/Build/source/texk/web2c/luatexdir/lua/ltokenlib.c index 947c6ceab8c..1ba1e609aef 100644 --- a/Build/source/texk/web2c/luatexdir/lua/ltokenlib.c +++ b/Build/source/texk/web2c/luatexdir/lua/ltokenlib.c @@ -24,8 +24,6 @@ static const char _svn_version[] = "$Id: ltokenlib.c 2448 2009-06-08 07:43:50Z taco $ $URL: http://foundry.supelec.fr/svn/luatex/tags/beta-0.40.6/source/texk/web2c/luatexdir/lua/ltokenlib.c $"; -extern int get_command_id(char *); - static int max_command = 0; static int null_cs = 0; @@ -46,7 +44,7 @@ static int test_expandable(lua_State * L) if (lua_isnumber(L, -1)) { cmd = lua_tointeger(L, -1); } else if (lua_isstring(L, -1)) { - cmd = get_command_id((char *) lua_tostring(L, -1)); + cmd = get_command_id(lua_tostring(L, -1)); } if (cmd > max_command) { lua_pushboolean(L, 1); @@ -68,7 +66,7 @@ static int test_protected(lua_State * L) if (lua_isnumber(L, -1)) { chr = lua_tointeger(L, -1); } else if (lua_isstring(L, -1)) { - chr = get_command_id((char *) lua_tostring(L, -1)); + chr = get_command_id(lua_tostring(L, -1)); } if (fixmem[fixmem[chr].hhrh].hhlh == protected_token) { lua_pushboolean(L, 1); @@ -160,7 +158,7 @@ static int run_get_command_id(lua_State * L) { int cs = -1; if (lua_isstring(L, -1)) { - cs = get_command_id((char *) lua_tostring(L, -1)); + cs = get_command_id(lua_tostring(L, -1)); } lua_pushnumber(L, cs); return 1; @@ -169,10 +167,10 @@ static int run_get_command_id(lua_State * L) static int run_get_csname_id(lua_State * L) { - char *s; + const char *s; size_t k, cs = 0; if (lua_isstring(L, -1)) { - s = (char *) lua_tolstring(L, -1, &k); + s = lua_tolstring(L, -1, &k); cs = string_lookup(s, k); } lua_pushnumber(L, cs); @@ -212,12 +210,12 @@ static int run_expand(lua_State * L) static int run_lookup(lua_State * L) { - char *s; + const char *s; size_t l; integer cs, cmd, chr; int save_nncs; if (lua_isstring(L, -1)) { - s = (char *) lua_tolstring(L, -1, &l); + s = lua_tolstring(L, -1, &l); if (l > 0) { save_nncs = no_new_control_sequence; no_new_control_sequence = true; |