From: Michael Beck <beck@ipd.info.uni-karlsruhe.de>
Date: Fri, 29 May 2009 01:53:01 +0000 (+0000)
Subject: - implemented i_mapper_bswap()
X-Git-Url: http://nsz.repo.hu/git/?a=commitdiff_plain;h=917d00ffbca0550cd99da2c8beb0d44edf9c30c5;p=libfirm

- implemented i_mapper_bswap()

[r26062]
---

diff --git a/include/libfirm/lowering.h b/include/libfirm/lowering.h
index f7c327873..0b38b3500 100644
--- a/include/libfirm/lowering.h
+++ b/include/libfirm/lowering.h
@@ -318,6 +318,14 @@ unsigned lower_intrinsics(i_record *list, int length, int part_block_used);
  */
 int i_mapper_abs(ir_node *call, void *ctx);
 
+/**
+ * A mapper for the integer byte swap value: type bswap(type v).
+ * Replaces the call by a builtin[ir_bk_bswap] node.
+ *
+ * @return always 1
+ */
+int i_mapper_bswap(ir_node *call, void *ctx);
+
 /**
  * A mapper for the floating point sqrt(v): floattype sqrt(floattype v);
  *
diff --git a/ir/lower/lower_intrinsics.c b/ir/lower/lower_intrinsics.c
index 6aaaccf2e..a485cd7ef 100644
--- a/ir/lower/lower_intrinsics.c
+++ b/ir/lower/lower_intrinsics.c
@@ -205,6 +205,24 @@ int i_mapper_abs(ir_node *call, void *ctx) {
 	return 1;
 }  /* i_mapper_abs */
 
+/* A mapper for the integer bswap. */
+int i_mapper_bswap(ir_node *call, void *ctx) {
+	ir_node *mem   = get_Call_mem(call);
+	ir_node *block = get_nodes_block(call);
+	ir_node *op    = get_Call_param(call, 0);
+	ir_type *tp    = get_Call_type(call);
+	dbg_info *dbg  = get_irn_dbg_info(call);
+	ir_node *irn;
+	(void) ctx;
+
+	irn = new_rd_Builtin(dbg, current_ir_graph, block, get_irg_no_mem(current_ir_graph), 1, &op, ir_bk_bswap, tp);
+	set_irn_pinned(irn, op_pin_state_floats);
+	DBG_OPT_ALGSIM0(call, irn, FS_OPT_RTS_ABS);
+	irn = new_r_Proj(current_ir_graph, block, irn, get_irn_mode(op), pn_Builtin_1_result);
+	replace_call(irn, call, mem, NULL, NULL);
+	return 1;
+}  /* i_mapper_bswap */
+
 /* A mapper for the alloca() function. */
 int i_mapper_alloca(ir_node *call, void *ctx) {
 	ir_node *mem   = get_Call_mem(call);