svn commit: samba r6915 - in branches/tmp/pidl2/source/build/pidl: .

[jelmer at samba.org]

Author: jelmer
Date: 2005-05-19 21:43:28 +0000 (Thu, 19 May 2005)
New Revision: 6915

WebSVN: http://websvn.samba.org/cgi-bin/viewcvs.cgi?view=rev&root=samba&rev=6915

Log:
More array fixes

Modified:
   branches/tmp/pidl2/source/build/pidl/ndr_parser.pm


Changeset:
Modified: branches/tmp/pidl2/source/build/pidl/ndr_parser.pm
===================================================================
--- branches/tmp/pidl2/source/build/pidl/ndr_parser.pm	2005-05-19 20:46:24 UTC (rev 6914)
+++ branches/tmp/pidl2/source/build/pidl/ndr_parser.pm	2005-05-19 21:43:28 UTC (rev 6915)
@@ -667,7 +667,7 @@
 		if ($primitives or $l->{IS_DEFERRED}) {
 			pidl "for ($counter = 0; $counter < $length; $counter++) {";
 			indent;
-			ParseElementPushLevel($e, GetNextLevel($e, $l), $ndr, $var_name, $env, 1, 0);
+			ParseElementPushLevel($e, GetNextLevel($e, $l), $ndr, $var_name, $env, 1, !($l->{CONTAINS_DEFERRED} or $l->{IS_DEFERRED}));
 	
 			deindent;
 			pidl "}";
@@ -1038,10 +1038,9 @@
 		}
 
 		if ($primitives or $l->{IS_DEFERRED}) {
-
 			pidl "for ($counter = 0; $counter < $length; $counter++) {";
 			indent;
-			ParseElementPullLevel($e,GetNextLevel($e,$l), $ndr, $var_name, $env, 1, 0);
+			ParseElementPullLevel($e,GetNextLevel($e,$l), $ndr, $var_name, $env, 1, !($l->{CONTAINS_DEFERRED} or $l->{IS_DEFERRED}));
 			deindent;
 			pidl "}";
 		}