6502/cc65
1
0
Fork 0
mirror of https://github.com/cc65/cc65.git synced 2024-06-08 15:29:37 +00:00
Code Issues Projects Releases Wiki Activity

Stopped cc65 from putting redundant .segment directives into its Assembly output.

Browse Source
This commit is contained in:
Greg King 2017-06-16 21:53:50 -04:00
parent 98a2c324f8
commit d3ccc289c1
2 changed files with 31 additions and 14 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

25
src/cc65/compile.c
View File

@ -243,19 +243,20 @@ static void Parse (void)
}
Entry->Flags &= ~(SC_STORAGE | SC_DEF);
} else {
/* A global (including static) uninitialized variable
** is only a tentative definition. For example, this is valid:
/* A global (including static) uninitialized variable is
** only a tentative definition. For example, this is valid:
** int i;
** int i;
** static int j;
** static int j = 42;
** Code for these will be generated in FinishCompile.
** Code for them will be generated by FinishCompile().
** For now, just save the BSS segment name
** (can be set with #pragma bss-name)
** (can be set by #pragma bss-name).
*/
const char* bssName = GetSegName (SEG_BSS);
if (Entry->V.BssName && strcmp (Entry->V.BssName, bssName) != 0) {
Error ("Global variable `%s' has already been defined in `%s' segment",
Error ("Global variable `%s' already was defined in the `%s' segment.",
Entry->Name, Entry->V.BssName);
}
Entry->V.BssName = xstrdup (bssName);
@ -419,7 +420,7 @@ void FinishCompile (void)
SymEntry* Entry;
/* Walk over all global symbols:
** - for functions do cleanup, optimizations ...
** - for functions, do clean-up and optimizations
** - generate code for uninitialized global variables
*/
for (Entry = GetGlobalSymTab ()->SymHead; Entry; Entry = Entry->NextSym) {
@ -429,13 +430,17 @@ void FinishCompile (void)
CS_MergeLabels (Entry->V.F.Seg->Code);
RunOpt (Entry->V.F.Seg->Code);
} else if ((Entry->Flags & (SC_STORAGE | SC_DEF | SC_STATIC)) == (SC_STORAGE | SC_STATIC)) {
/* Tentative definition of uninitialized global variable */
/* Assembly definition of uninitialized global variable */
/* Set the segment name only when it changes */
if (strcmp (GetSegName (SEG_BSS), Entry->V.BssName) != 0) {
SetSegName (SEG_BSS, Entry->V.BssName);
g_segname (SEG_BSS);
}
g_usebss ();
SetSegName (SEG_BSS, Entry->V.BssName);
g_segname (SEG_BSS); /* TODO: skip if same as before */
g_defgloblabel (Entry->Name);
g_res (SizeOf (Entry->Type));
/* Mark as defined, so that it will be exported not imported */
/* Mark as defined; so that it will be exported, not imported */
Entry->Flags |= SC_DEF;
}
}

20
src/cc65/pragma.c
View File

@ -386,11 +386,11 @@ static void StringPragma (StrBuf* B, void (*Func) (const char*))
static void SegNamePragma (StrBuf* B, segment_t Seg)
/* Handle a pragma that expects a segment name parameter */
{
StrBuf S = AUTO_STRBUF_INITIALIZER;
const char* Name;
StrBuf S = AUTO_STRBUF_INITIALIZER;
int Push = 0;
/* Check for the "push" or "pop" keywords */
int Push = 0;
switch (ParsePushPop (B)) {
case PP_NONE:
@ -403,7 +403,13 @@ static void SegNamePragma (StrBuf* B, segment_t Seg)
case PP_POP:
/* Pop the old value and output it */
PopSegName (Seg);
g_segname (Seg);
/* BSS variables are output at the end of the compilation. Don't
** bother to change their segment, now.
*/
if (Seg != SEG_BSS) {
g_segname (Seg);
}
/* Done */
goto ExitPoint;
@ -434,7 +440,13 @@ static void SegNamePragma (StrBuf* B, segment_t Seg)
} else {
SetSegName (Seg, Name);
}
g_segname (Seg);
/* BSS variables are output at the end of the compilation. Don't
** bother to change their segment, now.
*/
if (Seg != SEG_BSS) {
g_segname (Seg);
}
} else {