1 /* src/vm/jit/reg.c - register allocator setup
3 Copyright (C) 1996-2005, 2006, 2007 R. Grafl, A. Krall, C. Kruegel,
4 C. Oates, R. Obermaisser, M. Platter, M. Probst, S. Ring,
5 E. Steiner, C. Thalinger, D. Thuernbeck, P. Tomsich, C. Ullrich,
6 J. Wenninger, Institut f. Computersprachen - TU Wien
8 This file is part of CACAO.
10 This program is free software; you can redistribute it and/or
11 modify it under the terms of the GNU General Public License as
12 published by the Free Software Foundation; either version 2, or (at
13 your option) any later version.
15 This program is distributed in the hope that it will be useful, but
16 WITHOUT ANY WARRANTY; without even the implied warranty of
17 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
18 General Public License for more details.
20 You should have received a copy of the GNU General Public License
21 along with this program; if not, write to the Free Software
22 Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
25 $Id: reg.c 7713 2007-04-15 21:49:48Z twisti $
39 #include "mm/memory.h"
40 #include "vm/jit/abi.h"
41 #include "vm/jit/reg.h"
44 /* reg_setup *******************************************************************
48 *******************************************************************************/
50 void reg_setup(jitdata *jd)
56 /* get required compiler data */
61 /* setup the integer register table */
63 rd->tmpintregs = DMNEW(s4, INT_TMP_CNT);
64 rd->savintregs = DMNEW(s4, INT_SAV_CNT);
65 rd->freeargintregs = DMNEW(s4, INT_ARG_CNT);
66 rd->freetmpintregs = DMNEW(s4, INT_TMP_CNT);
67 rd->freesavintregs = DMNEW(s4, INT_SAV_CNT);
73 for (i = 0; i < INT_REG_CNT; i++) {
74 switch (nregdescint[i]) {
79 rd->savintregs[rd->savintreguse++] = i;
82 rd->tmpintregs[rd->tmpintreguse++] = i;
86 assert(rd->savintreguse == INT_SAV_CNT);
87 assert(rd->tmpintreguse == INT_TMP_CNT);
89 #ifdef HAS_ADDRESS_REGISTER_FILE
90 /* setup the address register table */
92 rd->argadrregs = DMNEW(s4, ADR_ARG_CNT);
93 rd->tmpadrregs = DMNEW(s4, ADR_TMP_CNT);
94 rd->savadrregs = DMNEW(s4, ADR_SAV_CNT);
95 rd->freeargadrregs = DMNEW(s4, ADR_ARG_CNT);
96 rd->freetmpadrregs = DMNEW(s4, ADR_TMP_CNT);
97 rd->freesavadrregs = DMNEW(s4, ADR_SAV_CNT);
99 /*rd->adrreg_argnum = 0; XXX ask twisti */
100 rd->argadrreguse = 0;
101 rd->tmpadrreguse = 0;
102 rd->savadrreguse = 0;
104 for (i = 0; i < ADR_REG_CNT; i++) {
105 switch (nregdescadr[i]) {
110 rd->savadrregs[rd->savadrreguse++] = i;
113 rd->tmpadrregs[rd->tmpadrreguse++] = i;
116 rd->argadrregs[rd->argadrreguse++] = i;
120 assert(rd->savadrreguse == ADR_SAV_CNT);
121 assert(rd->tmpadrreguse == ADR_TMP_CNT);
122 assert(rd->argadrreguse == ADR_ARG_CNT);
125 /* setup the float register table */
127 rd->tmpfltregs = DMNEW(s4, FLT_TMP_CNT);
128 rd->savfltregs = DMNEW(s4, FLT_SAV_CNT);
129 rd->freeargfltregs = DMNEW(s4, FLT_ARG_CNT);
130 rd->freetmpfltregs = DMNEW(s4, FLT_TMP_CNT);
131 rd->freesavfltregs = DMNEW(s4, FLT_SAV_CNT);
133 rd->argfltreguse = 0;
134 rd->tmpfltreguse = 0;
135 rd->savfltreguse = 0;
137 for (i = 0; i < FLT_REG_CNT; i++) {
138 switch (nregdescfloat[i]) {
143 rd->savfltregs[rd->savfltreguse++] = i;
146 rd->tmpfltregs[rd->tmpfltreguse++] = i;
150 assert(rd->savfltreguse == FLT_SAV_CNT);
151 assert(rd->tmpfltreguse == FLT_TMP_CNT);
154 rd->freemem = DMNEW(s4, m->maxstack);
155 #if defined(HAS_4BYTE_STACKSLOT)
156 rd->freemem_2 = DMNEW(s4, m->maxstack);
159 #if defined(SPECIALMEMUSE)
160 # if defined(__DARWIN__)
161 /* 6*4=24 byte linkage area + 8*4=32 byte minimum parameter Area */
162 rd->memuse = LA_SIZE_IN_POINTERS + INT_ARG_CNT;
164 rd->memuse = LA_SIZE_IN_POINTERS;
167 rd->memuse = 0; /* init to zero -> analyse_stack will set it to a higher */
168 /* value, if appropriate */
171 /* Set rd->arg*reguse to *_ARG_CNBT to not use unused argument */
172 /* registers as temp registers */
173 #if defined(HAS_ADDRESS_REGISTER_FILE)
174 rd->argadrreguse = 0;
175 #endif /* defined(HAS_ADDRESS_REGISTER_FILE) */
176 rd->argintreguse = 0;
177 rd->argfltreguse = 0;
182 * These are local overrides for various environment variables in Emacs.
183 * Please do not remove this and leave it at the end of the file, where
184 * Emacs will automagically detect them.
185 * ---------------------------------------------------------------------
188 * indent-tabs-mode: t
192 * vim:noexpandtab:sw=4:ts=4: