github.com/open-simh.simtools
1
0
Fork 0
mirror of https://github.com/open-simh/simtools.git synced 2026-05-04 23:15:19 +00:00
Code Issues Projects Releases Wiki Activity

A few more small listing tweaks.

Browse Source
This commit is contained in:
Olaf Seibert
2015-05-19 22:09:53 +02:00
parent 859e8dbb1f
commit 2488e02aae
3 changed files with 3 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

1
assemble.c
View File

@@ -397,6 +397,7 @@ static int assemble(
add_sym(label, mstr->nargs, SYMBOLFLAG_DEFINITION | local, &absolute_section, add_sym(label, mstr->nargs, SYMBOLFLAG_DEFINITION | local, &absolute_section,
&symbol_st); &symbol_st);
free(label); free(label);
list_value(stack->top, mstr->nargs);
return 1; return 1;
} }

2
assemble_aux.c
View File

@@ -122,7 +122,7 @@ static int store_internal_word(
unsigned word) unsigned word)
{ {
change_dot(tr, size); change_dot(tr, size);
list_word(str, DOT, word, size, ""); list_word(str, DOT, word, size, "'");
return text_internal_word(tr, &DOT, size, word); return text_internal_word(tr, &DOT, size, word);
} }

2
symbols.c
View File

@@ -597,7 +597,7 @@ void list_section(
int flags = sec->flags; int flags = sec->flags;
fprintf(lstfile, "%-6s %06o %03d ", fprintf(lstfile, "%-6s %06o %03d ",
sec->label, sec->size, sec->sector); sec->label, sec->size & 0177777, sec->sector);
fprintf(lstfile, "(%s,%s,%s,%s,%s,%s)\n", fprintf(lstfile, "(%s,%s,%s,%s,%s,%s)\n",
(flags & PSECT_RO) ? "RO" : "RW", (flags & PSECT_RO) ? "RO" : "RW",
(flags & PSECT_DATA) ? "D" : "I", (flags & PSECT_DATA) ? "D" : "I",