aboutsummaryrefslogtreecommitdiff
path: root/lapi.c
diff options
context:
space:
mode:
authorRoberto Ierusalimschy <roberto@inf.puc-rio.br>2000-09-11 17:29:27 -0300
committerRoberto Ierusalimschy <roberto@inf.puc-rio.br>2000-09-11 17:29:27 -0300
commit8060193702b21a06af3541555db4cd317c733ce9 (patch)
treed1cfa3a4ac41dc6766188680659c1bd1311e22a8 /lapi.c
parent2779e81fbbdebf8b7cac97c167ff109bad537c4b (diff)
downloadlua-8060193702b21a06af3541555db4cd317c733ce9.tar.gz
lua-8060193702b21a06af3541555db4cd317c733ce9.tar.bz2
lua-8060193702b21a06af3541555db4cd317c733ce9.zip
`lauxlib' is now part of the libraries (not used by core Lua)
Diffstat (limited to 'lapi.c')
-rw-r--r--lapi.c7
1 files changed, 3 insertions, 4 deletions
diff --git a/lapi.c b/lapi.c
index dc103bc4..8d5555e4 100644
--- a/lapi.c
+++ b/lapi.c
@@ -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) {
234void lua_pushusertag (lua_State *L, void *u, int tag) { /* ORDER LUA_T */ 233void 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--;