diff options
author | Jelmer Vernooij <jelmer@samba.org> | 2005-05-27 14:01:22 +0000 |
---|---|---|
committer | Gerald (Jerry) Carter <jerry@samba.org> | 2007-10-10 13:17:07 -0500 |
commit | aba7014e41b120e8c4bac5d5dab91655b46a2175 (patch) | |
tree | 0475f32f8cd5ee498f9863ac1687864048fbd0a7 /source4/build/pidl/com_header.pm | |
parent | 49791818610cecd877eb5b865cb6cefa90e92ba0 (diff) | |
download | samba-aba7014e41b120e8c4bac5d5dab91655b46a2175.tar.gz samba-aba7014e41b120e8c4bac5d5dab91655b46a2175.tar.bz2 samba-aba7014e41b120e8c4bac5d5dab91655b46a2175.zip |
r7022: Add support for parsing definitions of multi-dimension arrays.
This will also be required for supporting
parsing pointers to arrays and arrays of pointers simultaneously.
(This used to be commit a34f848b02a6e8284d62532a792a5136e846fe8f)
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]]"; } } |