diff options
Diffstat (limited to 'ldebug.c')
| -rw-r--r-- | ldebug.c | 8 |
1 files changed, 4 insertions, 4 deletions
| @@ -1,5 +1,5 @@ | |||
| 1 | /* | 1 | /* |
| 2 | ** $Id: ldebug.c,v 1.54 2001/01/19 13:20:30 roberto Exp roberto $ | 2 | ** $Id: ldebug.c,v 1.55 2001/01/24 15:45:33 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 | */ |
| @@ -466,7 +466,7 @@ static const char *getfuncname (lua_State *L, StkId f, const char **name) { | |||
| 466 | void luaG_typeerror (lua_State *L, StkId o, const char *op) { | 466 | void luaG_typeerror (lua_State *L, StkId o, const char *op) { |
| 467 | const char *name; | 467 | const char *name; |
| 468 | const char *kind = getobjname(L, o, &name); | 468 | const char *kind = getobjname(L, o, &name); |
| 469 | const char *t = luaO_typename(o); | 469 | const char *t = luaT_typename(G(L), o); |
| 470 | if (kind) | 470 | if (kind) |
| 471 | luaO_verror(L, "attempt to %.30s %.20s `%.40s' (a %.10s value)", | 471 | luaO_verror(L, "attempt to %.30s %.20s `%.40s' (a %.10s value)", |
| 472 | op, kind, name, t); | 472 | op, kind, name, t); |
| @@ -483,8 +483,8 @@ void luaG_binerror (lua_State *L, StkId p1, int t, const char *op) { | |||
| 483 | 483 | ||
| 484 | 484 | ||
| 485 | void luaG_ordererror (lua_State *L, StkId top) { | 485 | void luaG_ordererror (lua_State *L, StkId top) { |
| 486 | const char *t1 = luaO_typename(top-2); | 486 | const char *t1 = luaT_typename(G(L), top-2); |
| 487 | const char *t2 = luaO_typename(top-1); | 487 | const char *t2 = luaT_typename(G(L), top-1); |
| 488 | if (t1[2] == t2[2]) | 488 | if (t1[2] == t2[2]) |
| 489 | luaO_verror(L, "attempt to compare two %.10s values", t1); | 489 | luaO_verror(L, "attempt to compare two %.10s values", t1); |
| 490 | else | 490 | else |
