diff options
| author | Martin Jambor <mjambor@suse.cz> | 2009-11-11 16:07:18 +0100 |
|---|---|---|
| committer | Martin Jambor <jamborm@gcc.gnu.org> | 2009-11-11 16:07:18 +0100 |
| commit | 05d3aa37b35924bdbc3f321581716bf9c05b765b (patch) | |
| tree | 62264c60df4ebbfeba0f0b101b7a682e9c5131c2 | |
| parent | 814a4c3b3548e6fae72992026982d3ce8a186568 (diff) | |
| download | gcc-05d3aa37b35924bdbc3f321581716bf9c05b765b.zip gcc-05d3aa37b35924bdbc3f321581716bf9c05b765b.tar.gz gcc-05d3aa37b35924bdbc3f321581716bf9c05b765b.tar.bz2 | |
re PR lto/41932 (LTO ICE when compiling ocaml trunk (incompatible type))
2009-11-11 Martin Jambor <mjambor@suse.cz>
PR lto/41932
* ipa-prop.c (ipa_update_after_lto_read): Call
ipa_check_create_node_params and ipa_check_create_edge_args. Also
call ipa_initialize_node_params instead of ipa_populate_param_decls.
From-SVN: r154095
| -rw-r--r-- | gcc/ChangeLog | 7 | ||||
| -rw-r--r-- | gcc/ipa-prop.c | 5 |
2 files changed, 11 insertions, 1 deletions
diff --git a/gcc/ChangeLog b/gcc/ChangeLog index 04b4498..0527382 100644 --- a/gcc/ChangeLog +++ b/gcc/ChangeLog @@ -1,3 +1,10 @@ +2009-11-11 Martin Jambor <mjambor@suse.cz> + + PR lto/41932 + * ipa-prop.c (ipa_update_after_lto_read): Call + ipa_check_create_node_params and ipa_check_create_edge_args. Also + call ipa_initialize_node_params instead of ipa_populate_param_decls. + 2009-11-11 Daniel Jacobowitz <dan@codesourcery.com> * config/arm/arm.c (neon_vdup_constant, neon_make_constant): New. diff --git a/gcc/ipa-prop.c b/gcc/ipa-prop.c index 9956fbc..31f4351 100644 --- a/gcc/ipa-prop.c +++ b/gcc/ipa-prop.c @@ -2158,11 +2158,14 @@ ipa_update_after_lto_read (void) struct cgraph_node *node; struct cgraph_edge *cs; + ipa_check_create_node_params (); + ipa_check_create_edge_args (); + for (node = cgraph_nodes; node; node = node->next) { if (!node->analyzed) continue; - ipa_populate_param_decls (node, IPA_NODE_REF (node)); + ipa_initialize_node_params (node); for (cs = node->callees; cs; cs = cs->next_callee) { if (ipa_get_cs_argument_count (IPA_EDGE_REF (cs)) |