GitHub/lua
1
0
Fork 0
mirror of https://github.com/lua/lua.git synced 2025-01-14 05:43:00 +08:00
Code Issues Projects Releases Wiki Activity

detail: local names

Browse Source
This commit is contained in:
Roberto Ierusalimschy 1997-04-06 11:17:06 -03:00
parent 19a1e19ae1
commit 00050b8a6b
1 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
strlib.c
View File

@ -3,7 +3,7 @@
** String library to LUA
*/
char *rcs_strlib="$Id: strlib.c,v 1.39 1997/04/04 22:24:51 roberto Exp roberto $";
char *rcs_strlib="$Id: strlib.c,v 1.40 1997/04/06 14:08:08 roberto Exp roberto $";
#include <string.h>
#include <stdio.h>
@ -24,7 +24,7 @@ struct lbuff {
static struct lbuff lbuffer = {NULL, 0, 0};
static char *luaL_strbuffer (unsigned long size)
static char *strbuffer (unsigned long size)
{
if (size > lbuffer.max) {
/* ANSI "realloc" doesn't need this test, but some machines (Sun!)
@ -39,14 +39,14 @@ static char *luaL_strbuffer (unsigned long size)
static char *openspace (unsigned long size)
{
char *buff = luaL_strbuffer(lbuffer.size+size);
char *buff = strbuffer(lbuffer.size+size);
return buff+lbuffer.size;
}
char *luaI_addchar (int c)
{
if (lbuffer.size >= lbuffer.max)
luaL_strbuffer(lbuffer.max == 0 ? 100 : lbuffer.max*2);
strbuffer(lbuffer.max == 0 ? 100 : lbuffer.max*2);
lbuffer.b[lbuffer.size++] = c;
return lbuffer.b;
}
@ -79,7 +79,7 @@ static void str_tok (void)
lua_Object t = lua_createtable();
int i = 1;
/* As strtok changes s1, and s1 is "constant", make a copy of it */
s1 = strcpy(luaL_strbuffer(strlen(s1+1)), s1);
s1 = strcpy(strbuffer(strlen(s1+1)), s1);
while ((s1 = strtok(s1, del)) != NULL) {
lua_pushobject(t);
lua_pushnumber(i++);