From: uz <uz@b7a2c559-68d2-44c3-8de9-860c34a00d81>
Date: Tue, 16 Aug 2011 12:53:48 +0000 (+0000)
Subject: Dump export and import ids.
X-Git-Tag: V2.13.3~278
X-Git-Url: https://git.sur5r.net/?a=commitdiff_plain;h=cc1326c6c2359e3889d9fb746d85a7ed443d0659;p=cc65

Dump export and import ids.


git-svn-id: svn://svn.cc65.org/cc65/trunk@5184 b7a2c559-68d2-44c3-8de9-860c34a00d81
---

diff --git a/src/od65/dump.c b/src/od65/dump.c
index 28798a6a0..1af93aba5 100644
--- a/src/od65/dump.c
+++ b/src/od65/dump.c
@@ -676,6 +676,8 @@ void DumpObjDbgSyms (FILE* F, unsigned long Offset)
 
     	unsigned long 	Value = 0;
         unsigned long   Size = 0;
+        unsigned        ImportId = 0;
+        unsigned        ExportId = 0;
 
        	/* Read the data for one symbol */
        	unsigned Type          = ReadVar (F);
@@ -691,6 +693,12 @@ void DumpObjDbgSyms (FILE* F, unsigned long Offset)
         if (SYM_HAS_SIZE (Type)) {
             Size = ReadVar (F);
         }
+        if (SYM_IS_IMPORT (Type)) {
+            ImportId = ReadVar (F);
+        }
+        if (SYM_IS_EXPORT (Type)) {
+            ExportId = ReadVar (F);
+        }
 
         /* Skip the line infos */
         SkipLineInfoList (F);
@@ -710,6 +718,12 @@ void DumpObjDbgSyms (FILE* F, unsigned long Offset)
        	if (SYM_HAS_SIZE (Type)) {
 	    printf ("      Size:%20s0x%04lX  (%lu)\n", "", Size, Size);
 	}
+       	if (SYM_IS_IMPORT (Type)) {
+	    printf ("      Import:%24u\n", ImportId);
+	}
+       	if (SYM_IS_EXPORT (Type)) {
+	    printf ("      Export:%24u\n", ExportId);
+	}
     }
 
     /* Destroy the string pool */