6502/cc65
1
0
Fork 0
mirror of https://github.com/cc65/cc65.git synced 2024-11-19 06:31:31 +00:00
Code Issues Projects Releases Wiki Activity

Make the -O and --codesize options stackable.

Browse Source 
Copy the current optimization settings into a code segment on creation.


git-svn-id: svn://svn.cc65.org/cc65/trunk@3129 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
cuz 2004-06-15 20:29:49 +00:00
parent 9cb7015055
commit d8279302a9
10 changed files with 51 additions and 41 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

32
src/cc65/codegen.c
View File

@ -511,7 +511,7 @@ void g_swap_regvars (int StackOffs, int RegOffs, unsigned Bytes)
/* Generate code */
if (Bytes == 1) {
if (CodeSizeFactor < 165) {
if (IS_Get (&CodeSizeFactor) < 165) {
ldyconst (StackOffs);
ldxconst (RegOffs);
AddCodeLine ("jsr regswap1");
@ -601,7 +601,7 @@ void g_restore_regvars (int StackOffs, int RegOffs, unsigned Bytes)
AddCodeLine ("lda (sp),y");
AddCodeLine ("sta regbank%+d", RegOffs+1);
} else if (Bytes == 3 && CodeSizeFactor >= 133) {
} else if (Bytes == 3 && IS_Get (&CodeSizeFactor) >= 133) {
ldyconst (StackOffs);
AddCodeLine ("lda (sp),y");
@ -915,7 +915,7 @@ void g_leasp (int offs)
AddCodeLine ("lda sp");
AddCodeLine ("ldx sp+1");
} else {
if (CodeSizeFactor < 300) {
if (IS_Get (&CodeSizeFactor) < 300) {
ldaconst (offs); /* Load A with offset value */
AddCodeLine ("jsr leaasp"); /* Load effective address */
} else {
@ -963,7 +963,7 @@ void g_leavariadic (int Offs)
AddCodeLine ("lda (sp),y");
/* Add the value of the stackpointer */
if (CodeSizeFactor > 250) {
if (IS_Get (&CodeSizeFactor) > 250) {
unsigned L = GetLocalLabel();
AddCodeLine ("ldx sp+1");
AddCodeLine ("clc");
@ -1060,7 +1060,7 @@ void g_putlocal (unsigned Flags, int Offs, long Val)
}
AddCodeLine ("sta (sp),y");
} else {
if ((Flags & CF_NOKEEP) == 0 || CodeSizeFactor < 160) {
if ((Flags & CF_NOKEEP) == 0 || IS_Get (&CodeSizeFactor) < 160) {
ldyconst (Offs);
AddCodeLine ("jsr staxysp");
} else {
@ -1258,7 +1258,7 @@ void g_reglong (unsigned Flags)
if (Flags & CF_FORCECHAR) {
/* Conversion is from char */
if (Flags & CF_UNSIGNED) {
if (CodeSizeFactor >= 200) {
if (IS_Get (&CodeSizeFactor) >= 200) {
AddCodeLine ("ldx #$00");
AddCodeLine ("stx sreg");
AddCodeLine ("stx sreg+1");
@ -1266,7 +1266,7 @@ void g_reglong (unsigned Flags)
AddCodeLine ("jsr aulong");
}
} else {
if (CodeSizeFactor >= 366) {
if (IS_Get (&CodeSizeFactor) >= 366) {
L = GetLocalLabel();
AddCodeLine ("ldx #$00");
AddCodeLine ("cmp #$80");
@ -1284,7 +1284,7 @@ void g_reglong (unsigned Flags)
case CF_INT:
if (Flags & CF_UNSIGNED) {
if (CodeSizeFactor >= 200) {
if (IS_Get (&CodeSizeFactor) >= 200) {
ldyconst (0);
AddCodeLine ("sty sreg");
AddCodeLine ("sty sreg+1");
@ -1425,7 +1425,7 @@ void g_scale (unsigned flags, long val)
/* FALLTHROUGH */
case CF_INT:
if (CodeSizeFactor >= (p2+1)*130U) {
if (IS_Get (&CodeSizeFactor) >= (p2+1)*130) {
AddCodeLine ("stx tmp1");
while (p2--) {
AddCodeLine ("asl a");
@ -1487,7 +1487,7 @@ void g_scale (unsigned flags, long val)
case CF_INT:
if (flags & CF_UNSIGNED) {
if (CodeSizeFactor >= (p2+1)*130U) {
if (IS_Get (&CodeSizeFactor) >= (p2+1)*130) {
AddCodeLine ("stx tmp1");
while (p2--) {
AddCodeLine ("lsr tmp1");
@ -1498,7 +1498,7 @@ void g_scale (unsigned flags, long val)
AddCodeLine ("jsr lsrax%d", p2);
}
} else {
if (CodeSizeFactor >= (p2+1)*150U) {
if (IS_Get (&CodeSizeFactor) >= (p2+1)*150) {
AddCodeLine ("stx tmp1");
while (p2--) {
AddCodeLine ("cpx #$80");
@ -1788,7 +1788,7 @@ void g_addeqlocal (unsigned flags, int offs, unsigned long val)
case CF_INT:
ldyconst (offs);
if (flags & CF_CONST) {
if (CodeSizeFactor >= 400) {
if (IS_Get (&CodeSizeFactor) >= 400) {
AddCodeLine ("clc");
AddCodeLine ("lda #$%02X", (int)(val & 0xFF));
AddCodeLine ("adc (sp),y");
@ -1848,7 +1848,7 @@ void g_addeqind (unsigned flags, unsigned offs, unsigned long val)
break;
case CF_INT:
if (CodeSizeFactor >= 200) {
if (IS_Get (&CodeSizeFactor) >= 200) {
/* Lots of code, use only if size is not important */
AddCodeLine ("sta ptr1");
AddCodeLine ("stx ptr1+1");
@ -2062,7 +2062,7 @@ void g_subeqind (unsigned flags, unsigned offs, unsigned long val)
break;
case CF_INT:
if (CodeSizeFactor >= 200) {
if (IS_Get (&CodeSizeFactor) >= 200) {
/* Lots of code, use only if size is not important */
AddCodeLine ("sta ptr1");
AddCodeLine ("stx ptr1+1");
@ -3272,7 +3272,7 @@ void g_inc (unsigned flags, unsigned long val)
AddCodeLine ("bne %s", LocalLabelName (L));
AddCodeLine ("inx");
g_defcodelabel (L);
} else if (CodeSizeFactor < 200) {
} else if (IS_Get (&CodeSizeFactor) < 200) {
/* Use jsr calls */
if (val <= 8) {
AddCodeLine ("jsr incax%lu", val);
@ -3360,7 +3360,7 @@ void g_dec (unsigned flags, unsigned long val)
/* FALLTHROUGH */
case CF_INT:
if (CodeSizeFactor < 200) {
if (IS_Get (&CodeSizeFactor) < 200) {
/* Use subroutines */
if (val <= 8) {
AddCodeLine ("jsr decax%d", (int) val);

6
src/cc65/codeopt.c
View File

@ -1908,7 +1908,7 @@ static unsigned RunOptFunc (CodeSeg* S, OptFunc* F, unsigned Max)
/* Don't run the function if it is disabled or if it is prohibited by the
* code size factor
*/
if (F->Disabled || F->CodeSizeFactor > CodeSizeFactor) {
if (F->Disabled || F->CodeSizeFactor > S->CodeSizeFactor) {
return 0;
}
@ -2093,7 +2093,7 @@ static unsigned RunOptGroup6 (CodeSeg* S)
unsigned Changes = 0;
unsigned C;
if (CodeSizeFactor <= 100) {
if (S->CodeSizeFactor <= 100) {
/* Optimize for size, that is replace operations by shorter ones, even
* if this does hinder further optimizations (no problem since we're
* done soon).
@ -2142,7 +2142,7 @@ void RunOpt (CodeSeg* S)
const char* StatFileName;
/* If we shouldn't run the optimizer, bail out */
if (!Optimize) {
if (!S->Optimize) {
return;
}

7
src/cc65/codeseg.c
View File

@ -50,11 +50,12 @@
#include "asmlabel.h"
#include "codeent.h"
#include "codeinfo.h"
#include "codeseg.h"
#include "datatype.h"
#include "error.h"
#include "global.h"
#include "ident.h"
#include "symentry.h"
#include "codeseg.h"
@ -471,6 +472,10 @@ CodeSeg* NewCodeSeg (const char* SegName, SymEntry* Func)
S->ExitRegs = REG_NONE;
}
/* Copy the global optimization settings */
S->Optimize = (unsigned char) IS_Get (&Optimize);
S->CodeSizeFactor = (unsigned) IS_Get (&CodeSizeFactor);
/* Return the new struct */
return S;
}

8
src/cc65/codeseg.h
View File

@ -79,8 +79,12 @@ struct CodeSeg {
SymEntry* Func; /* Owner function */
Collection Entries; /* List of code entries */
Collection Labels; /* Labels for next insn */
CodeLabel* LabelHash [CS_LABEL_HASH_SIZE]; /* Label hash table */
CodeLabel* LabelHash[CS_LABEL_HASH_SIZE]; /* Label hash table */
unsigned short ExitRegs; /* Register use on exit */
/* Optimization settings for this segment */
unsigned char Optimize; /* On/off switch */
unsigned CodeSizeFactor;
};
@ -287,7 +291,7 @@ void CS_GenRegInfo (CodeSeg* S);
/* End of codeseg.h */
#endif
#endif

7
src/cc65/compile.c
View File

@ -295,10 +295,11 @@ void Compile (const char* FileName)
* IS_Get functions access the values in effect now, regardless of any
* changes using #pragma later.
*/
if (Optimize) {
if (IS_Get (&Optimize)) {
long CodeSize = IS_Get (&CodeSizeFactor);
DefineNumericMacro ("__OPT__", 1);
if (FavourSize == 0) {
DefineNumericMacro ("__OPT_i__", 1);
if (CodeSize > 100) {
DefineNumericMacro ("__OPT_i__", CodeSize);
}
if (IS_Get (&EnableRegVars)) {
DefineNumericMacro ("__OPT_r__", 1);

2
src/cc65/expr.c
View File

@ -367,7 +367,7 @@ static unsigned FunctionParamList (FuncDesc* Func)
* (instead of pushing) is enabled.
*
*/
if (CodeSizeFactor >= 200) {
if (IS_Get (&CodeSizeFactor) >= 200) {
/* Calculate the number and size of the parameters */
FrameParams = Func->ParamCount;

5
src/cc65/global.c
View File

@ -48,10 +48,7 @@ unsigned char DebugInfo = 0; /* Add debug info to the obj */
unsigned char CreateDep = 0; /* Create a dependency file */
unsigned char ANSI = 0; /* Strict ANSI flag */
unsigned char NoWarn = 0; /* Suppress warnings */
unsigned char Optimize = 0; /* Optimize flag */
unsigned long OptDisable = 0; /* Optimizer passes to disable */
unsigned char FavourSize = 1; /* Favour size over speed */
unsigned CodeSizeFactor = 100; /* Size factor for generated code */
unsigned RegisterSpace = 6; /* Space available for register vars */
/* Stackable options */
@ -63,6 +60,8 @@ IntStack RegVarsToCallStack = INTSTACK(0); /* Save reg variables on call stack
IntStack StaticLocals = INTSTACK(0); /* Make local variables static */
IntStack SignedChars = INTSTACK(0); /* Make characters signed by default */
IntStack CheckStack = INTSTACK(0); /* Generate stack overflow checks */
IntStack Optimize = INTSTACK(0); /* Optimize flag */
IntStack CodeSizeFactor = INTSTACK(100);/* Size factor for generated code */

7
src/cc65/global.h
View File

@ -48,16 +48,13 @@
/*****************************************************************************/
extern unsigned char AddSource; /* Add source lines as comments */
extern unsigned char DebugInfo; /* Add debug info to the obj */
extern unsigned char CreateDep; /* Create a dependency file */
extern unsigned char ANSI; /* Strict ANSI flag */
extern unsigned char NoWarn; /* Suppress warnings */
extern unsigned char Optimize; /* Optimize flag */
extern unsigned long OptDisable; /* Optimizer passes to disable */
extern unsigned char FavourSize; /* Favour size over speed */
extern unsigned CodeSizeFactor; /* Size factor for generated code */
extern unsigned RegisterSpace; /* Space available for register vars */
/* Stackable options */
@ -69,6 +66,8 @@ extern IntStack RegVarsToCallStack; /* Save reg variables on call stack
extern IntStack StaticLocals; /* Make local variables static */
extern IntStack SignedChars; /* Make characters signed by default */
extern IntStack CheckStack; /* Generate stack overflow checks */
extern IntStack Optimize; /* Optimize flag */
extern IntStack CodeSizeFactor; /* Size factor for generated code */

14
src/cc65/main.c
View File

@ -374,12 +374,15 @@ static void OptCodeName (const char* Opt attribute ((unused)), const char* Arg)
static void OptCodeSize (const char* Opt, const char* Arg)
/* Handle the --codesize option */
{
unsigned Factor;
char BoundsCheck;
/* Numeric argument expected */
if (sscanf (Arg, "%u", &CodeSizeFactor) != 1 ||
CodeSizeFactor < 100 ||
CodeSizeFactor > 1000) {
if (sscanf (Arg, "%u%c", &Factor, &BoundsCheck) != 1 ||
Factor < 10 || Factor > 1000) {
AbEnd ("Argument for %s is invalid", Opt);
}
IS_Set (&CodeSizeFactor, Factor);
}
@ -801,7 +804,7 @@ int main (int argc, char* argv[])
break;
case 'O':
Optimize = 1;
IS_Set (&Optimize, 1);
P = Arg + 2;
while (*P) {
switch (*P++) {
@ -809,8 +812,7 @@ int main (int argc, char* argv[])
sscanf (P, "%lx", (long*) &OptDisable);
break;
case 'i':
FavourSize = 0;
CodeSizeFactor = 200;
IS_Set (&CodeSizeFactor, 200);
break;
case 'r':
IS_Set (&EnableRegVars, 1);

4
src/cc65/stdfunc.c
View File

@ -638,7 +638,7 @@ static void StdFunc_memset (FuncDesc* F attribute ((unused)), ExprDesc* Expr)
} else if (ED_IsConstAbsInt (&Arg3.Expr) && Arg3.Expr.IVal <= 256 &&
ED_IsConstAbsInt (&Arg2.Expr) &&
(Arg2.Expr.IVal != 0 || CodeSizeFactor > 200)) {
(Arg2.Expr.IVal != 0 || IS_Get (&CodeSizeFactor) > 200)) {
/* Remove all of the generated code but the load of the first
* argument.
@ -1015,7 +1015,7 @@ static void StdFunc_strlen (FuncDesc* F attribute ((unused)), ExprDesc* Expr)
* requested on the command line, and the code size factor is more than
* 400 (code is 13 bytes vs. 3 for a jsr call).
*/
} else if (CodeSizeFactor > 400 && IS_Get (&InlineStdFuncs)) {
} else if (IS_Get (&CodeSizeFactor) > 400 && IS_Get (&InlineStdFuncs)) {
/* Load the expression into the primary */
LoadExpr (CF_NONE, &Arg);