From 7ab4731cd9f9fc174f3a8ff668dae66af010d861 Mon Sep 17 00:00:00 2001 From: Tim Potter Date: Mon, 10 Dec 2001 06:23:52 +0000 Subject: Fix for pointers to structures in function args. (This used to be commit e35c62267fb605c4813f7c6178c6061806c74482) --- source4/build/pidl/eparser.pm | 9 +++++++++ 1 file changed, 9 insertions(+) diff --git a/source4/build/pidl/eparser.pm b/source4/build/pidl/eparser.pm index f2129dc59a..420668109d 100644 --- a/source4/build/pidl/eparser.pm +++ b/source4/build/pidl/eparser.pm @@ -236,6 +236,15 @@ sub ParseFunctionArg($$) my($io) = shift; # "in" or "out" if (has_property($arg->{PROPERTIES}, $io)) { + + # For some reason, pointers to elements in function definitions + # aren't parsed. + + if (defined($arg->{POINTERS}) && !is_scalar_type($arg->{TYPE})) { + $arg->{POINTERS} -= 1, if ($arg->{POINTERS} > 0); + delete($arg->{POINTERS}), if ($arg->{POINTERS} == 0); + } + ParseElement($arg, "scalars|buffers"); } } -- cgit