nik/lush
1
1
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

elimination of function "int2str", as it can be replaced by "format('%c', .)"

Browse Source
This commit is contained in:
Roberto Ierusalimschy
1996-01-26 10:11:28 -02:00
parent 445872a6e2
commit ca7be1cfeb
1 changed files with 1 additions and 14 deletions
Download Patch File Download Diff File Expand all files Collapse all files

15
strlib.c
View File

@@ -3,7 +3,7 @@
** String library to LUA ** String library to LUA
*/ */
char *rcs_strlib="$Id: strlib.c,v 1.14 1995/11/10 17:54:31 roberto Exp roberto $"; char *rcs_strlib="$Id: strlib.c,v 1.15 1996/01/22 17:38:57 roberto Exp roberto $";
#include <string.h> #include <string.h>
#include <stdio.h> #include <stdio.h>
@@ -167,18 +167,6 @@ static void str_ascii (void)
lua_pushnumber(s[pos]); lua_pushnumber(s[pos]);
} }
/*
** converts one or more integers to chars in a string
*/
static void str_int2str (void)
{
int i = 0;
luaI_addchar(0);
while (lua_getparam(++i) != LUA_NOOBJECT)
luaI_addchar((int)lua_check_number(i, "int2str"));
lua_pushstring(luaI_addchar(0));
}
#define MAX_CONVERTION 2000 #define MAX_CONVERTION 2000
#define MAX_FORMAT 50 #define MAX_FORMAT 50
@@ -256,6 +244,5 @@ void strlib_open (void)
lua_register ("strlower", str_lower); lua_register ("strlower", str_lower);
lua_register ("strupper", str_upper); lua_register ("strupper", str_upper);
lua_register ("ascii", str_ascii); lua_register ("ascii", str_ascii);
lua_register ("int2str", str_int2str);
lua_register ("format", io_format); lua_register ("format", io_format);
} }