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 "}"; }