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

string pointers are always fully aligned

Browse Source
This commit is contained in:
Roberto Ierusalimschy
2001-02-09 18:22:29 -02:00
parent 6875fdc8be
commit d2e340f467
11 changed files with 47 additions and 51 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
ltests.c
View File

@@ -1,5 +1,5 @@
/*
** $Id: ltests.c,v 1.64 2001/02/06 18:18:58 roberto Exp roberto $
** $Id: ltests.c,v 1.65 2001/02/09 19:53:16 roberto Exp roberto $
** Internal Module for Debugging of the Lua Implementation
** See Copyright Notice in lua.h
*/
@@ -201,7 +201,7 @@ static int liststrings (lua_State *L) {
lua_newtable(L);
for (i=0; i<p->sizekstr; i++) {
lua_pushnumber(L, i+1);
lua_pushstring(L, p->kstr[i]->str);
lua_pushstring(L, getstr(p->kstr[i]));
lua_settable(L, -3);
}
return 1;
@@ -537,7 +537,9 @@ static int testC (lua_State *L) {
lua_pushnumber(L, lua_tonumber(L, getnum));
}
else if EQ("tostring") {
lua_pushstring(L, lua_tostring(L, getnum));
const char *s = lua_tostring(L, getnum);
lua_assert((unsigned long)s % 4 == 0); /* check alignment */
lua_pushstring(L, s);
}
else if EQ("tonumber") {
lua_pushnumber(L, lua_tonumber(L, getnum));