From 1f2fa49b200b0cceb79b52f5deca973476028ac1 Mon Sep 17 00:00:00 2001 From: Tim Potter Date: Sun, 9 May 2004 10:55:54 +0000 Subject: r604: Better dumping of in,out,ref properties. (This used to be commit 209f5a25a950e8780e9512b71fbb12b1cdbe1a17) --- source4/build/pidl/dump.pm | 12 ++++++++++++ 1 file changed, 12 insertions(+) (limited to 'source4/build') diff --git a/source4/build/pidl/dump.pm b/source4/build/pidl/dump.pm index 435866029e..d895863536 100644 --- a/source4/build/pidl/dump.pm +++ b/source4/build/pidl/dump.pm @@ -18,6 +18,18 @@ sub DumpProperties($) foreach my $d ($props) { foreach my $k (keys %{$d}) { + if ($k eq "in") { + $res .= "[in] "; + next; + } + if ($k eq "out") { + $res .= "[out] "; + next; + } + if ($k eq "ref") { + $res .= "[ref] "; + next; + } $res .= "[$k($d->{$k})] "; } } -- cgit