2 * regalloc.c: register state class
5 * Paolo Molaro (lupus@ximian.com)
7 * (C) 2003 Ximian, Inc.
12 mono_regstate_new (void)
14 MonoRegState* rs = g_new0 (MonoRegState, 1);
16 mono_regstate_reset (rs);
22 mono_regstate_free (MonoRegState *rs) {
29 mono_regstate_reset (MonoRegState *rs) {
30 rs->next_vireg = MONO_MAX_IREGS;
31 rs->next_vfreg = MONO_MAX_FREGS;
35 mono_regstate_assign (MonoRegState *rs) {
38 rs->iassign = g_malloc (MAX (MONO_MAX_IREGS, rs->next_vireg) * sizeof (int));
39 for (i = 0; i < MONO_MAX_IREGS; ++i) {
41 rs->isymbolic [i] = 0;
43 for (; i < rs->next_vireg; ++i)
47 rs->fassign = g_malloc (MAX (MONO_MAX_FREGS, rs->next_vfreg) * sizeof (int));
48 for (i = 0; i < MONO_MAX_FREGS; ++i) {
50 rs->fsymbolic [i] = 0;
52 for (; i < rs->next_vfreg; ++i)
57 mono_regstate_alloc_int (MonoRegState *rs, regmask_t allow)
60 regmask_t mask = allow & rs->ifree_mask;
61 for (i = 0; i < MONO_MAX_IREGS; ++i) {
62 if (mask & (1 << i)) {
63 rs->ifree_mask &= ~ (1 << i);
71 mono_regstate_free_int (MonoRegState *rs, int reg)
74 rs->ifree_mask |= 1 << reg;
75 rs->isymbolic [reg] = 0;
80 mono_regstate_alloc_float (MonoRegState *rs, regmask_t allow)
83 regmask_t mask = allow & rs->ffree_mask;
84 for (i = 0; i < MONO_MAX_FREGS; ++i) {
85 if (mask & (1 << i)) {
86 rs->ffree_mask &= ~ (1 << i);
94 mono_regstate_free_float (MonoRegState *rs, int reg)
97 rs->ffree_mask |= 1 << reg;
98 rs->fsymbolic [reg] = 0;
103 mono_regstate_next_long (MonoRegState *rs)
105 int rval = rs->next_vireg;