summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorAndrew Tridgell <tridge@samba.org>2003-12-16 04:15:51 +0000
committerAndrew Tridgell <tridge@samba.org>2003-12-16 04:15:51 +0000
commit1413faae582949e7d12174df7102723eea914464 (patch)
treefa108c3a756a6769983dc6f7c645eb20079be204
parentb2b9ea54298077cba7df8a7cd849184c40e02e4b (diff)
downloadsamba-1413faae582949e7d12174df7102723eea914464.tar.gz
samba-1413faae582949e7d12174df7102723eea914464.tar.bz2
samba-1413faae582949e7d12174df7102723eea914464.zip
the out substructure is not empty if there is a return from the
function (This used to be commit d18a08a870aa9ee12ed2913775b70d1b8a09c84b)
-rw-r--r--source4/build/pidl/header.pm6
1 files changed, 6 insertions, 0 deletions
diff --git a/source4/build/pidl/header.pm b/source4/build/pidl/header.pm
index 507455d1a1..c993108f98 100644
--- a/source4/build/pidl/header.pm
+++ b/source4/build/pidl/header.pm
@@ -200,11 +200,17 @@ sub HeaderFunctionInOut_needed($$)
{
my($fn) = shift;
my($prop) = shift;
+
+ if ($prop eq "out" && $fn->{RETURN_TYPE} && $fn->{RETURN_TYPE} ne "void") {
+ return 1;
+ }
+
foreach my $e (@{$fn->{DATA}}) {
if (util::has_property($e, $prop)) {
return 1;
}
}
+
return undef;
}