diff options
Diffstat (limited to '')
| -rw-r--r-- | lapi.c | 4 | ||||
| -rw-r--r-- | lbuiltin.c | 4 | ||||
| -rw-r--r-- | liolib.c | 4 | ||||
| -rw-r--r-- | lua.h | 6 |
4 files changed, 9 insertions, 9 deletions
| @@ -1,5 +1,5 @@ | |||
| 1 | /* | 1 | /* |
| 2 | ** $Id: lapi.c,v 1.23 1998/03/06 18:47:42 roberto Exp roberto $ | 2 | ** $Id: lapi.c,v 1.24 1998/03/09 21:49:52 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 | */ |
| @@ -345,7 +345,7 @@ void lua_pushstring (char *s) | |||
| 345 | lua_pushlstring(s, strlen(s)); | 345 | lua_pushlstring(s, strlen(s)); |
| 346 | } | 346 | } |
| 347 | 347 | ||
| 348 | void lua_pushCclosure (lua_CFunction fn, int n) | 348 | void lua_pushcclosure (lua_CFunction fn, int n) |
| 349 | { | 349 | { |
| 350 | if (fn == NULL) | 350 | if (fn == NULL) |
| 351 | lua_error("API error - attempt to push a NULL Cfunction"); | 351 | lua_error("API error - attempt to push a NULL Cfunction"); |
| @@ -1,5 +1,5 @@ | |||
| 1 | /* | 1 | /* |
| 2 | ** $Id: lbuiltin.c,v 1.27 1998/03/09 21:49:52 roberto Exp roberto $ | 2 | ** $Id: lbuiltin.c,v 1.28 1998/05/31 22:19:35 roberto Exp roberto $ |
| 3 | ** Built-in functions | 3 | ** Built-in functions |
| 4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
| 5 | */ | 5 | */ |
| @@ -430,7 +430,7 @@ static void testC (void) | |||
| 430 | 430 | ||
| 431 | case 'c': reg[getnum(s)] = lua_createtable(); break; | 431 | case 'c': reg[getnum(s)] = lua_createtable(); break; |
| 432 | case 'C': { lua_CFunction f = lua_getcfunction(lua_getglobal(getname(s))); | 432 | case 'C': { lua_CFunction f = lua_getcfunction(lua_getglobal(getname(s))); |
| 433 | lua_pushCclosure(f, getnum(s)); | 433 | lua_pushcclosure(f, getnum(s)); |
| 434 | break; | 434 | break; |
| 435 | } | 435 | } |
| 436 | case 'P': reg[getnum(s)] = lua_pop(); break; | 436 | case 'P': reg[getnum(s)] = lua_pop(); break; |
| @@ -1,5 +1,5 @@ | |||
| 1 | /* | 1 | /* |
| 2 | ** $Id: liolib.c,v 1.18 1998/05/20 22:21:35 roberto Exp roberto $ | 2 | ** $Id: liolib.c,v 1.19 1998/06/02 21:20:54 roberto Exp roberto $ |
| 3 | ** Standard I/O (and system) library | 3 | ** Standard I/O (and system) library |
| 4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
| 5 | */ | 5 | */ |
| @@ -427,7 +427,7 @@ static void openwithtags (void) | |||
| 427 | /* put both tags as upvalues for these functions */ | 427 | /* put both tags as upvalues for these functions */ |
| 428 | lua_pushnumber(iotag); | 428 | lua_pushnumber(iotag); |
| 429 | lua_pushnumber(closedtag); | 429 | lua_pushnumber(closedtag); |
| 430 | lua_pushCclosure(iolibtag[i].func, 2); | 430 | lua_pushcclosure(iolibtag[i].func, 2); |
| 431 | lua_setglobal(iolibtag[i].name); | 431 | lua_setglobal(iolibtag[i].name); |
| 432 | } | 432 | } |
| 433 | setfile(stdin, FINPUT, iotag); | 433 | setfile(stdin, FINPUT, iotag); |
| @@ -1,5 +1,5 @@ | |||
| 1 | /* | 1 | /* |
| 2 | ** $Id: lua.h,v 1.18 1998/05/18 22:26:03 roberto Exp roberto $ | 2 | ** $Id: lua.h,v 1.19 1998/06/02 20:37:04 roberto Exp roberto $ |
| 3 | ** Lua - An Extensible Extension Language | 3 | ** Lua - An Extensible Extension Language |
| 4 | ** TeCGraf: Grupo de Tecnologia em Computacao Grafica, PUC-Rio, Brazil | 4 | ** TeCGraf: Grupo de Tecnologia em Computacao Grafica, PUC-Rio, Brazil |
| 5 | ** e-mail: lua@tecgraf.puc-rio.br | 5 | ** e-mail: lua@tecgraf.puc-rio.br |
| @@ -104,7 +104,7 @@ void lua_pushnil (void); | |||
| 104 | void lua_pushnumber (double n); | 104 | void lua_pushnumber (double n); |
| 105 | void lua_pushlstring (char *s, long len); | 105 | void lua_pushlstring (char *s, long len); |
| 106 | void lua_pushstring (char *s); | 106 | void lua_pushstring (char *s); |
| 107 | void lua_pushCclosure (lua_CFunction fn, int n); | 107 | void lua_pushcclosure (lua_CFunction fn, int n); |
| 108 | void lua_pushusertag (void *u, int tag); | 108 | void lua_pushusertag (void *u, int tag); |
| 109 | void lua_pushobject (lua_Object object); | 109 | void lua_pushobject (lua_Object object); |
| 110 | 110 | ||
| @@ -151,7 +151,7 @@ void (lua_pushuserdata) (void *u); | |||
| 151 | #define lua_pushuserdata(u) lua_pushusertag(u, 0) | 151 | #define lua_pushuserdata(u) lua_pushusertag(u, 0) |
| 152 | 152 | ||
| 153 | void (lua_pushcfunction) (lua_CFunction f); | 153 | void (lua_pushcfunction) (lua_CFunction f); |
| 154 | #define lua_pushcfunction(f) lua_pushCclosure(f, 0) | 154 | #define lua_pushcfunction(f) lua_pushcclosure(f, 0) |
| 155 | 155 | ||
| 156 | int (lua_clonetag) (int t); | 156 | int (lua_clonetag) (int t); |
| 157 | #define lua_clonetag(t) lua_copytagmethods(lua_newtag(), (t)) | 157 | #define lua_clonetag(t) lua_copytagmethods(lua_newtag(), (t)) |
