frederik
/
oscar64
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Optimize right shift with small 16 bit values

This commit is contained in:
drmortalwombat 2024-08-11 14:11:07 +02:00
parent abb2d7a417
commit 62cede95ce
3 changed files with 24 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
include/c64/rasterirq.c
View File

@ -593,8 +593,18 @@ void rirq_sort(void)
rasterIRQIndex[j] = ri; rasterIRQIndex[j] = ri;
} }
#endif #endif
#if NUM_IRQS & 3
for(sbyte i=NUM_IRQS-1; i>=0; i--) for(sbyte i=NUM_IRQS-1; i>=0; i--)
rasterIRQNext[i] = rasterIRQRows[rasterIRQIndex[i + 1]]; rasterIRQNext[i] = rasterIRQRows[rasterIRQIndex[i + 1]];
#else
for(sbyte i=NUM_IRQS/4-1; i>=0; i--)
{
#pragma unroll(full)
for(int j=0; j<4; j++)
rasterIRQNext[i + j * NUM_IRQS / 4] = rasterIRQRows[rasterIRQIndex[i + j * NUM_IRQS / 4 + 1]];
}
#endif
npos++; npos++;
byte yp = rasterIRQNext[nextIRQ]; byte yp = rasterIRQNext[nextIRQ];

14
oscar64/NativeCodeGenerator.cpp
View File

@ -11414,6 +11414,10 @@ NativeCodeBasicBlock* NativeCodeBasicBlock::BinaryOperator(InterCodeProcedure* p
} }
else else
{ {
uint32 mask = 0xffff;
if (ins->mSrc[1].IsPositive() && ins->mSrc[1].mRange.mMaxState == IntegerValueRange::S_BOUND)
mask = uint32(ins->mSrc[1].mRange.mMaxValue);
if (ins->mSrc[1].mTemp != ins->mDst.mTemp) if (ins->mSrc[1].mTemp != ins->mDst.mTemp)
{ {
mIns.Push(NativeCodeInstruction(ins, ASMIT_LDA, ASMIM_ZERO_PAGE, BC_REG_TMP + proc->mTempOffset[ins->mSrc[1].mTemp] + 1)); mIns.Push(NativeCodeInstruction(ins, ASMIT_LDA, ASMIM_ZERO_PAGE, BC_REG_TMP + proc->mTempOffset[ins->mSrc[1].mTemp] + 1));
@ -11429,8 +11433,14 @@ NativeCodeBasicBlock* NativeCodeBasicBlock::BinaryOperator(InterCodeProcedure* p
mIns.Push(NativeCodeInstruction(ins, ASMIT_ROR, ASMIM_IMPLIED)); mIns.Push(NativeCodeInstruction(ins, ASMIT_ROR, ASMIM_IMPLIED));
for (int i = 1; i < shift; i++) for (int i = 1; i < shift; i++)
{ {
mIns.Push(NativeCodeInstruction(ins, ASMIT_LSR, ASMIM_ZERO_PAGE, treg + 1)); mask >>= 1;
mIns.Push(NativeCodeInstruction(ins, ASMIT_ROR, ASMIM_IMPLIED)); if (mask > 0xff)
{
mIns.Push(NativeCodeInstruction(ins, ASMIT_LSR, ASMIM_ZERO_PAGE, treg + 1));
mIns.Push(NativeCodeInstruction(ins, ASMIT_ROR, ASMIM_IMPLIED));
}
else
mIns.Push(NativeCodeInstruction(ins, ASMIT_LSR, ASMIM_IMPLIED));
} }
mIns.Push(NativeCodeInstruction(ins, ASMIT_STA, ASMIM_ZERO_PAGE, treg)); mIns.Push(NativeCodeInstruction(ins, ASMIT_STA, ASMIM_ZERO_PAGE, treg));
} }

4
oscar64/oscar64.cpp
View File

@ -120,14 +120,14 @@ int main2(int argc, const char** argv)
strcpy_s(crtFileNamePath, basePath); strcpy_s(crtFileNamePath, basePath);
strcat_s(crtFileNamePath, "include/crt.h"); strcat_s(crtFileNamePath, "include/crt.h");
if ((crtFile = fopen(crtFileNamePath, "r"))) if (!fopen_s(&crtFile, crtFileNamePath, "r"))
strcat_s(includePath, "include/"); strcat_s(includePath, "include/");
else else
{ {
strcpy_s(crtFileNamePath, basePath); strcpy_s(crtFileNamePath, basePath);
strcat_s(crtFileNamePath, "include/oscar64/crt.h"); strcat_s(crtFileNamePath, "include/oscar64/crt.h");
if ((crtFile = fopen(crtFileNamePath, "r"))) if (!fopen_s(&crtFile, crtFileNamePath, "r"))
strcat_s(includePath, "include/oscar64/"); strcat_s(includePath, "include/oscar64/");
else else
{ {