|
@@ -944,7 +944,6 @@ void tcg_context_init(TCGContext *s)
|
|
|
int op, total_args, n, i;
|
|
|
TCGOpDef *def;
|
|
|
TCGArgConstraint *args_ct;
|
|
|
- int *sorted_args;
|
|
|
TCGTemp *ts;
|
|
|
|
|
|
memset(s, 0, sizeof(*s));
|
|
@@ -959,15 +958,12 @@ void tcg_context_init(TCGContext *s)
|
|
|
total_args += n;
|
|
|
}
|
|
|
|
|
|
- args_ct = g_malloc(sizeof(TCGArgConstraint) * total_args);
|
|
|
- sorted_args = g_malloc(sizeof(int) * total_args);
|
|
|
+ args_ct = g_new0(TCGArgConstraint, total_args);
|
|
|
|
|
|
for(op = 0; op < NB_OPS; op++) {
|
|
|
def = &tcg_op_defs[op];
|
|
|
def->args_ct = args_ct;
|
|
|
- def->sorted_args = sorted_args;
|
|
|
n = def->nb_iargs + def->nb_oargs;
|
|
|
- sorted_args += n;
|
|
|
args_ct += n;
|
|
|
}
|
|
|
|
|
@@ -2198,21 +2194,14 @@ static void tcg_dump_ops(TCGContext *s, bool have_prefs)
|
|
|
/* we give more priority to constraints with less registers */
|
|
|
static int get_constraint_priority(const TCGOpDef *def, int k)
|
|
|
{
|
|
|
- const TCGArgConstraint *arg_ct;
|
|
|
+ const TCGArgConstraint *arg_ct = &def->args_ct[k];
|
|
|
+ int n;
|
|
|
|
|
|
- int i, n;
|
|
|
- arg_ct = &def->args_ct[k];
|
|
|
- if (arg_ct->ct & TCG_CT_ALIAS) {
|
|
|
+ if (arg_ct->oalias) {
|
|
|
/* an alias is equivalent to a single register */
|
|
|
n = 1;
|
|
|
} else {
|
|
|
- if (!(arg_ct->ct & TCG_CT_REG))
|
|
|
- return 0;
|
|
|
- n = 0;
|
|
|
- for(i = 0; i < TCG_TARGET_NB_REGS; i++) {
|
|
|
- if (tcg_regset_test_reg(arg_ct->u.regs, i))
|
|
|
- n++;
|
|
|
- }
|
|
|
+ n = ctpop64(arg_ct->regs);
|
|
|
}
|
|
|
return TCG_TARGET_NB_REGS - n + 1;
|
|
|
}
|
|
@@ -2220,20 +2209,23 @@ static int get_constraint_priority(const TCGOpDef *def, int k)
|
|
|
/* sort from highest priority to lowest */
|
|
|
static void sort_constraints(TCGOpDef *def, int start, int n)
|
|
|
{
|
|
|
- int i, j, p1, p2, tmp;
|
|
|
+ int i, j;
|
|
|
+ TCGArgConstraint *a = def->args_ct;
|
|
|
|
|
|
- for(i = 0; i < n; i++)
|
|
|
- def->sorted_args[start + i] = start + i;
|
|
|
- if (n <= 1)
|
|
|
+ for (i = 0; i < n; i++) {
|
|
|
+ a[start + i].sort_index = start + i;
|
|
|
+ }
|
|
|
+ if (n <= 1) {
|
|
|
return;
|
|
|
- for(i = 0; i < n - 1; i++) {
|
|
|
- for(j = i + 1; j < n; j++) {
|
|
|
- p1 = get_constraint_priority(def, def->sorted_args[start + i]);
|
|
|
- p2 = get_constraint_priority(def, def->sorted_args[start + j]);
|
|
|
+ }
|
|
|
+ for (i = 0; i < n - 1; i++) {
|
|
|
+ for (j = i + 1; j < n; j++) {
|
|
|
+ int p1 = get_constraint_priority(def, a[start + i].sort_index);
|
|
|
+ int p2 = get_constraint_priority(def, a[start + j].sort_index);
|
|
|
if (p1 < p2) {
|
|
|
- tmp = def->sorted_args[start + i];
|
|
|
- def->sorted_args[start + i] = def->sorted_args[start + j];
|
|
|
- def->sorted_args[start + j] = tmp;
|
|
|
+ int tmp = a[start + i].sort_index;
|
|
|
+ a[start + i].sort_index = a[start + j].sort_index;
|
|
|
+ a[start + j].sort_index = tmp;
|
|
|
}
|
|
|
}
|
|
|
}
|
|
@@ -2268,8 +2260,6 @@ static void process_op_defs(TCGContext *s)
|
|
|
/* Incomplete TCGTargetOpDef entry. */
|
|
|
tcg_debug_assert(ct_str != NULL);
|
|
|
|
|
|
- def->args_ct[i].u.regs = 0;
|
|
|
- def->args_ct[i].ct = 0;
|
|
|
while (*ct_str != '\0') {
|
|
|
switch(*ct_str) {
|
|
|
case '0' ... '9':
|
|
@@ -2277,19 +2267,19 @@ static void process_op_defs(TCGContext *s)
|
|
|
int oarg = *ct_str - '0';
|
|
|
tcg_debug_assert(ct_str == tdefs->args_ct_str[i]);
|
|
|
tcg_debug_assert(oarg < def->nb_oargs);
|
|
|
- tcg_debug_assert(def->args_ct[oarg].ct & TCG_CT_REG);
|
|
|
- /* TCG_CT_ALIAS is for the output arguments.
|
|
|
- The input is tagged with TCG_CT_IALIAS. */
|
|
|
+ tcg_debug_assert(def->args_ct[oarg].regs != 0);
|
|
|
def->args_ct[i] = def->args_ct[oarg];
|
|
|
- def->args_ct[oarg].ct |= TCG_CT_ALIAS;
|
|
|
+ /* The output sets oalias. */
|
|
|
+ def->args_ct[oarg].oalias = true;
|
|
|
def->args_ct[oarg].alias_index = i;
|
|
|
- def->args_ct[i].ct |= TCG_CT_IALIAS;
|
|
|
+ /* The input sets ialias. */
|
|
|
+ def->args_ct[i].ialias = true;
|
|
|
def->args_ct[i].alias_index = oarg;
|
|
|
}
|
|
|
ct_str++;
|
|
|
break;
|
|
|
case '&':
|
|
|
- def->args_ct[i].ct |= TCG_CT_NEWREG;
|
|
|
+ def->args_ct[i].newreg = true;
|
|
|
ct_str++;
|
|
|
break;
|
|
|
case 'i':
|
|
@@ -2855,13 +2845,13 @@ static void liveness_pass_1(TCGContext *s)
|
|
|
pset = la_temp_pref(ts);
|
|
|
set = *pset;
|
|
|
|
|
|
- set &= ct->u.regs;
|
|
|
- if (ct->ct & TCG_CT_IALIAS) {
|
|
|
+ set &= ct->regs;
|
|
|
+ if (ct->ialias) {
|
|
|
set &= op->output_pref[ct->alias_index];
|
|
|
}
|
|
|
/* If the combination is not possible, restart. */
|
|
|
if (set == 0) {
|
|
|
- set = ct->u.regs;
|
|
|
+ set = ct->regs;
|
|
|
}
|
|
|
*pset = set;
|
|
|
}
|
|
@@ -3551,8 +3541,8 @@ static void tcg_reg_alloc_dup(TCGContext *s, const TCGOp *op)
|
|
|
return;
|
|
|
}
|
|
|
|
|
|
- dup_out_regs = tcg_op_defs[INDEX_op_dup_vec].args_ct[0].u.regs;
|
|
|
- dup_in_regs = tcg_op_defs[INDEX_op_dup_vec].args_ct[1].u.regs;
|
|
|
+ dup_out_regs = tcg_op_defs[INDEX_op_dup_vec].args_ct[0].regs;
|
|
|
+ dup_in_regs = tcg_op_defs[INDEX_op_dup_vec].args_ct[1].regs;
|
|
|
|
|
|
/* Allocate the output register now. */
|
|
|
if (ots->val_type != TEMP_VAL_REG) {
|
|
@@ -3659,7 +3649,7 @@ static void tcg_reg_alloc_op(TCGContext *s, const TCGOp *op)
|
|
|
for (k = 0; k < nb_iargs; k++) {
|
|
|
TCGRegSet i_preferred_regs, o_preferred_regs;
|
|
|
|
|
|
- i = def->sorted_args[nb_oargs + k];
|
|
|
+ i = def->args_ct[nb_oargs + k].sort_index;
|
|
|
arg = op->args[i];
|
|
|
arg_ct = &def->args_ct[i];
|
|
|
ts = arg_temp(arg);
|
|
@@ -3673,7 +3663,7 @@ static void tcg_reg_alloc_op(TCGContext *s, const TCGOp *op)
|
|
|
}
|
|
|
|
|
|
i_preferred_regs = o_preferred_regs = 0;
|
|
|
- if (arg_ct->ct & TCG_CT_IALIAS) {
|
|
|
+ if (arg_ct->ialias) {
|
|
|
o_preferred_regs = op->output_pref[arg_ct->alias_index];
|
|
|
if (ts->fixed_reg) {
|
|
|
/* if fixed register, we must allocate a new register
|
|
@@ -3695,9 +3685,8 @@ static void tcg_reg_alloc_op(TCGContext *s, const TCGOp *op)
|
|
|
int k2, i2;
|
|
|
reg = ts->reg;
|
|
|
for (k2 = 0 ; k2 < k ; k2++) {
|
|
|
- i2 = def->sorted_args[nb_oargs + k2];
|
|
|
- if ((def->args_ct[i2].ct & TCG_CT_IALIAS) &&
|
|
|
- reg == new_args[i2]) {
|
|
|
+ i2 = def->args_ct[nb_oargs + k2].sort_index;
|
|
|
+ if (def->args_ct[i2].ialias && reg == new_args[i2]) {
|
|
|
goto allocate_in_reg;
|
|
|
}
|
|
|
}
|
|
@@ -3706,10 +3695,10 @@ static void tcg_reg_alloc_op(TCGContext *s, const TCGOp *op)
|
|
|
}
|
|
|
}
|
|
|
|
|
|
- temp_load(s, ts, arg_ct->u.regs, i_allocated_regs, i_preferred_regs);
|
|
|
+ temp_load(s, ts, arg_ct->regs, i_allocated_regs, i_preferred_regs);
|
|
|
reg = ts->reg;
|
|
|
|
|
|
- if (tcg_regset_test_reg(arg_ct->u.regs, reg)) {
|
|
|
+ if (tcg_regset_test_reg(arg_ct->regs, reg)) {
|
|
|
/* nothing to do : the constraint is satisfied */
|
|
|
} else {
|
|
|
allocate_in_reg:
|
|
@@ -3717,7 +3706,7 @@ static void tcg_reg_alloc_op(TCGContext *s, const TCGOp *op)
|
|
|
and move the temporary register into it */
|
|
|
temp_load(s, ts, tcg_target_available_regs[ts->type],
|
|
|
i_allocated_regs, 0);
|
|
|
- reg = tcg_reg_alloc(s, arg_ct->u.regs, i_allocated_regs,
|
|
|
+ reg = tcg_reg_alloc(s, arg_ct->regs, i_allocated_regs,
|
|
|
o_preferred_regs, ts->indirect_base);
|
|
|
if (!tcg_out_mov(s, ts->type, reg, ts->reg)) {
|
|
|
/*
|
|
@@ -3760,7 +3749,7 @@ static void tcg_reg_alloc_op(TCGContext *s, const TCGOp *op)
|
|
|
|
|
|
/* satisfy the output constraints */
|
|
|
for(k = 0; k < nb_oargs; k++) {
|
|
|
- i = def->sorted_args[k];
|
|
|
+ i = def->args_ct[k].sort_index;
|
|
|
arg = op->args[i];
|
|
|
arg_ct = &def->args_ct[i];
|
|
|
ts = arg_temp(arg);
|
|
@@ -3768,15 +3757,14 @@ static void tcg_reg_alloc_op(TCGContext *s, const TCGOp *op)
|
|
|
/* ENV should not be modified. */
|
|
|
tcg_debug_assert(!ts->fixed_reg);
|
|
|
|
|
|
- if ((arg_ct->ct & TCG_CT_ALIAS)
|
|
|
- && !const_args[arg_ct->alias_index]) {
|
|
|
+ if (arg_ct->oalias && !const_args[arg_ct->alias_index]) {
|
|
|
reg = new_args[arg_ct->alias_index];
|
|
|
- } else if (arg_ct->ct & TCG_CT_NEWREG) {
|
|
|
- reg = tcg_reg_alloc(s, arg_ct->u.regs,
|
|
|
+ } else if (arg_ct->newreg) {
|
|
|
+ reg = tcg_reg_alloc(s, arg_ct->regs,
|
|
|
i_allocated_regs | o_allocated_regs,
|
|
|
op->output_pref[k], ts->indirect_base);
|
|
|
} else {
|
|
|
- reg = tcg_reg_alloc(s, arg_ct->u.regs, o_allocated_regs,
|
|
|
+ reg = tcg_reg_alloc(s, arg_ct->regs, o_allocated_regs,
|
|
|
op->output_pref[k], ts->indirect_base);
|
|
|
}
|
|
|
tcg_regset_set_reg(o_allocated_regs, reg);
|