1 files changed, 3 insertions, 3 deletions
diff --git a/ldo.c b/ldo.c
index d00ed860..400afa0f 100644
--- a/ldo.c
+++ b/ldo.c
@@ -1,5 +1,5 @@
 /*
-** $Id: ldo.c,v 2.81 2010/02/09 11:56:29 roberto Exp roberto $
+** $Id: ldo.c,v 2.82 2010/03/26 20:58:11 roberto Exp roberto $
 ** Stack and Call structure of Lua
 ** See Copyright Notice in lua.h
 */
@@ -83,8 +83,8 @@ struct lua_longjmp {
 static void seterrorobj (lua_State *L, int errcode, StkId oldtop) {
  switch (errcode) {
-    case LUA_ERRMEM: {
+    case LUA_ERRMEM: {  /* memory error? */
-      setsvalue2s(L, oldtop, luaS_newliteral(L, MEMERRMSG));
+      setsvalue2s(L, oldtop, G(L)->memerrmsg); /* reuse preregistered msg. */
      break;
    }
    case LUA_ERRERR: {

diff --git a/ldo.c b/ldo.c index d00ed860..400afa0f 100644 --- a/ldo.c +++ b/ldo.c
@@ -1,5 +1,5 @@
1	/*	1	/*
2	** $Id: ldo.c,v 2.81 2010/02/09 11:56:29 roberto Exp roberto $	2	** $Id: ldo.c,v 2.82 2010/03/26 20:58:11 roberto Exp roberto $
3	** Stack and Call structure of Lua	3	** Stack and Call structure of Lua
4	** See Copyright Notice in lua.h	4	** See Copyright Notice in lua.h
5	*/	5	*/
@@ -83,8 +83,8 @@ struct lua_longjmp {
83		83
84	static void seterrorobj (lua_State *L, int errcode, StkId oldtop) {	84	static void seterrorobj (lua_State *L, int errcode, StkId oldtop) {
85	switch (errcode) {	85	switch (errcode) {
86	case LUA_ERRMEM: {	86	case LUA_ERRMEM: { /* memory error? */
87	setsvalue2s(L, oldtop, luaS_newliteral(L, MEMERRMSG));	87	setsvalue2s(L, oldtop, G(L)->memerrmsg); /* reuse preregistered msg. */
88	break;	88	break;
89	}	89	}
90	case LUA_ERRERR: {	90	case LUA_ERRERR: {