diff options
Diffstat (limited to 'source4/build/pidl/dump.pm')
-rw-r--r-- | source4/build/pidl/dump.pm | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/source4/build/pidl/dump.pm b/source4/build/pidl/dump.pm index 00a57b10b4..9e896cd256 100644 --- a/source4/build/pidl/dump.pm +++ b/source4/build/pidl/dump.pm @@ -47,10 +47,8 @@ sub DumpElement($) ($res .= DumpProperties($element->{PROPERTIES})); $res .= DumpType($element->{TYPE}); $res .= " "; - if ($element->{POINTERS}) { - for (my($i)=0; $i < $element->{POINTERS}; $i++) { + for my $i (1..$element->{POINTERS}) { $res .= "*"; - } } $res .= "$element->{NAME}"; (defined $element->{ARRAY_LEN}) && ($res .= "[$element->{ARRAY_LEN}]"); |