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

more memory leaks fixes

Browse source 
git-svn-id: https://swig.svn.sourceforge.net/svnroot/swig/trunk@7921 626c5289-ae23-0410-ae9c-e8d60b6d4f22
This commit is contained in:
Marcelo Matus 2005-12-04 01:16:57 +00:00
commit 34e0da0d4d
11 changed files with 112 additions and 94 deletions
Download patch file Download diff file Expand all files Collapse all files

17
SWIG/Source/Swig/wrapfunc.c
View file

@ -83,7 +83,6 @@ Wrapper_pretty_print(String *str, File *f) {
ts = NewStringEmpty();
Seek(str,0, SEEK_SET);
Clear(ts);
while ((c = Getc(str)) != EOF) {
if (c == '\"') {
Putc(c,ts);
@ -222,8 +221,6 @@ Wrapper_compact_print(String *str, File *f) {
ts = NewStringEmpty();
tf = NewStringEmpty();
Seek(str,0, SEEK_SET);
Clear(ts);
Clear(tf);
while ((c = Getc(str)) != EOF) {
if (c == '\"') { /* string 1 */
@ -263,7 +260,7 @@ Wrapper_compact_print(String *str, File *f) {
for (i = 0; i < level; i++)
Putc(' ',tf);
}
Printf(tf,"%s",ts);
Append(tf,ts);
Clear(ts);
level+=indent;
while ((c = Getc(str)) != EOF) {
@ -286,7 +283,7 @@ Wrapper_compact_print(String *str, File *f) {
for (i = 0; i < level; i++)
Putc(' ',tf);
}
Printf(tf, "%s", ts);
Append(tf, ts);
Putc(c, tf);
Clear(ts);
level-=indent;
@ -312,7 +309,7 @@ Wrapper_compact_print(String *str, File *f) {
for (i = 0; i < level; i++)
Putc(' ',tf);
}
Printf(tf,"%s",ts);
Append(tf,ts);
Clear(ts);
}
Ungetc(c,str);
@ -356,9 +353,9 @@ Wrapper_compact_print(String *str, File *f) {
break;
}
if (!empty) {
Printf(tf,"\n");
Append(tf,"\n");
}
Printf(tf,"%s",ts);
Append(tf,ts);
Printf(f, "%s", tf);
Clear(tf);
Clear(ts);
@ -373,7 +370,7 @@ Wrapper_compact_print(String *str, File *f) {
}
}
if (!empty) {
Printf(tf,"%s",ts);
Append(tf,ts);
}
if (Len(tf) != 0)
Printf(f,"%s",tf);
@ -400,6 +397,8 @@ Wrapper_print(Wrapper *w, File *f) {
Wrapper_compact_print(str,f);
else
Wrapper_pretty_print(str,f);
Delete(str);
}
/* -----------------------------------------------------------------------------