Commit c9b4f601 authored by Hans Leidekker's avatar Hans Leidekker Committed by Alexandre Julliard

Fixed misuse of scalar reference variable.

parent eca464b6
...@@ -264,14 +264,14 @@ sub _refresh { ...@@ -264,14 +264,14 @@ sub _refresh {
my $bits = $3; my $bits = $3;
} }
my $base_size = &$$find_size($base_type_name); my $base_size = &$$find_size($base_type_name);
my $align = &$$find_align($base_type_name); $$align = &$$find_align($base_type_name);
if (defined($align)) { if (defined($$align)) {
$align = $pack if $align > $pack; $$align = $pack if $$align > $pack;
$max_field_align = $align if $align > $max_field_align; $max_field_align = $$align if $$align > $max_field_align;
if ($offset % $align != 0) { if ($offset % $$align != 0) {
$offset = (int($offset / $align) + 1) * $align; $offset = (int($offset / $$align) + 1) * $$align;
} }
} }
...@@ -289,14 +289,14 @@ sub _refresh { ...@@ -289,14 +289,14 @@ sub _refresh {
$offset_bits = 0; $offset_bits = 0;
} }
$$$field_aligns[$n] = $align; $$$field_aligns[$n] = $$align;
$$$field_base_sizes[$n] = $base_size; $$$field_base_sizes[$n] = $base_size;
$$$field_offsets[$n] = $offset; $$$field_offsets[$n] = $offset;
$$$field_sizes[$n] = $type_size; $$$field_sizes[$n] = $type_size;
$offset += $type_size; $offset += $type_size;
} else { } else {
$$$field_aligns[$n] = $align; $$$field_aligns[$n] = $$align;
$$$field_base_sizes[$n] = $base_size; $$$field_base_sizes[$n] = $base_size;
$$$field_offsets[$n] = $offset; $$$field_offsets[$n] = $offset;
$$$field_sizes[$n] = $type_size; $$$field_sizes[$n] = $type_size;
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment