diff --git a/assemble.c b/assemble.c index fd2ccdf..9d2e3ce 100644 --- a/assemble.c +++ b/assemble.c @@ -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); diff --git a/parse.c b/parse.c index c6c2f75..91656f6 100644 --- a/parse.c +++ b/parse.c @@ -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; }