commit 69ea087dff1daba25a2000dfb8f1883c17545b7a
author Roberto Ierusalimschy <roberto@inf.puc-rio.br> Fri Feb 17 13:51:03 2006 -0200
committer Roberto Ierusalimschy <roberto@inf.puc-rio.br> Fri Feb 17 13:51:03 2006 -0200
tree b6abdd69100d6e5cb738775ae09eb2eb3ae0f262
parent c05aaf3bf003d57eed54523c8d122897067238ed

small change to strip file names when stripping debug information

ldump.c

diff --git a/ldump.c b/ldump.c
index eff2c85..f08277d 100644
--- a/ldump.c
+++ b/ldump.c
@@ -1,5 +1,5 @@
 /*
-** $Id: ldump.c,v 1.13 2005/11/01 17:04:55 lhf Exp lhf $
+** $Id: ldump.c,v 1.15 2006/02/16 15:53:49 lhf Exp $
 ** save precompiled Lua chunks
 ** See Copyright Notice in lua.h
 */
@@ -128,7 +128,7 @@
 
 static void DumpFunction(const Proto* f, const TString* p, DumpState* D)
 {
- DumpString((f->source==p) ? NULL : f->source,D);
+ DumpString((f->source==p || D->strip) ? NULL : f->source,D);
  DumpInt(f->linedefined,D);
  DumpInt(f->lastlinedefined,D);
  DumpChar(f->nups,D);

lundump.c

diff --git a/lundump.c b/lundump.c
index bf072de..7fc635e 100644
--- a/lundump.c
+++ b/lundump.c
@@ -1,5 +1,5 @@
 /*
-** $Id: lundump.c,v 1.58 2005/09/02 01:54:47 lhf Exp lhf $
+** $Id: lundump.c,v 1.60 2006/02/16 15:53:49 lhf Exp $
 ** load precompiled Lua chunks
 ** See Copyright Notice in lua.h
 */
@@ -201,7 +201,7 @@
  S.Z=Z;
  S.b=buff;
  LoadHeader(&S);
- return LoadFunction(&S,NULL);
+ return LoadFunction(&S,luaS_newliteral(L,"=?"));
 }
 
 /*