git.samba.org
/
metze
/
samba
/
wip.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
4de002a
)
pidl Parse::Pidl::NDR: warn of unknown scalar alignments
author
Douglas Bagnall
<douglas.bagnall@catalyst.net.nz>
Sat, 30 Nov 2019 11:41:42 +0000
(
00:41
+1300)
committer
Andrew Bartlett
<abartlet@samba.org>
Tue, 10 Dec 2019 02:53:35 +0000
(
02:53
+0000)
Signed-off-by: Douglas Bagnall <douglas.bagnall@catalyst.net.nz>
Reviewed-by: Andrew Bartlett <abartlet@samba.org>
pidl/lib/Parse/Pidl/NDR.pm
patch
|
blob
|
history
diff --git
a/pidl/lib/Parse/Pidl/NDR.pm
b/pidl/lib/Parse/Pidl/NDR.pm
index dec5e95423089ca6d12ff38777de9bff885c3141..f48b0f8bb12d66cd4f1588151010339288996ab8 100644
(file)
--- a/
pidl/lib/Parse/Pidl/NDR.pm
+++ b/
pidl/lib/Parse/Pidl/NDR.pm
@@
-469,7
+469,12
@@
sub align_type($)
my ($e) = @_;
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");