OpenE2K
/
gcc
2
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

options, lto: Optimize streaming of optimization nodes 

Honza mentioned that especially for the new param machinery, most of
streamed values are probably going to be the default values.  Perhaps
somehow we could stream them more effectively.

This patch implements it and brings further savings, the size
goes down from 574 bytes to 273 bytes, i.e. less than half.
Not trying to handle enums because the code doesn't know if (enum ...) 10
is even valid, similarly non-parameters because those really generally
don't have large initializers, and params without Init (those are 0
initialized and thus don't need to be handled).

2020-11-18  Jakub Jelinek  <jakub@redhat.com>

	* optc-save-gen.awk: Initialize var_opt_init.  In
	cl_optimization_stream_out for params with default values larger than
	10, xor the default value with the actual parameter value.  In
	cl_optimization_stream_in repeat the above xor.
This commit is contained in:
Jakub Jelinek 2020-11-18 20:14:00 +01:00
parent d326ebc94f
commit 95db7e9afe
1 changed files with 28 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

36
gcc/optc-save-gen.awk
View File

@ -1290,6 +1290,7 @@ for (i = 0; i < n_opts; i++) {
var_opt_val_type[n_opt_val] = otype;
var_opt_val[n_opt_val] = "x_" name;
var_opt_hash[n_opt_val] = flag_set_p("Optimization", flags[i]);
var_opt_init[n_opt_val] = opt_args("Init", flags[i]);
n_opt_val++;
}
}
@ -1361,10 +1362,21 @@ for (i = 0; i < n_opt_val; i++) {
otype = var_opt_val_type[i];
if (otype ~ "^const char \\**$")
print " bp_pack_string (ob, bp, ptr->" name", true);";
else if (otype ~ "^unsigned")
print " bp_pack_var_len_unsigned (bp, ptr->" name");";
else
print " bp_pack_var_len_int (bp, ptr->" name");";
else {
if (otype ~ "^unsigned") {
sgn = "unsigned";
} else {
sgn = "int";
}
if (name ~ "^x_param" && !(otype ~ "^enum ") && var_opt_init[i]) {
print " if (" var_opt_init[i] " > (" var_opt_val_type[i] ") 10)";
print " bp_pack_var_len_" sgn " (bp, ptr->" name" ^ " var_opt_init[i] ");";
print " else";
print " bp_pack_var_len_" sgn " (bp, ptr->" name");";
} else {
print " bp_pack_var_len_" sgn " (bp, ptr->" name");";
}
}
}
print " for (size_t i = 0; i < sizeof (ptr->explicit_mask) / sizeof (ptr->explicit_mask[0]); i++)";
print " bp_pack_value (bp, ptr->explicit_mask[i], 64);";
@ -1385,10 +1397,18 @@ for (i = 0; i < n_opt_val; i++) {
print " if (ptr->" name")";
print " ptr->" name" = xstrdup (ptr->" name");";
}
else if (otype ~ "^unsigned")
print " ptr->" name" = (" var_opt_val_type[i] ") bp_unpack_var_len_unsigned (bp);";
else
print " ptr->" name" = (" var_opt_val_type[i] ") bp_unpack_var_len_int (bp);";
else {
if (otype ~ "^unsigned") {
sgn = "unsigned";
} else {
sgn = "int";
}
print " ptr->" name" = (" var_opt_val_type[i] ") bp_unpack_var_len_" sgn " (bp);";
if (name ~ "^x_param" && !(otype ~ "^enum ") && var_opt_init[i]) {
print " if (" var_opt_init[i] " > (" var_opt_val_type[i] ") 10)";
print " ptr->" name" ^= " var_opt_init[i] ";";
}
}
}
print " for (size_t i = 0; i < sizeof (ptr->explicit_mask) / sizeof (ptr->explicit_mask[0]); i++)";
print " ptr->explicit_mask[i] = bp_unpack_value (bp, 64);";