From b7a6971ce10fb3934d907947562ab5032cb9dae9 Mon Sep 17 00:00:00 2001 From: Andrew Tridgell Date: Sun, 9 Nov 2003 07:22:48 +0000 Subject: - handle void functions - bettenicer handling of PROPERTIES - handle size_is() on an out variable that refers to an in variable (This used to be commit 33d9b75783651ccb02f895bc9e0b0d0d59f67b1d) --- source4/build/pidl/eparser.pm | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'source4/build/pidl/eparser.pm') diff --git a/source4/build/pidl/eparser.pm b/source4/build/pidl/eparser.pm index bc69d831c8..02c4063102 100644 --- a/source4/build/pidl/eparser.pm +++ b/source4/build/pidl/eparser.pm @@ -74,7 +74,7 @@ sub ParseElement($$) # Arg is a policy handle - if (util::has_property($elt->{PROPERTIES}, "context_handle")) { + if (util::has_property($elt, "context_handle")) { $res .= "\toffset = prs_policy_hnd(tvb, offset, pinfo, tree);\n"; return; } @@ -110,7 +110,7 @@ sub ParseElement($$) $res .= "\t\tif (ptr_$elt->{NAME})\n\t"; } - if (util::has_property($elt->{PROPERTIES}, "size_is")) { + if (util::has_property($elt, "size_is")) { ParseArray($elt); } else { $res .= "\t\toffset = prs_$elt->{TYPE}(tvb, offset, pinfo, tree, "; @@ -221,7 +221,7 @@ sub ParseFunctionArg($$) my($arg) = shift; my($io) = shift; # "in" or "out" - if (util::has_property($arg->{PROPERTIES}, $io)) { + if (util::has_property($arg, $io)) { # For some reason, pointers to elements in function definitions # aren't parsed. -- cgit