From: Michael Beck <beck@ipd.info.uni-karlsruhe.de>
Date: Sat, 3 May 2008 17:38:04 +0000 (+0000)
Subject: set the floating point model for the firm graph
X-Git-Url: http://nsz.repo.hu/git/?a=commitdiff_plain;h=217ef02aec96091723e8a0e9d63084089d780f73;p=cparser

set the floating point model for the firm graph

[r19498]
---

diff --git a/ast2firm.c b/ast2firm.c
index 7db20e2..80d6178 100644
--- a/ast2firm.c
+++ b/ast2firm.c
@@ -4703,12 +4703,17 @@ static void create_function(declaration_t *declaration)
 
 	int       n_local_vars = get_function_n_local_vars(declaration);
 	ir_graph *irg          = new_ir_graph(function_entity, n_local_vars);
-	ir_node  *first_block  = get_cur_block();
+
+	set_irg_fp_model(irg, firm_opt.fp_model);
+	tarval_enable_fp_ops((firm_opt.fp_model & fp_strict_algebraic) == 0);
+	set_irn_dbg_info(get_irg_start_block(irg), get_entity_dbg_info(function_entity));
+
+	ir_node *first_block = get_cur_block();
 
 	/* set inline flags */
 	if (declaration->is_inline)
-    	set_irg_inline_property(irg, irg_inline_recomended);
-    handle_decl_modifier_irg(irg, declaration->decl_modifiers);
+		set_irg_inline_property(irg, irg_inline_recomended);
+	handle_decl_modifier_irg(irg, declaration->decl_modifiers);
 
 	next_value_number_function = 0;
 	initialize_function_parameters(declaration);