Add new SKIP range

git-svn-id: svn://svn.cc65.org/cc65/trunk@2412 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
cuz
2003-08-23 21:19:20 +00:00
parent fd2fa25f28
commit 1b311d932d
6 changed files with 84 additions and 41 deletions

View File

@@ -260,17 +260,28 @@ void DefOutOfRangeLabels (void)
SeparatorLine ();
/* Low range */
for (Addr = 0; Addr < CodeStart; ++Addr) {
Addr = 0;
while (Addr < CodeStart) {
if (MustDefLabel (Addr)) {
DefineConst (Addr);
}
++Addr;
}
/* Skip areas in code range */
while (Addr <= CodeEnd) {
if ((AttrTab[Addr] & atStyleMask) == atSkip && MustDefLabel (Addr)) {
DefineConst (Addr);
}
++Addr;
}
/* High range */
for (Addr = CodeEnd+1; Addr < 0x10000; ++Addr) {
while (Addr < 0x10000) {
if (MustDefLabel (Addr)) {
DefineConst (Addr);
}
++Addr;
}
SeparatorLine ();