- enter verwenden statt selbst prolog zu machen
-- was ist wenn eine funktion die aufgerufen wird eine funktion aufruft die eine
- viel laengere parameterliste hat? (die hinteren register wurden ja nicht
- gesichert... :/) anmerkung: koennt vielleicht hinhauen weil ich die parameter
- sichere (ohne ruecksicht darauf ob sie tatsaechlich paramter sind!)
-- wenn push und xchg die selben register betreffen kann man das wegoptimieren
- (globales array mit 0er und 1er drin machen?)
- intelli_03: seiteneffekte in der ersten zeile *ahhhh*
printf("\tsub $%d, %%%s\n", KIDKID_VAL(0,1), KID_REG(1));
}
+/* dirty...*/
+static short xchg_param[7] = {0};
void make_call(struct treenode *bnode)
{
int j;
printf("\t//params pushen\n");
for(j = 0; j < bnode->soffset; j++) {
- printf("\txchg %%%s, %d(%%rsp)\n", param_reg(j), j*8);
+ if(xchg_param[j] == 1)
+ printf("\txchg %%%s, %d(%%rsp)\n", param_reg(j), j*8);
}
printf("\t//vars pushen\n");
for(j = 6; j > 6 - bnode->vars; j--) {
void prep_arg(struct treenode *bnode, int moveit)
{
printf("\t//args-nr.: %i (%%%s) [moveit: %i]\n", bnode->soffset, param_reg(bnode->soffset), moveit);
+ xchg_param[bnode->soffset] = 1;
if(moveit) { /* expr */
if((BN_REG == (char *) NULL) || (bnode->kids[1] != TREENULL && bnode->kids[1]->op == O_ID && bnode->kids[1]->kids[0] == TREENULL && bnode->kids[1]->kids[1] == TREENULL)) {
if(bnode->kids[1]->name != (char *) NULL && strcmp(bnode->kids[1]->name,"this")!=0) {
printf("\tpushq %%%s\n", KID_REG(1));
} else {
printf("\tpushq %%%s\n", param_reg(bnode->soffset));
+ xchg_param[bnode->soffset] = 0;
}
} else {
printf("\tpushq %%%s\n", BN_REG);
} else { /* just O_ID */
KIDREG2PARM(0);
printf("\tpushq %%%s\n", KID_REG(0));
+ if(strcmp(KID_REG(0), param_reg(bnode->soffset)) == 0) {
+ xchg_param[bnode->soffset] = 0;
+ }
}
}