Browse Source

'string.find' as it was in 5.0

v5-2
Roberto Ierusalimschy 19 years ago
parent
commit
bf96d3fdd9
  1. 7
      lstrlib.c
  2. 10
      luaconf.h

7
lstrlib.c

@ -1,5 +1,5 @@
/* /*
** $Id: lstrlib.c,v 1.122 2005/08/15 14:12:32 roberto Exp roberto $ ** $Id: lstrlib.c,v 1.123 2005/08/26 17:36:32 roberto Exp roberto $
** Standard library for string operations and pattern-matching ** Standard library for string operations and pattern-matching
** See Copyright Notice in lua.h ** See Copyright Notice in lua.h
*/ */
@ -516,12 +516,7 @@ static int str_find_aux (lua_State *L, int find) {
if (find) { if (find) {
lua_pushinteger(L, s1-s+1); /* start */ lua_pushinteger(L, s1-s+1); /* start */
lua_pushinteger(L, res-s); /* end */ lua_pushinteger(L, res-s); /* end */
#if defined(LUA_COMPAT_FIND)
return push_captures(&ms, NULL, 0) + 2; return push_captures(&ms, NULL, 0) + 2;
#else
return 2;
#endif
} }
else else
return push_captures(&ms, s1, res); return push_captures(&ms, s1, res);

10
luaconf.h

@ -1,5 +1,5 @@
/* /*
** $Id: luaconf.h,v 1.66 2005/09/14 17:23:03 roberto Exp roberto $ ** $Id: luaconf.h,v 1.67 2005/09/14 17:44:48 roberto Exp roberto $
** Configuration file for Lua ** Configuration file for Lua
** See Copyright Notice in lua.h ** See Copyright Notice in lua.h
*/ */
@ -315,13 +315,6 @@
*/ */
#define LUA_COMPAT_LSTR 1 #define LUA_COMPAT_LSTR 1
/*
@@ LUA_COMPAT_FIND controls compatibility with old 'string.find' behavior.
** CHANGE it to undefined as soon as your programs use 'string.find' only
** to find patterns.
*/
#define LUA_COMPAT_FIND
/* /*
@@ LUA_COMPAT_GFIND controls compatibility with old 'string.gfind' name. @@ LUA_COMPAT_GFIND controls compatibility with old 'string.gfind' name.
** CHANGE it to undefined as soon as you rename 'string.gfind' to ** CHANGE it to undefined as soon as you rename 'string.gfind' to
@ -329,7 +322,6 @@
*/ */
#define LUA_COMPAT_GFIND #define LUA_COMPAT_GFIND
/* /*
@@ LUA_COMPAT_OPENLIB controls compatibility with old 'luaL_openlib' @@ LUA_COMPAT_OPENLIB controls compatibility with old 'luaL_openlib'
@* behavior. @* behavior.

Loading…
Cancel
Save