diff options
| -rw-r--r-- | ldebug.c | 4 | ||||
| -rw-r--r-- | ldebug.h | 5 |
2 files changed, 5 insertions, 4 deletions
| @@ -1,5 +1,5 @@ | |||
| 1 | /* | 1 | /* |
| 2 | ** $Id: ldebug.c,v 2.92 2013/04/26 13:07:53 roberto Exp roberto $ | 2 | ** $Id: ldebug.c,v 2.93 2013/04/26 16:03:50 roberto Exp roberto $ |
| 3 | ** Debug Interface | 3 | ** Debug Interface |
| 4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
| 5 | */ | 5 | */ |
| @@ -517,7 +517,7 @@ l_noret luaG_typeerror (lua_State *L, const TValue *o, const char *op) { | |||
| 517 | } | 517 | } |
| 518 | 518 | ||
| 519 | 519 | ||
| 520 | l_noret luaG_concaterror (lua_State *L, StkId p1, StkId p2) { | 520 | l_noret luaG_concaterror (lua_State *L, const TValue *p1, const TValue *p2) { |
| 521 | if (ttisstring(p1) || ttisnumber(p1)) p1 = p2; | 521 | if (ttisstring(p1) || ttisnumber(p1)) p1 = p2; |
| 522 | lua_assert(!ttisstring(p1) && !ttisnumber(p2)); | 522 | lua_assert(!ttisstring(p1) && !ttisnumber(p2)); |
| 523 | luaG_typeerror(L, p1, "concatenate"); | 523 | luaG_typeerror(L, p1, "concatenate"); |
| @@ -1,5 +1,5 @@ | |||
| 1 | /* | 1 | /* |
| 2 | ** $Id: ldebug.h,v 2.7 2011/10/07 20:45:19 roberto Exp roberto $ | 2 | ** $Id: ldebug.h,v 2.8 2013/04/25 15:59:42 roberto Exp roberto $ |
| 3 | ** Auxiliary functions from Debug Interface module | 3 | ** Auxiliary functions from Debug Interface module |
| 4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
| 5 | */ | 5 | */ |
| @@ -23,7 +23,8 @@ | |||
| 23 | 23 | ||
| 24 | LUAI_FUNC l_noret luaG_typeerror (lua_State *L, const TValue *o, | 24 | LUAI_FUNC l_noret luaG_typeerror (lua_State *L, const TValue *o, |
| 25 | const char *opname); | 25 | const char *opname); |
| 26 | LUAI_FUNC l_noret luaG_concaterror (lua_State *L, StkId p1, StkId p2); | 26 | LUAI_FUNC l_noret luaG_concaterror (lua_State *L, const TValue *p1, |
| 27 | const TValue *p2); | ||
| 27 | LUAI_FUNC l_noret luaG_aritherror (lua_State *L, const TValue *p1, | 28 | LUAI_FUNC l_noret luaG_aritherror (lua_State *L, const TValue *p1, |
| 28 | const TValue *p2); | 29 | const TValue *p2); |
| 29 | LUAI_FUNC l_noret luaG_ordererror (lua_State *L, const TValue *p1, | 30 | LUAI_FUNC l_noret luaG_ordererror (lua_State *L, const TValue *p1, |
