X-Git-Url: http://nsz.repo.hu/git/?a=blobdiff_plain;f=ir%2Fbe%2FTEMPLATE%2FTEMPLATE_emitter.c;h=d1b999bac973d783aefd47e7b859fffebb991a39;hb=d4bbab11371a9c68aa2a716eaa7589b82a28691e;hp=61d6465b19a3e22a9e0f193a807a61a46b3ef9a9;hpb=2adf84106c02caf097c2d6cf1764706bdc437bcc;p=libfirm

diff --git a/ir/be/TEMPLATE/TEMPLATE_emitter.c b/ir/be/TEMPLATE/TEMPLATE_emitter.c
index 61d6465b1..d1b999bac 100644
--- a/ir/be/TEMPLATE/TEMPLATE_emitter.c
+++ b/ir/be/TEMPLATE/TEMPLATE_emitter.c
@@ -1,5 +1,27 @@
-/* TEMPLATE emitter */
-/* $Id$ */
+/*
+ * Copyright (C) 1995-2008 University of Karlsruhe.  All right reserved.
+ *
+ * This file is part of libFirm.
+ *
+ * This file may be distributed and/or modified under the terms of the
+ * GNU General Public License version 2 as published by the Free Software
+ * Foundation and appearing in the file LICENSE.GPL included in the
+ * packaging of this file.
+ *
+ * Licensees holding valid libFirm Professional Edition licenses may use
+ * this file in accordance with the libFirm Commercial License.
+ * Agreement provided with the Software.
+ *
+ * This file is provided AS IS with NO WARRANTY OF ANY KIND, INCLUDING THE
+ * WARRANTY OF DESIGN, MERCHANTABILITY AND FITNESS FOR A PARTICULAR
+ * PURPOSE.
+ */
+
+/**
+ * @file
+ * @brief   emit assembler for a backend graph
+ * @version $Id$
+ */
 #ifdef HAVE_CONFIG_H
 #include "config.h"
 #endif
@@ -29,8 +51,7 @@
 /**
  * Returns the register at in position pos.
  */
