the10thwiz/cc65
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Write out type information for spans to the debug info file.

Browse Source 
git-svn-id: svn://svn.cc65.org/cc65/trunk@5258 b7a2c559-68d2-44c3-8de9-860c34a00d81
This commit is contained in:
uz
2011-08-21 20:18:09 +00:00
parent b88dc209fc
commit 660df16d08
1 changed files with 19 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

22
src/ld65/span.c
View File

@@ -34,7 +34,7 @@
/* common */ /* common */
#include "attrib.h" #include "gentype.h"
#include "xmalloc.h" #include "xmalloc.h"
/* ld65 */ /* ld65 */
@@ -158,6 +158,8 @@ void PrintDbgSpans (FILE* F)
/* Output the spans to a debug info file */ /* Output the spans to a debug info file */
{ {
unsigned I, J; unsigned I, J;
StrBuf SpanType = STATIC_STRBUF_INITIALIZER;
/* Walk over all object files */ /* Walk over all object files */
for (I = 0; I < CollCount (&ObjDataList); ++I) { for (I = 0; I < CollCount (&ObjDataList); ++I) {
@@ -168,20 +170,34 @@ void PrintDbgSpans (FILE* F)
/* Walk over all spans in this object file */ /* Walk over all spans in this object file */
for (J = 0; J < CollCount (&O->Spans); ++J) { for (J = 0; J < CollCount (&O->Spans); ++J) {
const StrBuf* Type;
/* Get this span */ /* Get this span */
Span* S = CollAtUnchecked (&O->Spans, J); const Span* S = CollAtUnchecked (&O->Spans, J);
/* Get the section for this span */ /* Get the section for this span */
const Section* Sec = GetObjSection (O, S->Sec); const Section* Sec = GetObjSection (O, S->Sec);
/* Output the data */ /* Output the data */
fprintf (F, "span\tid=%u,seg=%u,start=%lu,size=%lu\n", fprintf (F, "span\tid=%u,seg=%u,start=%lu,size=%lu",
O->SpanBaseId + S->Id, O->SpanBaseId + S->Id,
Sec->Seg->Id, Sec->Seg->Id,
Sec->Offs + S->Offs, Sec->Offs + S->Offs,
S->Size); S->Size);
/* If we have a type, add it */
Type = GetStrBuf (S->Type);
if (SB_GetLen (Type) > 0) {
fprintf (F, ",type=\"%s\"", GT_AsString (Type, &SpanType));
}
/* Terminate the output line */
fputc ('\n', F);
} }
} }
/* Free the string buffer */
SB_Done (&SpanType);
} }