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

Implement .ENABL and .DSABL LC.

Browse Source
This commit is contained in:
Olaf Seibert
2015-05-21 22:24:31 +02:00
parent 168340c54c
commit b8a15a89b5
3 changed files with 16 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

14
assemble.c
View File

@@ -47,6 +47,10 @@ static int assemble(
if (line == NULL)
return -1; /* Return code for EOF. */
if (!enabl_lc) { /* If lower case disabled, */
upcase(line); /* turn it into upper case. */
}
cp = line;
/* Frankly, I don't need to keep "line." But I found it quite
@@ -677,8 +681,11 @@ static int assemble(
else if (strcmp(label, "LSB") == 0) {
enabl_lsb = 1;
lsb = get_next_lsb();
} else if (strcmp(label, "GBL") == 0)
} else if (strcmp(label, "GBL") == 0) {
enabl_gbl = 1;
} else if (strcmp(label, "LC") == 0) {
enabl_lc = 1;
}
free(label);
cp = skipdelim(cp);
}
@@ -693,8 +700,11 @@ static int assemble(
else if (strcmp(label, "LSB") == 0) {
lsb = get_next_lsb();
enabl_lsb = 0;
} else if (strcmp(label, "GBL") == 0)
} else if (strcmp(label, "GBL") == 0) {
enabl_gbl = 0;
} else if (strcmp(label, "LC") == 0) {
enabl_lc = 0;
}
free(label);
cp = skipdelim(cp);
}