aboutsummaryrefslogtreecommitdiff
path: root/lapi.c
diff options
context:
space:
mode:
Diffstat (limited to 'lapi.c')
-rw-r--r--lapi.c8
1 files changed, 4 insertions, 4 deletions
diff --git a/lapi.c b/lapi.c
index 5f1a81ba..9e1ca5a6 100644
--- a/lapi.c
+++ b/lapi.c
@@ -1,5 +1,5 @@
1/* 1/*
2** $Id: lapi.c,v 1.21 1998/02/12 19:23:32 roberto Exp roberto $ 2** $Id: lapi.c,v 1.22 1998/03/06 16:54:42 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*/
@@ -293,7 +293,7 @@ char *lua_getstring (lua_Object object)
293 else return (svalue(Address(object))); 293 else return (svalue(Address(object)));
294} 294}
295 295
296long lua_getstrlen (lua_Object object) 296long lua_strlen (lua_Object object)
297{ 297{
298 luaC_checkGC(); /* "tostring" may create a new string */ 298 luaC_checkGC(); /* "tostring" may create a new string */
299 if (object == LUA_NOOBJECT || tostring(Address(object))) 299 if (object == LUA_NOOBJECT || tostring(Address(object)))
@@ -329,7 +329,7 @@ void lua_pushnumber (double n)
329 incr_top; 329 incr_top;
330} 330}
331 331
332void lua_pushlstr (char *s, long len) 332void lua_pushlstring (char *s, long len)
333{ 333{
334 tsvalue(L->stack.top) = luaS_newlstr(s, len); 334 tsvalue(L->stack.top) = luaS_newlstr(s, len);
335 ttype(L->stack.top) = LUA_T_STRING; 335 ttype(L->stack.top) = LUA_T_STRING;
@@ -342,7 +342,7 @@ void lua_pushstring (char *s)
342 if (s == NULL) 342 if (s == NULL)
343 lua_pushnil(); 343 lua_pushnil();
344 else 344 else
345 lua_pushlstr(s, strlen(s)); 345 lua_pushlstring(s, strlen(s));
346} 346}
347 347
348void lua_pushCclosure (lua_CFunction fn, int n) 348void lua_pushCclosure (lua_CFunction fn, int n)