[packages/swig.git] / swig-php-freearg.patch

--- SWIG/Source/Modules/php4.cxx.orig	2003-10-07 22:11:59.308330872 +0200
+++ SWIG/Source/Modules/php4.cxx	2003-10-07 22:11:33.000000000 +0200
@@ -1149,6 +1149,8 @@
 
     /* Insert cleanup code */
     for (i = 0, p = l; p; i++) {
+      if(i>= (num_required))
+	Printf(cleanup,"\tif(arg_count > %d) {\n", i);
       if ((tm = Getattr(p,"tmap:freearg"))) {
 	Replaceall(tm,"$source",Getattr(p,"lname"));
 	Printv(cleanup,tm,"\n",NIL);
@@ -1156,6 +1158,8 @@
       } else {
 	p = nextSibling(p);
       }
+      if (i >= num_required)
+        Printf(cleanup,"}\n");
     }
     
     /* Insert argument output code */
Commit	Line	Data
4abc4c7b	1	--- SWIG/Source/Modules/php4.cxx.orig 2003-10-07 22:11:59.308330872 +0200
	2	+++ SWIG/Source/Modules/php4.cxx 2003-10-07 22:11:33.000000000 +0200
	3	@@ -1149,6 +1149,8 @@
	4
	5	/* Insert cleanup code */
	6	for (i = 0, p = l; p; i++) {
	7	+ if(i>= (num_required))
	8	+ Printf(cleanup,"\tif(arg_count > %d) {\n", i);
	9	if ((tm = Getattr(p,"tmap:freearg"))) {
	10	Replaceall(tm,"$source",Getattr(p,"lname"));
	11	Printv(cleanup,tm,"\n",NIL);
	12	@@ -1156,6 +1158,8 @@
	13	} else {
	14	p = nextSibling(p);
	15	}
	16	+ if (i >= num_required)
	17	+ Printf(cleanup,"}\n");
	18	}
	19
	20	/* Insert argument output code */