mirror of
https://github.com/samba-team/samba.git
synced 2025-02-03 13:47:25 +03:00
r756: Handle default element in union.
This commit is contained in:
parent
f0b2e42978
commit
1ece224c9a
@ -85,9 +85,13 @@ sub DumpUnionElement($)
|
||||
my($element) = shift;
|
||||
my($res);
|
||||
|
||||
$res .= "[case($element->{CASE})] ";
|
||||
$res .= DumpElement($element->{DATA});
|
||||
$res .= ";\n";
|
||||
if ($element->{CASE} eq "default") {
|
||||
$res .= "[default] ;\n";
|
||||
} else {
|
||||
$res .= "[case($element->{CASE})] ";
|
||||
$res .= DumpElement($element->{DATA});
|
||||
$res .= ";\n";
|
||||
}
|
||||
|
||||
return $res;
|
||||
}
|
||||
|
Loading…
x
Reference in New Issue
Block a user