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

avoid non-conformant pointer arithmetic in api check for 'lua_rotate'

Browse Source
This commit is contained in:
Roberto Ierusalimschy
2014-05-15 12:22:45 -03:00
parent 1ddb251d86
commit fd1672ba98
1 changed files with 3 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
lapi.c
View File

@@ -1,5 +1,5 @@
/* /*
** $Id: lapi.c,v 2.211 2014/05/14 14:20:17 roberto Exp roberto $ ** $Id: lapi.c,v 2.212 2014/05/14 18:32:30 roberto Exp roberto $
** Lua API ** Lua API
** See Copyright Notice in lua.h ** See Copyright Notice in lua.h
*/ */
@@ -204,9 +204,9 @@ LUA_API void lua_rotate (lua_State *L, int idx, int n) {
lua_lock(L); lua_lock(L);
t = L->top - 1; /* end of stack segment being rotated */ t = L->top - 1; /* end of stack segment being rotated */
p = index2addr(L, idx); /* start of segment */ p = index2addr(L, idx); /* start of segment */
m = (n >= 0 ? t - n : p - n - 1); /* end of prefix */
api_checkstackindex(L, idx, p); api_checkstackindex(L, idx, p);
api_check(L, p <= m + 1 && m <= t, "invalid 'n'"); api_check(L, (n >= 0 ? n : -n) <= (t - p + 1), "invalid 'n'");
m = (n >= 0 ? t - n : p - n - 1); /* end of prefix */
reverse(L, p, m); /* reverse the prefix with length 'n' */ reverse(L, p, m); /* reverse the prefix with length 'n' */
reverse(L, m + 1, t); /* reverse the suffix */ reverse(L, m + 1, t); /* reverse the suffix */
reverse(L, p, t); /* reverse the entire segment */ reverse(L, p, t); /* reverse the entire segment */