mirror of
https://github.com/samba-team/samba.git
synced 2025-01-11 05:18:09 +03:00
pidl Parse::Pidl::NDR: warn of unknown scalar alignments
Signed-off-by: Douglas Bagnall <douglas.bagnall@catalyst.net.nz> Reviewed-by: Andrew Bartlett <abartlet@samba.org>
This commit is contained in:
parent
4de002a0f7
commit
33255102ac
@ -469,7 +469,12 @@ sub align_type($)
|
|||||||
my ($e) = @_;
|
my ($e) = @_;
|
||||||
|
|
||||||
if (ref($e) eq "HASH" and $e->{TYPE} eq "SCALAR") {
|
if (ref($e) eq "HASH" and $e->{TYPE} eq "SCALAR") {
|
||||||
return $scalar_alignment->{$e->{NAME}};
|
my $ret = $scalar_alignment->{$e->{NAME}};
|
||||||
|
if (not defined $ret) {
|
||||||
|
warning($e, "no scalar alignment for $e->{NAME}!");
|
||||||
|
return 0;
|
||||||
|
}
|
||||||
|
return $ret;
|
||||||
}
|
}
|
||||||
|
|
||||||
return 0 if ($e eq "EMPTY");
|
return 0 if ($e eq "EMPTY");
|
||||||
|
Loading…
Reference in New Issue
Block a user