6502/cc65
1
0
Fork 0
mirror of https://github.com/cc65/cc65.git synced 2025-08-10 04:25:21 +00:00
Code Issues Projects Releases Wiki Activity

Don't generate inlined codes for integers shifts. If necessary the optimizer

Browse Source 
can do that. 


git-svn-id: svn://svn.cc65.org/cc65/trunk@4007 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
uz
2009-08-14 22:17:47 +00:00
parent 0b7b9354dc
commit 0c4144c586
1 changed files with 13 additions and 50 deletions
Download Patch File Download Diff File Expand all files Collapse all files

63
src/cc65/codegen.c
View File

@@ -1437,20 +1437,11 @@ void g_scale (unsigned flags, long val)
/* FALLTHROUGH */ /* FALLTHROUGH */
case CF_INT: case CF_INT:
if (IS_Get (&CodeSizeFactor) >= (p2+1)*130) { if (flags & CF_UNSIGNED) {
AddCodeLine ("stx tmp1"); AddCodeLine ("jsr shlax%d", p2);
while (p2--) { } else {
AddCodeLine ("asl a"); AddCodeLine ("jsr aslax%d", p2);
AddCodeLine ("rol tmp1"); }
}
AddCodeLine ("ldx tmp1");
} else {
if (flags & CF_UNSIGNED) {
AddCodeLine ("jsr shlax%d", p2);
} else {
AddCodeLine ("jsr aslax%d", p2);
}
}
break; break;
case CF_LONG: case CF_LONG:
@@ -1499,28 +1490,9 @@ void g_scale (unsigned flags, long val)
case CF_INT: case CF_INT:
if (flags & CF_UNSIGNED) { if (flags & CF_UNSIGNED) {
if (IS_Get (&CodeSizeFactor) >= (p2+1)*130) { AddCodeLine ("jsr lsrax%d", p2);
AddCodeLine ("stx tmp1");
while (p2--) {
AddCodeLine ("lsr tmp1");
AddCodeLine ("ror a");
}
AddCodeLine ("ldx tmp1");
} else {
AddCodeLine ("jsr lsrax%d", p2);
}
} else { } else {
if (IS_Get (&CodeSizeFactor) >= (p2+1)*150) { AddCodeLine ("jsr asrax%d", p2);
AddCodeLine ("stx tmp1");
while (p2--) {
AddCodeLine ("cpx #$80");
AddCodeLine ("ror tmp1");
AddCodeLine ("ror a");
}
AddCodeLine ("ldx tmp1");
} else {
AddCodeLine ("jsr asrax%d", p2);
}
} }
break; break;
@@ -2992,7 +2964,7 @@ void g_asr (unsigned flags, unsigned long val)
} }
return; return;
} else if (val == 8 && (flags & CF_UNSIGNED)) { } else if (val == 8 && (flags & CF_UNSIGNED)) {
AddCodeLine ("txa"); AddCodeLine ("txa");
AddCodeLine ("ldx sreg"); AddCodeLine ("ldx sreg");
AddCodeLine ("ldy sreg+1"); AddCodeLine ("ldy sreg+1");
AddCodeLine ("sty sreg"); AddCodeLine ("sty sreg");
@@ -3059,20 +3031,11 @@ void g_asl (unsigned flags, unsigned long val)
/* Done */ /* Done */
return; return;
} else if (val >= 1 && val <= 4) { } else if (val >= 1 && val <= 4) {
if (IS_Get (&CodeSizeFactor) >= (long) (val+1)*130) { if (flags & CF_UNSIGNED) {
AddCodeLine ("stx tmp1"); AddCodeLine ("jsr shlax%ld", val);
while (val--) { } else {
AddCodeLine ("asl a"); AddCodeLine ("jsr aslax%ld", val);
AddCodeLine ("rol tmp1"); }
}
AddCodeLine ("ldx tmp1");
} else {
if (flags & CF_UNSIGNED) {
AddCodeLine ("jsr shlax%ld", val);
} else {
AddCodeLine ("jsr aslax%ld", val);
}
}
return; return;
} }
break; break;