summaryrefslogtreecommitdiff
path: root/source4/pidl/lib
diff options
context:
space:
mode:
authorStefan Metzmacher <metze@samba.org>2005-10-10 11:47:23 +0000
committerGerald (Jerry) Carter <jerry@samba.org>2007-10-10 13:39:38 -0500
commitb94fcbd306bbf758d26fb40c7c0a1b00ba6fe38d (patch)
tree434bc01d544becf32a0ba22cd96eefaf8b102826 /source4/pidl/lib
parentb0e342e389d19377ad6c1b4236e60306d662ddab (diff)
downloadsamba-b94fcbd306bbf758d26fb40c7c0a1b00ba6fe38d.tar.gz
samba-b94fcbd306bbf758d26fb40c7c0a1b00ba6fe38d.tar.bz2
samba-b94fcbd306bbf758d26fb40c7c0a1b00ba6fe38d.zip
r10868: make flag(NDR_PAHEX) possible to use and show the union level in hex
metze (This used to be commit 7efb92adc057ad8a993eb9de66c3806608747104)
Diffstat (limited to 'source4/pidl/lib')
-rw-r--r--source4/pidl/lib/Parse/Pidl/Samba/NDR/Parser.pm8
1 files changed, 5 insertions, 3 deletions
diff --git a/source4/pidl/lib/Parse/Pidl/Samba/NDR/Parser.pm b/source4/pidl/lib/Parse/Pidl/Samba/NDR/Parser.pm
index da60a02059..2ccbc057fc 100644
--- a/source4/pidl/lib/Parse/Pidl/Samba/NDR/Parser.pm
+++ b/source4/pidl/lib/Parse/Pidl/Samba/NDR/Parser.pm
@@ -1624,15 +1624,17 @@ sub ParseUnionPrint($$)
my ($e,$name) = @_;
my $have_default = 0;
- pidl "int level = ndr_print_get_switch_value(ndr, r);";
-
+ pidl "int level;";
foreach my $el (@{$e->{ELEMENTS}}) {
DeclareArrayVariables($el);
}
- pidl "ndr_print_union(ndr, name, level, \"$name\");";
start_flags($e);
+ pidl "level = ndr_print_get_switch_value(ndr, r);";
+
+ pidl "ndr_print_union(ndr, name, level, \"$name\");";
+
pidl "switch (level) {";
indent;
foreach my $el (@{$e->{ELEMENTS}}) {