diff mbox

[HSA] Implement DIVMOD internal function call

Message ID 61d9581a-4f90-c8a9-2c33-607397e8c952@suse.cz
State New
Headers show

Commit Message

Martin Liška Jan. 5, 2017, 2:23 p.m. UTC 
As DIVMOD has started to be used on x86_64, HSA targets needs to understand
the internal function call. It's implemented by tuple of division and remainder
or arguments. It's pre-approved by Martin Jambor for both hsa branch and trunk.

Patch can bootstrap on x86_64-linux-gnu and survives regression tests.

Martin
diff mbox

Patch

From 89217a4ce213c0f9bcd4bd157f29e6bc562dd98f Mon Sep 17 00:00:00 2001
From: marxin <mliska@suse.cz>
Date: Tue, 3 Jan 2017 13:50:54 +0100
Subject: [PATCH] HSA: implement DIVMOD internal function call

gcc/ChangeLog:

2017-01-03  Martin Liska  <mliska@suse.cz>

	* hsa-gen.c (gen_hsa_divmod): New function.
	(gen_hsa_insn_for_internal_fn_call): Use the function
	for IFN_DIVMOD.
---
 gcc/hsa-gen.c | 38 ++++++++++++++++++++++++++++++++++++++
 1 file changed, 38 insertions(+)

diff --git a/gcc/hsa-gen.c b/gcc/hsa-gen.c
index f2843b3ed38..632561d5e45 100644
--- a/gcc/hsa-gen.c
+++ b/gcc/hsa-gen.c
@@ -4345,6 +4345,40 @@  gen_hsa_popcount (gcall *call, hsa_bb *hbb)
   gen_hsa_popcount_to_dest (dest, arg, hbb);
 }
 
+/* Emit instructions that implement DIVMOD builtin STMT.
+   Instructions are appended to basic block HBB.  */
+
+static void
+gen_hsa_divmod (gcall *call, hsa_bb *hbb)
+{
+  tree lhs = gimple_call_lhs (call);
+  if (lhs == NULL_TREE)
+    return;
+
+  tree rhs0 = gimple_call_arg (call, 0);
+  tree rhs1 = gimple_call_arg (call, 1);
+
+  hsa_op_with_type *arg0 = hsa_reg_or_immed_for_gimple_op (rhs0, hbb);
+  hsa_op_with_type *arg1 = hsa_reg_or_immed_for_gimple_op (rhs1, hbb);
+
+  hsa_op_reg *dest0 = new hsa_op_reg (arg0->m_type);
+  hsa_op_reg *dest1 = new hsa_op_reg (arg1->m_type);
+
+  hsa_insn_basic *insn = new hsa_insn_basic (3, BRIG_OPCODE_DIV, dest0->m_type,
+					     dest0, arg0, arg1);
+  hbb->append_insn (insn);
+  insn = new hsa_insn_basic (3, BRIG_OPCODE_REM, dest1->m_type, dest1, arg0,
+			     arg1);
+  hbb->append_insn (insn);
+
+  hsa_op_reg *dest = hsa_cfun->reg_for_gimple_ssa (lhs);
+  BrigType16_t src_type = hsa_bittype_for_type (dest0->m_type);
+
+  insn = new hsa_insn_packed (3, BRIG_OPCODE_COMBINE, dest->m_type,
+			      src_type, dest, dest0, dest1);
+  hbb->append_insn (insn);
+}
+
 /* Set VALUE to a shadow kernel debug argument and append a new instruction
    to HBB basic block.  */
 
@@ -5050,6 +5084,10 @@  gen_hsa_insn_for_internal_fn_call (gcall *stmt, hsa_bb *hbb)
       gen_hsa_popcount (stmt, hbb);
       break;
 
+    case IFN_DIVMOD:
+      gen_hsa_divmod (stmt, hbb);
+      break;
+
     case IFN_ACOS:
     case IFN_ASIN:
     case IFN_ATAN:
-- 
2.11.0