1
0
mirror of https://github.com/cc65/cc65.git synced 2025-08-10 04:25:21 +00:00

Adapted to changes in the object file format.

git-svn-id: svn://svn.cc65.org/cc65/trunk@4931 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
uz
2011-01-27 17:35:48 +00:00
parent 88b3489d89
commit 73548dbfb3
2 changed files with 14 additions and 10 deletions

View File

@@ -6,7 +6,7 @@
/* */ /* */
/* */ /* */
/* */ /* */
/* (C) 1998-2010, Ullrich von Bassewitz */ /* (C) 1998-2011, Ullrich von Bassewitz */
/* Roemerstrasse 52 */ /* Roemerstrasse 52 */
/* D-70794 Filderstadt */ /* D-70794 Filderstadt */
/* EMail: uz@cc65.org */ /* EMail: uz@cc65.org */
@@ -383,12 +383,16 @@ static void SkipExpr (unsigned char** Buf)
static void SkipFilePos (unsigned char** Buf) static void SkipLineInfoList (unsigned char** Buf)
/* Skip a file position in Buf */ /* Skip a list of line infos in Buf */
{ {
(void) GetVar (Buf); /* Line */ /* Number of indices preceeds the list */
(void) GetVar (Buf); /* Col */ unsigned long Count = GetVar (Buf);
(void) GetVar (Buf); /* Name */
/* Skip indices */
while (Count--) {
(void) GetVar (Buf);
}
} }
@@ -429,8 +433,8 @@ static void LibCheckExports (ObjData* O)
Exports += 4; Exports += 4;
} }
/* Skip the position */ /* Skip the line info */
SkipFilePos (&Exports); SkipLineInfoList (&Exports);
/* Insert the name into the hash table */ /* Insert the name into the hash table */
Print (stdout, 1, " %s\n", Name); Print (stdout, 1, " %s\n", Name);

View File

@@ -6,7 +6,7 @@
/* */ /* */
/* */ /* */
/* */ /* */
/* (C) 1998-2009, Ullrich von Bassewitz */ /* (C) 1998-2011, Ullrich von Bassewitz */
/* Roemerstrasse 52 */ /* Roemerstrasse 52 */
/* D-70794 Filderstadt */ /* D-70794 Filderstadt */
/* EMail: uz@cc65.org */ /* EMail: uz@cc65.org */
@@ -121,7 +121,7 @@ int main (int argc, char* argv [])
case 'V': case 'V':
fprintf (stderr, fprintf (stderr,
"ar65 V%s - (C) Copyright 1998-2009 Ullrich von Bassewitz\n", "ar65 V%s - (C) Copyright 1998-2011 Ullrich von Bassewitz\n",
GetVersionAsString ()); GetVersionAsString ());
break; break;