diff options
author | Andrew Tridgell <tridge@samba.org> | 2003-12-16 04:15:51 +0000 |
---|---|---|
committer | Andrew Tridgell <tridge@samba.org> | 2003-12-16 04:15:51 +0000 |
commit | 1413faae582949e7d12174df7102723eea914464 (patch) | |
tree | fa108c3a756a6769983dc6f7c645eb20079be204 /source4/build/pidl/header.pm | |
parent | b2b9ea54298077cba7df8a7cd849184c40e02e4b (diff) | |
download | samba-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)
Diffstat (limited to 'source4/build/pidl/header.pm')
-rw-r--r-- | source4/build/pidl/header.pm | 6 |
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; } |