X-Git-Url: http://wien.tomnetworks.com/gitweb/?a=blobdiff_plain;f=codea%2Fcode.bfe;h=71508309984d84be3344ba341443eccd1c46b5d6;hb=bb2b8ce82db6ac53f2973df099f0da7e62970b86;hp=e88f2eb2ec87603f03b18a2a432921a2af0cbdd1;hpb=54e11007271b762cb34aa73c12fe0b36571db5d8;p=uebersetzerbau-ss10.git diff --git a/codea/code.bfe b/codea/code.bfe index e88f2eb..7150830 100644 --- a/codea/code.bfe +++ b/codea/code.bfe @@ -39,6 +39,14 @@ void gen_e_eno(struct treenode *bnode, char *instr) printf("\t%s %%%s, %%%s\n", instr, KID_REG(1), KID_REG(0)); } +void gen_id_eno(struct treenode *bnode) +{ + printf("\t//gen_id_eno\n"); + KIDKIDREG2PARM(1,0); + printf("\taddq %%%s, %%%s\n", KIDKID_REG(1,0), KIDKID_REG(1,1)); + printf("\tsubq %%%s, %%%s\n", KIDKID_REG(1,1), BN_REG); +} + void gen_e_field(struct treenode *bnode, char *instr) { printf("\t//gen_e_field(%s)\n", instr); @@ -52,12 +60,7 @@ void gen_field_imm(struct treenode *bnode) printf("\t//gen_field_imm\n"); KIDKIDREG2PARM(0,0); KIDREG2ID(1); - - if(KID_VAL(1) == 1 && strcmp(KID_REG(0), BN_REG) == 0) { - printf("\t//multiplikation mit 1 wegoptimiert\n"); - } else { - printf("\timulq $%d, %d(%%%s), %%%s\n", KID_VAL(1), bnode->kids[0]->soffset * 8, KIDKID_REG(0, 0), BN_REG); - } + printf("\timulq $%d, %d(%%%s), %%%s\n", KID_VAL(1), bnode->kids[0]->soffset * 8, KIDKID_REG(0, 0), BN_REG); } void gen_e_imm(struct treenode *bnode, char *instr) @@ -193,6 +196,8 @@ expr: O_SUB(expr,imm) # 1 # gen_e_imm(bnode, "subq"); expr: O_SUB(expr,O_SUB(O_ID,expr)) # 2 # gen_subspecial(bnode, 0); expr: O_SUB(expr,O_SUB(imm,expr)) # 2 # gen_subspecial(bnode, 1); +expr: O_SUB(expr, O_ADD(O_ID,expr)) # 1 # gen_id_eno(bnode); + expr: O_SUB(expr,O_MUL(O_MONE,expr)) # 1 # gen_lea(bnode,0); expr: O_SUB(expr,O_MUL(O_MTWO,expr)) # 1 # gen_lea(bnode,0); expr: O_SUB(expr,O_MUL(O_MFOUR,expr)) # 1 # gen_lea(bnode,0);