From: Stefan Metzmacher <metze@samba.org>
Date: Wed, 25 Aug 2010 09:02:52 +0000 (+0200)
Subject: pidl:NDR: [in,out,string] doesn't need to pointers
X-Git-Url: http://git.samba.org/?p=metze%2Fsamba%2Fwip.git;a=commitdiff_plain;h=d50d1c90b2f14872d336082b972262031079a226

pidl:NDR: [in,out,string] doesn't need to pointers

metze
---

diff --git a/pidl/lib/Parse/Pidl/NDR.pm b/pidl/lib/Parse/Pidl/NDR.pm
index 2358a2595639..197a92998c9e 100644
--- a/pidl/lib/Parse/Pidl/NDR.pm
+++ b/pidl/lib/Parse/Pidl/NDR.pm
@@ -104,7 +104,7 @@ sub GetElementLevelTable($$)
 	if (has_property($e, "out")) {
 		my $needptrs = 1;
 
-		if (has_property($e, "string")) { $needptrs++; }
+		if (has_property($e, "string") and not has_property($e, "in")) { $needptrs++; }
 		if ($#bracket_array >= 0) { $needptrs = 0; }
 
 		warning($e, "[out] argument `$e->{NAME}' not a pointer") if ($needptrs > $e->{POINTERS});