diff options
Diffstat (limited to 'lapi.c')
| -rw-r--r-- | lapi.c | 7 |
1 files changed, 3 insertions, 4 deletions
| @@ -1,5 +1,5 @@ | |||
| 1 | /* | 1 | /* |
| 2 | ** $Id: lapi.c,v 1.94 2000/09/05 19:33:32 roberto Exp roberto $ | 2 | ** $Id: lapi.c,v 1.95 2000/09/11 19:45:27 roberto Exp roberto $ |
| 3 | ** Lua API | 3 | ** Lua API |
| 4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
| 5 | */ | 5 | */ |
| @@ -10,7 +10,6 @@ | |||
| 10 | #include "lua.h" | 10 | #include "lua.h" |
| 11 | 11 | ||
| 12 | #include "lapi.h" | 12 | #include "lapi.h" |
| 13 | #include "lauxlib.h" | ||
| 14 | #include "ldo.h" | 13 | #include "ldo.h" |
| 15 | #include "lfunc.h" | 14 | #include "lfunc.h" |
| 16 | #include "lgc.h" | 15 | #include "lgc.h" |
| @@ -234,7 +233,7 @@ void lua_pushcclosure (lua_State *L, lua_CFunction fn, int n) { | |||
| 234 | void lua_pushusertag (lua_State *L, void *u, int tag) { /* ORDER LUA_T */ | 233 | void lua_pushusertag (lua_State *L, void *u, int tag) { /* ORDER LUA_T */ |
| 235 | luaC_checkGC(L); | 234 | luaC_checkGC(L); |
| 236 | if (tag != LUA_ANYTAG && tag != TAG_USERDATA && tag < NUM_TAGS) | 235 | if (tag != LUA_ANYTAG && tag != TAG_USERDATA && tag < NUM_TAGS) |
| 237 | luaL_verror(L, "invalid tag for a userdata (%d)", tag); | 236 | luaO_verror(L, "invalid tag for a userdata (%d)", tag); |
| 238 | tsvalue(L->top) = luaS_createudata(L, u, tag); | 237 | tsvalue(L->top) = luaS_createudata(L, u, tag); |
| 239 | ttype(L->top) = TAG_USERDATA; | 238 | ttype(L->top) = TAG_USERDATA; |
| 240 | api_incr_top(L); | 239 | api_incr_top(L); |
| @@ -387,7 +386,7 @@ void lua_settag (lua_State *L, int tag) { | |||
| 387 | tsvalue(L->top-1)->u.d.tag = tag; | 386 | tsvalue(L->top-1)->u.d.tag = tag; |
| 388 | break; | 387 | break; |
| 389 | default: | 388 | default: |
| 390 | luaL_verror(L, "cannot change the tag of a %.20s", | 389 | luaO_verror(L, "cannot change the tag of a %.20s", |
| 391 | luaO_typename(L->top-1)); | 390 | luaO_typename(L->top-1)); |
| 392 | } | 391 | } |
| 393 | L->top--; | 392 | L->top--; |
