diff options
author | Stefan Metzmacher <metze@samba.org> | 2005-05-30 00:19:58 +0000 |
---|---|---|
committer | Gerald (Jerry) Carter <jerry@samba.org> | 2007-10-10 13:17:14 -0500 |
commit | 89a17e60a14783e8560d3babc8a9a328adc3c94c (patch) | |
tree | 7aaa93cd78bb26f76618eab8cf79a04e1fc28633 /source4/build/pidl/com_header.pm | |
parent | 4f1a5b716972bc2af916a528399c9dc0c2f18c35 (diff) | |
download | samba-89a17e60a14783e8560d3babc8a9a328adc3c94c.tar.gz samba-89a17e60a14783e8560d3babc8a9a328adc3c94c.tar.bz2 samba-89a17e60a14783e8560d3babc8a9a328adc3c94c.zip |
r7084: - readd the work from rev 6516,6517,6572
- use a single list of scalars
- let "string" not be so special anymore
- fix support for "string_array"
metze
(This used to be commit e1fa7ae6c8420dc582578e084b9c0d641bcfbd73)
Diffstat (limited to 'source4/build/pidl/com_header.pm')
-rw-r--r-- | source4/build/pidl/com_header.pm | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/source4/build/pidl/com_header.pm b/source4/build/pidl/com_header.pm index 1e178eed85..3300d84092 100644 --- a/source4/build/pidl/com_header.pm +++ b/source4/build/pidl/com_header.pm @@ -17,7 +17,7 @@ sub GetArgumentProtoList($) $res .= ", " . typelist::mapType($a->{TYPE}) . " "; my $l = $a->{POINTERS}; - $l-- if ($a->{TYPE} eq "string"); + $l-- if (typelist::scalar_is_reference($a->{TYPE})); foreach my $i (1..$l) { $res .= "*"; } |