mirror of
https://github.com/lua/lua
synced 2024-11-22 21:01:26 +03:00
detail
This commit is contained in:
parent
df429f163a
commit
4d5fe1f54b
@ -1,5 +1,5 @@
|
||||
/*
|
||||
** $Id: lbaselib.c,v 1.137 2003/11/05 11:59:14 roberto Exp roberto $
|
||||
** $Id: lbaselib.c,v 1.138 2003/11/11 16:34:17 roberto Exp roberto $
|
||||
** Basic library
|
||||
** See Copyright Notice in lua.h
|
||||
*/
|
||||
@ -297,7 +297,7 @@ static const char *generic_reader (lua_State *L, void *ud, size_t *size) {
|
||||
static int luaB_load (lua_State *L) {
|
||||
struct Aux_load al;
|
||||
int status;
|
||||
const char *cname = luaL_optstring(L, 2, "= generic load");
|
||||
const char *cname = luaL_optstring(L, 2, "=(load)");
|
||||
luaL_checktype(L, 1, LUA_TFUNCTION);
|
||||
lua_settop(L, 1);
|
||||
al.func = luaL_ref(L, LUA_REGISTRYINDEX);
|
||||
|
7
lua.h
7
lua.h
@ -1,5 +1,5 @@
|
||||
/*
|
||||
** $Id: lua.h,v 1.184 2003/10/21 10:58:58 roberto Exp roberto $
|
||||
** $Id: lua.h,v 1.185 2003/11/05 11:59:14 roberto Exp roberto $
|
||||
** Lua - An Extensible Extension Language
|
||||
** Tecgraf: Computer Graphics Technology Group, PUC-Rio, Brazil
|
||||
** http://www.lua.org mailto:info@lua.org
|
||||
@ -258,10 +258,7 @@ LUA_API lua_Alloc lua_getallocf (lua_State *L, void **ud);
|
||||
|
||||
#define lua_newtable(L) lua_createtable(L, 0, 0)
|
||||
|
||||
#define lua_register(L,n,f) \
|
||||
(lua_pushstring(L, n), \
|
||||
lua_pushcfunction(L, f), \
|
||||
lua_settable(L, LUA_GLOBALSINDEX))
|
||||
#define lua_register(L,n,f) (lua_pushcfunction(L,f), lua_setglobal(L,n))
|
||||
|
||||
#define lua_pushcfunction(L,f) lua_pushcclosure(L, f, 0)
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user