- frame = get_irg_frame(irg);
-
- /* store first arg */
- store_l = new_rd_ia32_l_Store(dbg, irg, block, frame, a_l, get_irg_no_mem(irg));
- set_ia32_frame_ent(store_l, ent_a);
- set_ia32_use_frame(store_l);
- set_ia32_ls_mode(store_l, get_irn_mode(a_l));
- op_mem[0] = store_l;
-
- store_h = new_rd_ia32_l_Store(dbg, irg, block, frame, a_h, get_irg_no_mem(irg));
- set_ia32_frame_ent(store_h, ent_a);
- add_ia32_am_offs_int(store_h, mode_bytes);
- set_ia32_use_frame(store_h);
- set_ia32_ls_mode(store_h, get_irn_mode(a_h));
- op_mem[1] = store_h;
-
- mem = new_r_Sync(irg, block, 2, op_mem);
-
- /* load first arg into FPU */
- fa = new_rd_ia32_l_vfild(dbg, irg, block, frame, mem);
- set_ia32_frame_ent(fa, ent_a);
- set_ia32_use_frame(fa);
- set_ia32_ls_mode(fa, mode_D);
- fa_mem = new_r_Proj(irg, block, fa, mode_M, pn_ia32_l_vfild_M);
- fa = new_r_Proj(irg, block, fa, mode_E, pn_ia32_l_vfild_res);
-
- /* store second arg */
- store_l = new_rd_ia32_l_Store(dbg, irg, block, frame, b_l, get_irg_no_mem(irg));
- set_ia32_frame_ent(store_l, ent_b);
- set_ia32_use_frame(store_l);
- set_ia32_ls_mode(store_l, get_irn_mode(b_l));
- op_mem[0] = store_l;
-
- store_h = new_rd_ia32_l_Store(dbg, irg, block, frame, b_h, get_irg_no_mem(irg));
- set_ia32_frame_ent(store_h, ent_b);
- add_ia32_am_offs_int(store_h, mode_bytes);
- set_ia32_use_frame(store_h);
- set_ia32_ls_mode(store_h, get_irn_mode(b_h));
- op_mem[1] = store_h;
-
- mem = new_r_Sync(irg, block, 2, op_mem);
-
- /* load second arg into FPU */
- fb = new_rd_ia32_l_vfild(dbg, irg, block, frame, mem);
- set_ia32_frame_ent(fb, ent_b);
- set_ia32_use_frame(fb);
- set_ia32_ls_mode(fb, mode_D);
- fb_mem = new_r_Proj(irg, block, fb, mode_M, pn_ia32_l_vfild_M);
- fb = new_r_Proj(irg, block, fb, mode_E, pn_ia32_l_vfild_res);
-
- op_mem[0] = fa_mem;
- op_mem[1] = fb_mem;
-
- mem = new_r_Sync(irg, block, 2, op_mem);
-
- /* perform division */
- switch (dmtp) {
- case IA32_INTRINSIC_DIV:
- fres = new_rd_ia32_l_vfdiv(dbg, irg, block, fa, fb);
- fres = new_rd_Proj(dbg, irg, block, fres, mode_E, pn_ia32_l_vfdiv_res);
- break;
- case IA32_INTRINSIC_MOD:
- fres = new_rd_ia32_l_vfprem(dbg, irg, block, fa, fb, mode_E);
- break;
- default:
- assert(0);
+/**
+ * Maps a Div. Change into a library call.
+ */
+static int map_Div(ir_node *call, void *ctx)
+{
+ ia32_intrinsic_env_t *env = (ia32_intrinsic_env_t*)ctx;
+ ir_type *method = get_Call_type(call);
+ ir_mode *h_mode = get_type_mode(get_method_res_type(method, 1));
+ ir_node *ptr;
+ ir_entity *ent;
+ ir_graph *irg = get_irn_irg(call);
+ symconst_symbol sym;
+
+ if (mode_is_signed(h_mode)) {
+ /* 64bit signed Division */
+ ent = env->divdi3;
+ if (ent == NULL) {
+ ent = env->divdi3 = create_compiler_lib_entity("divdi3", method);
+ }
+ } else {
+ /* 64bit unsigned Division */
+ ent = env->udivdi3;
+ if (ent == NULL) {
+ /* create library entity */
+ ent = env->udivdi3 = create_compiler_lib_entity("udivdi3", method);
+ }