github.com/open-simh.simtools
1
0
Fork 0
mirror of https://github.com/open-simh/simtools.git synced 2026-01-13 23:36:03 +00:00
Code Issues Projects Releases Wiki Activity

A bit more tweaking of output/listing.

Browse Source
This commit is contained in:
Olaf Seibert 2015-05-21 00:57:52 +02:00
parent 6c992f6406
commit 168340c54c
3 changed files with 13 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
assemble.c
View File

@ -361,6 +361,7 @@ static int assemble(
return 0;
} else {
go_section(tr, sect_stack[sect_sp]);
list_location(stack->top, DOT);
if (!enabl_lsb) {
lsb = get_next_lsb();
}
@ -917,6 +918,7 @@ static int assemble(
lsb = get_next_lsb();
}
go_section(tr, &absolute_section);
list_location(stack->top, DOT);
return 1;
case P_CSECT:
@ -1031,6 +1033,7 @@ static int assemble(
lsb = get_next_lsb();
}
go_section(tr, sect);
list_location(stack->top, DOT);
return 1;
} /* end PSECT code */

2
assemble_aux.c
View File

@ -710,7 +710,7 @@ void write_globals(
int isect;
if (obj == NULL) {
for (isect = 0; isect < sector; isect++) {
for (isect = 0; isect < sector; isect++) {
psect = sections[isect];
psect->sector = isect; /* Assign it a sector */

10
dumpobj.c
View File

@ -348,7 +348,12 @@ void got_gsd(
xferad = value;
break;
case 4:
sprintf(gsdline, "\tGLOBAL %s=%o %s flags=%o\n", name, value, cp[i + 4] & 8 ? "DEF" : "REF", flags);
sprintf(gsdline, "\tGLOBAL %s=%o %s%s%s %s flags=%o\n", name, value,
flags & 01 ? "WEAK " : "",
flags & 04 ? "LIB " : "",
flags & 010 ? "DEF" : "REF",
flags & 040 ? "REL" : "ABS",
flags);
break;
case 5:
sprintf(gsdline, "\tPSECT %s=%o flags=%o\n", name, value, flags);
@ -361,6 +366,9 @@ void got_gsd(
case 7:
sprintf(gsdline, "\tVSECT %s=%o flags=%o\n", name, value, flags);
break;
case 010:
sprintf(gsdline, "\tCompletion Routine Name %s=%o flags=%o\n", name, value, flags);
break;
default:
sprintf(gsdline, "\t***Unknown GSD entry type %d flags=%o\n", cp[i + 5] & 0xff, flags);
break;