|
@@ -845,6 +845,11 @@ sub annotate_values {
|
|
|
$av_preprocessor = 0;
|
|
$av_preprocessor = 0;
|
|
|
}
|
|
}
|
|
|
|
|
|
|
|
|
|
+ } elsif ($cur =~ /^(\(\s*$Type\s*)\)/) {
|
|
|
|
|
+ print "CAST($1)\n" if ($dbg_values > 1);
|
|
|
|
|
+ push(@av_paren_type, $type);
|
|
|
|
|
+ $type = 'C';
|
|
|
|
|
+
|
|
|
} elsif ($cur =~ /^($Type)\s*(?:$Ident|,|\)|\(|\s*$)/) {
|
|
} elsif ($cur =~ /^($Type)\s*(?:$Ident|,|\)|\(|\s*$)/) {
|
|
|
print "DECLARE($1)\n" if ($dbg_values > 1);
|
|
print "DECLARE($1)\n" if ($dbg_values > 1);
|
|
|
$type = 'T';
|
|
$type = 'T';
|