1
0
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:
Tim Potter 2004-05-17 11:39:33 +00:00 committed by Gerald (Jerry) Carter
parent f0b2e42978
commit 1ece224c9a

View File

@ -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;
}