#include "config.h"
#endif
-#ifdef _WIN32
+#ifdef HAVE_MALLOC_H
#include <malloc.h>
-#else
+#endif
+
+#ifdef HAVE_ALLOCA_H
#include <alloca.h>
#endif
#include "ia32_new_nodes.h"
#include "gen_ia32_regalloc_if.h"
-#ifdef obstack_chunk_alloc
-# undef obstack_chunk_alloc
-# define obstack_chunk_alloc xmalloc
-#else
-# define obstack_chunk_alloc xmalloc
-# define obstack_chunk_free free
-#endif
-
-extern int obstack_printf(struct obstack *obst, char *fmt, ...);
-
/**
* Returns the ident of a SymConst.
* @param symc The SymConst
break;
case dump_node_nodeattr_txt:
- if (is_ia32_ImmConst(n) || is_ia32_ImmSymConst(n)) {
- char *pref = is_ia32_ImmSymConst(n) ? "SymC" : "";
+ if (is_ia32_ImmConst(n) || is_ia32_ImmSymConst(n) || is_ia32_Cnst(n)) {
+ char *pref = is_ia32_ImmSymConst(n) || (get_ia32_op_type(n) == ia32_SymConst) ? "SymC" : "";
+ const char *cnst = get_ia32_cnst(n);
- fprintf(F, "[%s%s]", pref, get_ia32_cnst(n));
+ fprintf(F, "[%s%s]", pref, cnst ? cnst : "NONE");
}
if (! is_ia32_Lea(n)) {
* Sets the supported addrmode of an ia32 node
*/
void set_ia32_am_support(ir_node *node, ia32_am_type_t am_tp) {
- ia32_attr_t *attr = get_ia32_attr(node);
- attr->data.am_support = am_tp;
+ ia32_attr_t *attr = get_ia32_attr(node);
+ attr->data.am_support = am_tp;
}
/**
* Sets the addrmode flavour of an ia32 node
*/
void set_ia32_am_flavour(ir_node *node, ia32_am_flavour_t am_flavour) {
- ia32_attr_t *attr = get_ia32_attr(node);
- attr->data.am_flavour = am_flavour;
+ ia32_attr_t *attr = get_ia32_attr(node);
+ attr->data.am_flavour = am_flavour;
}
/**
memcpy(&res[1], obstack_base(attr->am_offs), size);
res[size + 1] = '\0';
}
+
return res;
}
extend_ia32_am_offs(node, (char *)offset, '-');
}
+/**
+ * Returns the symconst ident associated to addrmode.
+ */
+ident *get_ia32_am_sc(const ir_node *node) {
+ ia32_attr_t *attr = get_ia32_attr(node);
+ return attr->am_sc;
+}
+
+/**
+ * Sets the symconst ident associated to addrmode.
+ */
+void set_ia32_am_sc(ir_node *node, ident *sc) {
+ ia32_attr_t *attr = get_ia32_attr(node);
+ attr->am_sc = sc;
+}
+
+/**
+ * Sets the sign bit for address mode symconst.
+ */
+void set_ia32_am_sc_sign(ir_node *node) {
+ ia32_attr_t *attr = get_ia32_attr(node);
+ attr->data.am_sc_sign = 1;
+}
+
+/**
+ * Clears the sign bit for address mode symconst.
+ */
+void clear_ia32_am_sc_sign(ir_node *node) {
+ ia32_attr_t *attr = get_ia32_attr(node);
+ attr->data.am_sc_sign = 0;
+}
+
+/**
+ * Returns the sign bit for address mode symconst.
+ */
+int is_ia32_am_sc_sign(const ir_node *node) {
+ ia32_attr_t *attr = get_ia32_attr(node);
+ return attr->data.am_sc_sign;
+}
+
/**
* Gets the addr mode const.
*/
*/
const char *get_ia32_cnst(const ir_node *node) {
ia32_attr_t *attr = get_ia32_attr(node);
+ if (! attr->cnst)
+ return NULL;
return get_id_str(attr->cnst);
}
return attr->data.is_commutative;
}
+/**
+ * Sets node emit_cl.
+ */
+void set_ia32_emit_cl(ir_node *node) {
+ ia32_attr_t *attr = get_ia32_attr(node);
+ attr->data.emit_cl = 1;
+}
+
+/**
+ * Clears node emit_cl.
+ */
+void clear_ia32_emit_cl(ir_node *node) {
+ ia32_attr_t *attr = get_ia32_attr(node);
+ attr->data.emit_cl = 0;
+}
+
+/**
+ * Checks if node is commutative.
+ */
+int is_ia32_emit_cl(const ir_node *node) {
+ ia32_attr_t *attr = get_ia32_attr(node);
+ return attr->data.emit_cl;
+}
+
/**
* Gets the mode of the stored/loaded value (only set for Store/Load)
*/
attr->res_mode = mode;
}
+/**
+ * Gets the source mode of conversion.
+ */
+ir_mode *get_ia32_src_mode(const ir_node *node) {
+ ia32_attr_t *attr = get_ia32_attr(node);
+ return attr->src_mode;
+}
+
+/**
+ * Sets the source mode of conversion.
+ */
+void set_ia32_src_mode(ir_node *node, ir_mode *mode) {
+ ia32_attr_t *attr = get_ia32_attr(node);
+ attr->src_mode = mode;
+}
+
+/**
+ * Gets the target mode of conversion.
+ */
+ir_mode *get_ia32_tgt_mode(const ir_node *node) {
+ ia32_attr_t *attr = get_ia32_attr(node);
+ return attr->tgt_mode;
+}
+
+/**
+ * Sets the target mode of conversion.
+ */
+void set_ia32_tgt_mode(ir_node *node, ir_mode *mode) {
+ ia32_attr_t *attr = get_ia32_attr(node);
+ attr->tgt_mode = mode;
+}
+
/**
* Gets the frame entity assigned to this node;
*/
ia32_attr_t *da = get_ia32_attr(dst);
ia32_attr_t *sa = get_ia32_attr(src);
- switch(get_ia32_op_type(src)) {
+ switch(get_ia32_immop_type(src)) {
case ia32_ImmConst:
da->cnst_val.tv = sa->cnst_val.tv;
da->cnst = sa->cnst;
}
/**
- * Checks if node is a Load or fLoad.
+ * Checks if node is a Load or fLoad/vfLoad.
*/
int is_ia32_Ld(const ir_node *node) {
- return is_ia32_Load(node) || is_ia32_fLoad(node);
+ return is_ia32_Load(node) || is_ia32_fLoad(node) || is_ia32_vfld(node) || is_ia32_fld(node);
}
/**
- * Checks if node is a Store or fStore.
+ * Checks if node is a Store or fStore/vfStore.
*/
int is_ia32_St(const ir_node *node) {
- return is_ia32_Store(node) || is_ia32_fStore(node);
+ return is_ia32_Store(node) || is_ia32_fStore(node) || is_ia32_vfst(node) || is_ia32_fst(node) || is_ia32_fstp(node);
}
/**
- * Checks if node is a Const or fConst.
+ * Checks if node is a Const or fConst/vfConst.
*/
int is_ia32_Cnst(const ir_node *node) {
- return is_ia32_Const(node) || is_ia32_fConst(node);
+ return is_ia32_Const(node) || is_ia32_fConst(node) || is_ia32_vfConst(node);
}
/**
ia32_attr_t *attr = get_ia32_attr(node);
if (num) {
- attr->slots = NEW_ARR_D(arch_register_t *, get_irg_obstack(get_irn_irg(node)), num);
+ attr->slots = (const arch_register_t **)NEW_ARR_D(arch_register_t*, get_irg_obstack(get_irn_irg(node)), num);
memset(attr->slots, 0, sizeof(attr->slots[0]) * num);
}
else {
/* default compare operation to compare immediate ops */
int ia32_compare_immop_attr(ia32_attr_t *a, ia32_attr_t *b) {
+ int equ = 0;
+
if (a->data.tp == b->data.tp) {
- return a->cnst == b->cnst;
+ equ = (a->cnst == b->cnst);
+ equ = equ ? (a->data.use_frame == b->data.use_frame) : 0;
+
+ if (equ && a->data.use_frame && b->data.use_frame)
+ equ = (a->frame_ent == b->frame_ent);
}
- return 1;
+ return !equ;
+}
+
+/* compare converts */
+int ia32_compare_conv_attr(ia32_attr_t *a, ia32_attr_t *b) {
+ int equ = ! ia32_compare_immop_attr(a, b);
+
+ equ = equ ? (a->src_mode == b->src_mode) && (a->tgt_mode == b->tgt_mode) : equ;
+
+ return !equ;
}
/* copies the ia32 attributes */
memcpy(attr_new, attr_old, sizeof(*attr_new));
/* copy the register slots */
- attr_new->slots = NEW_ARR_D(arch_register_t *, get_irg_obstack(get_irn_irg(new_node)), n_res);
+ attr_new->slots = (const arch_register_t **)NEW_ARR_D(arch_register_t*, get_irg_obstack(get_irn_irg(new_node)), n_res);
memcpy((void *)attr_new->slots, (void *)attr_old->slots, sizeof(attr_new->slots[0]) * n_res);
}
}
}
-static void ia32_register_additional_opcodes(int n) {
- /* we don't need any additional opcodes */
-}
-
/* Include the generated constructor functions */
#include "gen_ia32_new_nodes.c.inl"