瀏覽代碼

old trick in "strsub" does not work with new hash table for strings.

Roberto Ierusalimschy 29 年之前
父節點
當前提交
f1a1eda7c5
共有 1 個文件被更改,包括 5 次插入5 次删除
  1. 5 5
      strlib.c

+ 5 - 5
strlib.c

@@ -3,7 +3,7 @@
 ** String library to LUA
 */
 
-char *rcs_strlib="$Id: strlib.c,v 1.16 1996/01/26 12:11:28 roberto Exp roberto $";
+char *rcs_strlib="$Id: strlib.c,v 1.18 1996/02/12 18:32:40 roberto Exp $";
 
 #include <string.h>
 #include <stdio.h>
@@ -125,10 +125,10 @@ static void str_sub (void)
   lua_pushliteral("");
  else
  {
-  char temp = s[end];
-  s[end] = 0;
-  lua_pushstring (&s[start-1]);
-  s[end] = temp;
+   luaI_addchar(0);
+   while (start <= end) 
+     luaI_addchar(s[start++ - 1]);
+   lua_pushstring (luaI_addchar(0));
  }
 }