godzil/tack
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Also update WorkingDir on line directives

Browse Source
This commit is contained in:
ceriel 1990-11-22 12:02:00 +00:00
parent a8f3296e4b
commit 2bc2154dcd
1 changed files with 3 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
lang/m2/m2mm/LLlex.c
View File

@ -23,6 +23,8 @@ struct token dot,
int idfsize = IDFSIZE;
int ForeignFlag;
extern char *getwdir();
STATIC
SkipComment()
{
@ -160,6 +162,7 @@ CheckForLineDirective()
*/
if (class(ch) == STNL && strcmp(FileName,buf)) {
FileName = Salloc(buf,(unsigned) strlen(buf) + 1);
WorkingDir = getwdir(FileName);
}
}
if (class(ch) == STEOI) {