Author: jelmer Date: 2005-02-19 23:46:52 +0000 (Sat, 19 Feb 2005) New Revision: 5463
WebSVN: http://websvn.samba.org/cgi-bin/viewcvs.cgi?view=rev&root=samba&rev=5463 Log: Make need_wire_pointer() return the number of required pointers rather then a bool. Modified: branches/SAMBA_4_0/source/build/pidl/ndr.pm Changeset: Modified: branches/SAMBA_4_0/source/build/pidl/ndr.pm =================================================================== --- branches/SAMBA_4_0/source/build/pidl/ndr.pm 2005-02-19 16:40:19 UTC (rev 5462) +++ branches/SAMBA_4_0/source/build/pidl/ndr.pm 2005-02-19 23:46:52 UTC (rev 5463) @@ -166,15 +166,15 @@ sub need_wire_pointer($) { my $e = shift; - my $pt; - - return 0 unless ($pt = pointer_type($e)); - if ($pt ne "ref") { - return 1; - } else { - return 0; + my $n = $e->{POINTERS}; + my $pt = pointer_type($e); + + if (defined($pt) and $pt eq "ref") { + $n--; } + + return $n; } # determine if an element is a pure scalar. pure scalars do not