github.com/open-simh.simtools
1
0
Fork 0
mirror of https://github.com/open-simh/simtools.git synced 2026-02-04 07:34:12 +00:00
Code Issues Projects Releases Wiki Activity

Fix .psect without argument, add (ignored) pseudo ops

Browse Source 
.mdelete, .cross, .nocross
This commit is contained in:
Paul Koning
2022-06-12 16:50:28 -04:00
parent db9cb5a9ee
commit fbb936d1ce
3 changed files with 13 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

13
assemble.c
View File

@@ -293,6 +293,8 @@ O 75 .endc
case P_PAGE:
case P_PRINT:
case P_SBTTL:
case P_CROSS:
case P_NOCROSS:
return 1; /* Accepted, ignored. (An obvious
need: get assembly listing
controls working fully. ) */
@@ -708,6 +710,9 @@ O 75 .endc
return mac != NULL;
}
case P_MDELETE:
return 1; /* TODO: or should it just be a NOP? */
case P_MEXIT:
{
STREAM *macstr;
@@ -1038,12 +1043,8 @@ O 75 .endc
label = get_symbol(cp, &cp, NULL);
if (label == NULL) {
if (op->value == P_CSECT) {
label = memcheck(strdup(". BLK."));
unnamed_csect = 1;
} else {
label = memcheck(strdup("")); /* Allow blank */
}
label = memcheck(strdup(". BLK."));
unnamed_csect = 1;
}
sectsym = lookup_sym(label, &section_st);