diff options
Diffstat (limited to 'source4/build/pidl/com_header.pm')
| -rw-r--r-- | source4/build/pidl/com_header.pm | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/source4/build/pidl/com_header.pm b/source4/build/pidl/com_header.pm index 95bbc9c720..1e5f338828 100644 --- a/source4/build/pidl/com_header.pm +++ b/source4/build/pidl/com_header.pm @@ -22,14 +22,14 @@ sub GetArgumentProtoList($) $res .= "*"; } - if (defined $a->{ARRAY_LEN} && - !util::is_constant($a->{ARRAY_LEN}) && + if (defined $a->{ARRAY_LEN}[0] && + !util::is_constant($a->{ARRAY_LEN}[0]) && !$a->{POINTERS}) { $res .= "*"; } $res .= $a->{NAME}; - if (defined $a->{ARRAY_LEN} && util::is_constant($a->{ARRAY_LEN})) { - $res .= "[$a->{ARRAY_LEN}]"; + if (defined $a->{ARRAY_LEN}[0] && util::is_constant($a->{ARRAY_LEN}[0])) { + $res .= "[$a->{ARRAY_LEN}[0]]"; } } |