mirror of
https://github.com/open-simh/simtools.git
synced 2026-05-05 07:23:31 +00:00
Generalise argument string parsing,
not just for .include. Manual shows various delimiters.
This commit is contained in:
13
assemble.c
13
assemble.c
@@ -449,18 +449,7 @@ static int assemble(
|
|||||||
return 0;
|
return 0;
|
||||||
}
|
}
|
||||||
|
|
||||||
if (name[0] == '"') {
|
incl = new_file_stream(name);
|
||||||
char *name1 = name + 1;
|
|
||||||
char *ename = name1 + strlen(name1) - 1;
|
|
||||||
if (*ename == '"') {
|
|
||||||
*ename = '\0';
|
|
||||||
} else {
|
|
||||||
report(stack->top, "No closing quotation mark: %s\n", name);
|
|
||||||
}
|
|
||||||
incl = new_file_stream(name1);
|
|
||||||
} else {
|
|
||||||
incl = new_file_stream(name);
|
|
||||||
}
|
|
||||||
if (incl == NULL) {
|
if (incl == NULL) {
|
||||||
report(stack->top, "Unable to open .INCLUDE file %s\n", name);
|
report(stack->top, "Unable to open .INCLUDE file %s\n", name);
|
||||||
free(name);
|
free(name);
|
||||||
|
|||||||
9
parse.c
9
parse.c
@@ -563,6 +563,15 @@ int brackrange(
|
|||||||
endlen = 1;
|
endlen = 1;
|
||||||
*start = 1;
|
*start = 1;
|
||||||
break;
|
break;
|
||||||
|
case '/': /* seen on page 6-52 */
|
||||||
|
case '?': /* seen on page 6-52 */
|
||||||
|
case '\\': /* seen on page 6-52 */
|
||||||
|
case '"': /* seen in Kermit-11 source for RT11 */
|
||||||
|
endstr[0] = cp[0];
|
||||||
|
strcpy(endstr + 1, "\n");
|
||||||
|
*start = 1;
|
||||||
|
endlen = 1;
|
||||||
|
break;
|
||||||
default:
|
default:
|
||||||
return FALSE;
|
return FALSE;
|
||||||
}
|
}
|
||||||
|
|||||||
Reference in New Issue
Block a user