jyapayne/swig
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

fix recursive inclusion seg fault

Browse source 
git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk/SWIG@8043 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
Marcelo Matus 2005-12-23 00:04:47 +00:00
commit 5b34d656e6
1 changed files with 7 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

7
Source/Swig/fragment.c
View file

@ -19,6 +19,7 @@ char cvsroot_fragment_c[] = "$Header$";
#include "swig.h"
static Hash *fragments = 0;
static Hash *looking_fragments = 0;
static int debug = 0;
@ -106,11 +107,16 @@ Swig_fragment_emit(Node *n) {
while (tok) {
String *name = NewString(tok);
if (mangle) Append(name,mangle);
if (looking_fragments && Getattr(looking_fragments,name)) {
return;
}
code = Getattr(fragments,name);
if (debug) Printf(stdout,"looking subfragment %s\n", name);
if (code && (Strcmp(code,"ignore") != 0)) {
String *section = Getmeta(code,"section");
Hash *n = Getmeta(code,"kwargs");
if (!looking_fragments) looking_fragments = NewHash();
Setattr(looking_fragments,name,"1");
while (n) {
if (Cmp(Getattr(n,"name"),"fragment") == 0) {
if (debug) Printf(stdout,"emitting fragment %s %s\n",n, type);
@ -129,6 +135,7 @@ Swig_fragment_emit(Node *n) {
Printf(f,"%s\n",code);
if (debug) Printf(f,"/* end fragment %s */\n\n",name);
Setattr(fragments,name,"ignore");
Delattr(looking_fragments,name);
}
}
} else {