+ if (is_ia32_CmpSet(node)) {
+ be_emit_cstring(env, "\tcmp ");
+ ia32_emit_binop(env, node);
+ } else if (is_ia32_xCmpSet(node)) {
+ be_emit_cstring(env, "\tucomis");
+ ia32_emit_mode_suffix(env, get_irn_mode(get_irn_n(node, 2)));
+ be_emit_char(env, ' ');
+ ia32_emit_binop(env, node);
+ } else if (is_ia32_PsiCondSet(node)) {
+ be_emit_cstring(env, "\tcmp $0, ");
+ ia32_emit_source_register(env, node, 0);
+ } else {
+ assert(0 && "unsupported Set");
+ }
+ be_emit_finish_line_gas(env, node);
+
+ /* use mov to clear target because it doesn't affect the eflags */
+ be_emit_cstring(env, "\tmovl $0, %");
+ be_emit_string(env, arch_register_get_name(out));
+ be_emit_finish_line_gas(env, node);
+
+ be_emit_cstring(env, "\tset");
+ ia32_emit_cmp_suffix(env, pnc);
+ be_emit_cstring(env, " %");
+ be_emit_string(env, reg8bit);
+ be_emit_finish_line_gas(env, node);
+}
+
+static void emit_ia32_CmpSet(ia32_emit_env_t *env, const ir_node *node) {
+ Set_emitter(env, node, get_irn_mode(get_irn_n(node, 2)));
+}
+
+static void emit_ia32_PsiCondSet(ia32_emit_env_t *env, const ir_node *node) {
+ Set_emitter(env, node, get_irn_mode(get_irn_n(node, 0)));
+}
+
+static void emit_ia32_xCmpSet(ia32_emit_env_t *env, const ir_node *node) {
+ Set_emitter(env, node, get_irn_mode(get_irn_n(node, 2)));
+}
+
+static void emit_ia32_xCmp(ia32_emit_env_t *env, const ir_node *node) {
+ int sse_pnc = -1;
+ long pnc = get_ia32_pncode(node);
+ long unord = pnc & pn_Cmp_Uo;
+
+ assert( (pnc & ia32_pn_Cmp_Unsigned) == 0);
+
+ switch (pnc) {
+ case pn_Cmp_Leg: /* odered */
+ sse_pnc = 7;
+ break;
+ case pn_Cmp_Uo: /* unordered */
+ sse_pnc = 3;
+ break;
+ case pn_Cmp_Ue:
+ case pn_Cmp_Eq: /* == */
+ sse_pnc = 0;
+ break;
+ case pn_Cmp_Ul:
+ case pn_Cmp_Lt: /* < */
+ sse_pnc = 1;
+ break;
+ case pn_Cmp_Ule:
+ case pn_Cmp_Le: /* <= */
+ sse_pnc = 2;
+ break;
+ case pn_Cmp_Ug:
+ case pn_Cmp_Gt: /* > */
+ sse_pnc = 6;
+ break;
+ case pn_Cmp_Uge:
+ case pn_Cmp_Ge: /* >= */
+ sse_pnc = 5;
+ break;
+ case pn_Cmp_Ne:
+ case pn_Cmp_Lg: /* != */
+ sse_pnc = 4;
+ break;
+ }
+
+ assert(sse_pnc >= 0 && "unsupported compare");
+
+ if (unord && sse_pnc != 3) {
+ /*
+ We need a separate compare against unordered.
+ Quick and Dirty solution:
+ - get some memory on stack
+ - compare
+ - store result
+ - compare
+ - and result and stored result
+ - cleanup stack
+ */
+ be_emit_cstring(env, "\tsubl $8, %esp");
+ be_emit_finish_line_gas(env, node);
+
+ be_emit_cstring(env, "\tcmpsd $3, ");
+ ia32_emit_binop(env, node);
+ be_emit_finish_line_gas(env, node);
+
+ be_emit_cstring(env, "\tmovsd ");
+ ia32_emit_dest_register(env, node, 0);
+ be_emit_cstring(env, ", (%esp)");
+ be_emit_finish_line_gas(env, node);