shithub: scc

Info  •  Files  •  Log  •  Branches

[nm/coff32] Add support for common blocks

Common blocks use the extern hack, where the value is used to
indicate the size of the block.

--- a/nm/coff32.c

+++ b/nm/coff32.c

@@ -37,7 +37,7 @@

 		c = 'a';

 		break;

 	case N_UNDEF:

-		c = 'U';

+		c = (ent->n_value != 0) ? 'C' : 'U';

 		break;

 	default:

 		if (ent->n_scnum > nsect)

@@ -136,6 +136,7 @@

 	sym->name = getsname(fname, fp, ent);

 	sym->type = typeof(ent);

 	sym->value = ent->n_value;

+	sym->size = (sym->type == 'C') ? ent->n_value : 0;

 }

 static void