tree-sra.c (analyze_all_variable_accesses): Dump that a struture is too big for total scalarization.

2011-07-08  Martin Jambor  <mjambor@suse.cz>

	* tree-sra.c (analyze_all_variable_accesses): Dump that a struture
	is too big for total scalarization.

From-SVN: r176033
This commit is contained in:
Martin Jambor 2011-07-08 12:16:51 +02:00 committed by Martin Jambor
parent 00fc1bf6c7
commit e923ef4132
2 changed files with 19 additions and 6 deletions

View file

@ -1,3 +1,8 @@
2011-07-08 Martin Jambor <mjambor@suse.cz>
* tree-sra.c (analyze_all_variable_accesses): Dump that a struture
is too big for total scalarization.
2011-07-07 Richard Henderson <rth@redhat.com>
* config/alpha/elf.h (MIPS_DEBUGGING_INFO): Undef.

View file

@ -2312,16 +2312,24 @@ analyze_all_variable_accesses (void)
tree var = referenced_var (i);
if (TREE_CODE (var) == VAR_DECL
&& ((unsigned) tree_low_cst (TYPE_SIZE (TREE_TYPE (var)), 1)
<= max_total_scalarization_size)
&& type_consists_of_records_p (TREE_TYPE (var)))
{
completely_scalarize_var (var);
if (dump_file && (dump_flags & TDF_DETAILS))
if ((unsigned) tree_low_cst (TYPE_SIZE (TREE_TYPE (var)), 1)
<= max_total_scalarization_size)
{
fprintf (dump_file, "Will attempt to totally scalarize ");
completely_scalarize_var (var);
if (dump_file && (dump_flags & TDF_DETAILS))
{
fprintf (dump_file, "Will attempt to totally scalarize ");
print_generic_expr (dump_file, var, 0);
fprintf (dump_file, " (UID: %u): \n", DECL_UID (var));
}
}
else if (dump_file && (dump_flags & TDF_DETAILS))
{
fprintf (dump_file, "Too big to totally scalarize: ");
print_generic_expr (dump_file, var, 0);
fprintf (dump_file, " (UID: %u): \n", DECL_UID (var));
fprintf (dump_file, " (UID: %u)\n", DECL_UID (var));
}
}
}