Generalise argument string parsing,

not just for .include. Manual shows various delimiters.
This commit is contained in:
Olaf Seibert 2015-05-08 12:35:57 +02:00
parent f01ee85a8f
commit 184fae4b67
2 changed files with 10 additions and 12 deletions

View File

@ -449,18 +449,7 @@ static int assemble(
return 0;
}
if (name[0] == '"') {
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);
}
incl = new_file_stream(name);
if (incl == NULL) {
report(stack->top, "Unable to open .INCLUDE file %s\n", name);
free(name);

View File

@ -563,6 +563,15 @@ int brackrange(
endlen = 1;
*start = 1;
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:
return FALSE;
}