X-Git-Url: http://nsz.repo.hu/git/?a=blobdiff_plain;f=testprograms%2Fconst_eval_example.c;h=a8e16359ddb0cf067e25599ba658775602b4e33c;hb=bcc5757a59bb6e319522b4bddc7efe34f6eca949;hp=3ae9f35fbe2dba9f0f2445c34a4daa9feabb7684;hpb=4ea1df63a99fe3e9bf8f0395cdf33c39d4a2c677;p=libfirm diff --git a/testprograms/const_eval_example.c b/testprograms/const_eval_example.c index 3ae9f35fb..a8e16359d 100644 --- a/testprograms/const_eval_example.c +++ b/testprograms/const_eval_example.c @@ -27,27 +27,37 @@ main(void) { ir_graph *irg; type_class *owner; + type_method *method; /* the type of this method */ entity *ent; ir_node *a, *b, *c, *d, *x; - printf("creating an IR graph: CONST_EVAL_EXAMPLE...\n"); + printf("\nCreating an IR graph: CONST_EVAL_EXAMPLE...\n"); init_firm (); /* Try both optimizations: */ set_opt_constant_folding(1); set_opt_cse(1); + set_opt_dead_node_elimination (1); owner = new_type_class (id_from_str ("CONST_EVAL_EXAMPLE", 18)); - ent = new_entity ((type *)owner, id_from_str ("main", 4), NULL); + method = new_type_method (id_from_str("main", 4), 0, 2); + ent = new_entity ((type *)owner, id_from_str ("main", 4), (type *)method); irg = new_ir_graph (ent, 4); - a = new_Const (mode_i, tarval_from_long (mode_i, 5)); - b = new_Const (mode_i, tarval_from_long (mode_i, 7)); + a = new_Const (mode_i, tarval_from_long (mode_i, 7)); + b = new_Const (mode_i, tarval_from_long (mode_i, 5)); x = new_Jmp (); - mature_block (irg->current_block); + mature_block (get_irg_current_block(irg)); + + /* To test const eval on DivMod + c = new_DivMod(get_store(), a, b); + set_store(new_Proj(c, mode_M, 0)); + d = new_Proj(c, mode_i, 3); + c = new_Proj(c, mode_i, 2); + */ c = new_Add (new_Const (mode_i, tarval_from_long (mode_i, 5)), new_Const (mode_i, tarval_from_long (mode_i, 7)), @@ -64,17 +74,20 @@ main(void) x = new_Return (get_store (), 2, in); } - add_in_edge (irg->end_block, x); - mature_block (irg->end_block); + add_in_edge (get_irg_end_block(irg), x); + mature_block (get_irg_end_block(irg)); + + printf("Optimizing ...\n"); + dead_node_elimination(irg); + printf("Done building the graph. Dumping it.\n"); /* verify the graph */ - vrfy_graph(irg); + irg_vrfy(irg); - printf("\nDone building the graph. Dumping it.\n"); dump_ir_block_graph (irg); printf("use xvcg to view this graph:\n"); - printf("/ben/goetz/bin/xvcg GRAPHNAME\n"); + printf("/ben/goetz/bin/xvcg GRAPHNAME\n\n"); return (0); }