lua

commit 38da8c0d7d69da5eed2e98a0871b86113869b858
parent 76de732745d5781fe3ee1af4fd43f01a6c4b8ce4
Author: Roberto Ierusalimschy <roberto@inf.puc-rio.br>
Date:   Wed,  4 Dec 2002 15:28:43 -0200

new facilities to test memory overflow in main.c

Diffstat:
M
ltests.c
 | 
11
++++++++++-
M
ltests.h
 | 
7
++++++-

2 files changed, 16 insertions(+), 2 deletions(-)
diff --git a/ltests.c b/ltests.c
@@ -1,5 +1,5 @@
 /*
-** $Id: ltests.c,v 1.145 2002/11/18 15:24:27 roberto Exp roberto $
+** $Id: ltests.c,v 1.146 2002/11/25 17:47:13 roberto Exp roberto $
 ** Internal Module for Debugging of the Lua Implementation
 ** See Copyright Notice in lua.h
 */
@@ -784,4 +784,13 @@ int luaB_opentests (lua_State *L) {
   return 0;
 }
 
+
+#undef main
+int main (int argc, char *argv[]) {
+  char *limit = getenv("MEMLIMIT");
+  if (limit)
+    memdebug_memlimit = strtoul(limit, NULL, 10);
+  l_main(argc, argv);
+}
+
 #endif
diff --git a/ltests.h b/ltests.h
@@ -1,5 +1,5 @@
 /*
-** $Id: ltests.h,v 1.18 2002/11/12 14:34:18 roberto Exp roberto $
+** $Id: ltests.h,v 1.19 2002/11/19 17:42:32 roberto Exp roberto $
 ** Internal Header for Debugging of the Lua Implementation
 ** See Copyright Notice in lua.h
 */
@@ -54,6 +54,11 @@ int luaB_opentests (lua_State *L);
 #define LUA_EXTRALIBS { "tests", luaB_opentests },
 
 
+/* real main will be defined at `ltests.c' */
+int l_main (int argc, char *argv[]);
+#define main	l_main
+
+
 
 /* change some sizes to give some bugs a chance */