-static const arch_register_t *get_in_reg(const arch_env_t *arch_env,
-                                         const ir_node *node, int pos)
+static const arch_register_t *get_in_reg(const ir_node *node, int pos)
 {
 	ir_node                *op;
 	const arch_register_t  *reg = NULL;
@@ -41,7 +62,7 @@ static const arch_register_t *get_in_reg(const arch_env_t *arch_env,
 	   in register we need. */
 	op = get_irn_n(node, pos);
 
-	reg = arch_get_irn_register(arch_env, op);
+	reg = arch_get_irn_register(op);
 
 	assert(reg && "no in register found");
 	return reg;
@@ -50,8 +71,7 @@ static const arch_register_t *get_in_reg(const arch_env_t *arch_env,
 /**
  * Returns the register at out position pos.
  */
-static const arch_register_t *get_out_reg(const arch_env_t *arch_env,
-                                          const ir_node *node, int pos)
+static const arch_register_t *get_out_reg(const ir_node *node, int pos)
 {
 	ir_node                *proj;
 	const arch_register_t  *reg = NULL;
@@ -62,7 +82,7 @@ static const arch_register_t *get_out_reg(const arch_env_t *arch_env,
 	/*           Proj with the corresponding projnum for the register */
 
 	if (get_irn_mode(node) != mode_T) {
-		reg = arch_get_irn_register(arch_env, node);
+		reg = arch_get_irn_register(node);
 	} else if (is_TEMPLATE_irn(node)) {
 		reg = get_TEMPLATE_out_reg(node, pos);
 	} else {
@@ -72,7 +92,7 @@ static const arch_register_t *get_out_reg(const arch_env_t *arch_env,
 			proj = get_edge_src_irn(edge);
 			assert(is_Proj(proj) && "non-Proj from mode_T node");
 			if (get_Proj_proj(proj) == pos) {
-				reg = arch_get_irn_register(arch_env, proj);
+				reg = arch_get_irn_register(proj);
 				break;
 			}
 		}
@@ -93,30 +113,31 @@ static const arch_register_t *get_out_reg(const arch_env_t *arch_env,
  * |_|                                       |_|
  *************************************************************/
 
-void TEMPLATE_emit_immediate(TEMPLATE_emit_env_t *env, const ir_node *node)
+void TEMPLATE_emit_immediate(const ir_node *node)
 {
+	(void) node;
 	/* TODO */
 }
 
-void TEMPLATE_emit_source_register(TEMPLATE_emit_env_t *env, const ir_node *node, int pos)
+void TEMPLATE_emit_source_register(const ir_node *node, int pos)
 {
-	const arch_register_t *reg = get_in_reg(env->arch_env, node, pos);
-	be_emit_string(env->emit, arch_register_get_name(reg));
+	const arch_register_t *reg = get_in_reg(node, pos);
+	be_emit_string(arch_register_get_name(reg));
 }
 
-void TEMPLATE_emit_dest_register(TEMPLATE_emit_env_t *env, const ir_node *node, int pos)
+void TEMPLATE_emit_dest_register(const ir_node *node, int pos)
 {
-	const arch_register_t *reg = get_out_reg(env->arch_env, node, pos);
-	be_emit_string(env->emit, arch_register_get_name(reg));
+	const arch_register_t *reg = get_out_reg(node, pos);
+	be_emit_string(arch_register_get_name(reg));
 }
 
 /**
  * Returns the target label for a control flow node.
  */
-static void TEMPLATE_emit_cfop_target(TEMPLATE_emit_env_t *env, const ir_node *node) {
+static void TEMPLATE_emit_cfop_target(const ir_node *node) {
 	ir_node *block = get_irn_link(node);
 
-	be_emit_irprintf(env->emit, "BLOCK_%ld", get_irn_node_nr(block));
+	be_emit_irprintf("BLOCK_%ld", get_irn_node_nr(block));
 }
 
 /***********************************************************************************
@@ -132,15 +153,15 @@ static void TEMPLATE_emit_cfop_target(TEMPLATE_emit_env_t *env, const ir_node *n
 /**
  * Emits code for a unconditional jump.
  */
-static void emit_Jmp(TEMPLATE_emit_env_t *env, const ir_node *node) {
+static void emit_Jmp(const ir_node *node) {
 	ir_node *block;
 
 	/* for now, the code works for scheduled and non-schedules blocks */
 	block = get_nodes_block(node);
 
-	be_emit_cstring(env->emit, "\tjmp ");
-	TEMPLATE_emit_cfop_target(env, node);
-	be_emit_finish_line_gas(env->emit, node);
+	be_emit_cstring("\tjmp ");
+	TEMPLATE_emit_cfop_target(node);
+	be_emit_finish_line_gas(node);
 }
 
 /**
@@ -169,20 +190,17 @@ static void TEMPLATE_register_emitters(void) {
 #undef EMIT
 }
 
-typedef void (*emit_func_ptr) (TEMPLATE_emit_env_t *, const ir_node *);
+typedef void (*emit_func_ptr) (const ir_node *);
 
 /**
  * Emits code for a node.
  */
-void TEMPLATE_emit_node(TEMPLATE_emit_env_t *env, const ir_node *node) {
+void TEMPLATE_emit_node(const ir_node *node) {
 	ir_op               *op       = get_irn_op(node);
-	DEBUG_ONLY(firm_dbg_module_t *mod = env->mod;)
-
-	DBG((mod, LEVEL_1, "emitting code for %+F\n", node));
 
 	if (op->ops.generic) {
 		emit_func_ptr func = (emit_func_ptr) op->ops.generic;
-		(*func) (env, node);
+		(*func) (node);
 	} else {
 		ir_fprintf(stderr, "No emitter for node %+F\n", node);
 	}
@@ -193,18 +211,18 @@ void TEMPLATE_emit_node(TEMPLATE_emit_env_t *env, const ir_node *node) {
  * and emits code for each node.
  */
 void TEMPLATE_gen_block(ir_node *block, void *data) {
-	TEMPLATE_emit_env_t *env = data;
 	ir_node *node;
+	(void) data;
 
 	if (! is_Block(block))
 		return;
 
-	be_emit_cstring(env->emit, "BLOCK_");
-	be_emit_irprintf(env->emit, "%ld:\n", get_irn_node_nr(block));
-	be_emit_write_line(env->emit);
+	be_emit_cstring("BLOCK_");
+	be_emit_irprintf("%ld:\n", get_irn_node_nr(block));
+	be_emit_write_line();
 
 	sched_foreach(block, node) {
-		TEMPLATE_emit_node(env, node);
+		TEMPLATE_emit_node(node);
 	}
 }
 
@@ -212,27 +230,27 @@ void TEMPLATE_gen_block(ir_node *block, void *data) {
 /**
  * Emits code for function start.
  */
-void TEMPLATE_emit_func_prolog(TEMPLATE_emit_env_t *env, ir_graph *irg) {
+void TEMPLATE_emit_func_prolog(ir_graph *irg) {
 	const char *irg_name = get_entity_name(get_irg_entity(irg));
 
 	/* TODO: emit function header */
-	be_emit_cstring(env->emit, "/* start of ");
-	be_emit_string(env->emit, irg_name);
-	be_emit_cstring(env->emit, " */\n");
-	be_emit_write_line(env->emit);
+	be_emit_cstring("/* start of ");
+	be_emit_string(irg_name);
+	be_emit_cstring(" */\n");
+	be_emit_write_line();
 }
 
 /**
  * Emits code for function end
  */
-void TEMPLATE_emit_func_epilog(TEMPLATE_emit_env_t *env, ir_graph *irg) {
+void TEMPLATE_emit_func_epilog(ir_graph *irg) {
 	const char *irg_name = get_entity_name(get_irg_entity(irg));
 
 	/* TODO: emit function end */
-	be_emit_cstring(env->emit, "/* end of ");
-	be_emit_string(env->emit, irg_name);
-	be_emit_cstring(env->emit, " */\n");
-	be_emit_write_line(env->emit);
+	be_emit_cstring("/* end of ");
+	be_emit_string(irg_name);
+	be_emit_cstring(" */\n");
+	be_emit_write_line();
 }
 
 /**
@@ -242,6 +260,7 @@ void TEMPLATE_emit_func_epilog(TEMPLATE_emit_env_t *env, ir_graph *irg) {
 void TEMPLATE_gen_labels(ir_node *block, void *env) {
 	ir_node *pred;
 	int n = get_Block_n_cfgpreds(block);
+	(void) env;
 
 	for (n--; n >= 0; n--) {
 		pred = get_Block_cfgpred(block, n);
@@ -252,20 +271,15 @@ void TEMPLATE_gen_labels(ir_node *block, void *env) {
 /**
  * Main driver
  */
-void TEMPLATE_gen_routine(const TEMPLATE_code_gen_t *cg, ir_graph *irg) {
-	TEMPLATE_emit_env_t env;
-
-	env.isa      = (TEMPLATE_isa_t *) cg->arch_env->isa;
-	env.emit     = &env.isa->emit;
-	env.arch_env = cg->arch_env;
-	env.cg       = cg;
-	FIRM_DBG_REGISTER(env.mod, "firm.be.TEMPLATE.emit");
+void TEMPLATE_gen_routine(const TEMPLATE_code_gen_t *cg, ir_graph *irg)
+{
+	(void)cg;
 
 	/* register all emitter functions */
 	TEMPLATE_register_emitters();
 
-	TEMPLATE_emit_func_prolog(&env, irg);
-	irg_block_walk_graph(irg, TEMPLATE_gen_labels, NULL, &env);
-	irg_walk_blkwise_graph(irg, NULL, TEMPLATE_gen_block, &env);
-	TEMPLATE_emit_func_epilog(&env, irg);
+	TEMPLATE_emit_func_prolog(irg);
+	irg_block_walk_graph(irg, TEMPLATE_gen_labels, NULL, NULL);
+	irg_walk_blkwise_graph(irg, NULL, TEMPLATE_gen_block, NULL);
+	TEMPLATE_emit_func_epilog(irg);
 }