d0p1/ack
1
0
Fork 0
Code Issues Pull requests Packages Projects Releases Wiki Activity

Bug fix with WorkingDir

Browse source
This commit is contained in:
ceriel 1987-01-16 16:14:22 +00:00
parent e346f6fc74
commit 8f27f92269
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
util/cpp/main.c
View file

@ -5,6 +5,7 @@
extern struct tokenname tkidf[], tkkey[]; extern struct tokenname tkidf[], tkkey[];
extern char *symbol2str(); extern char *symbol2str();
extern char *getwdir();
extern char *inctable[]; extern char *inctable[];
extern int err_occurred; extern int err_occurred;
int idfsize = IDFSIZE; int idfsize = IDFSIZE;
@ -56,10 +57,10 @@ compile(argc, argv)
fatal("use: %s [options] [source]", prog_name); fatal("use: %s [options] [source]", prog_name);
break; break;
} }
WorkingDir = inctable[0];
if (!InsertFile(source, (char **) 0, &dummy)) /* read the source file */ if (!InsertFile(source, (char **) 0, &dummy)) /* read the source file */
fatal("%s: no source file %s\n", prog_name, fatal("%s: no source file %s\n", prog_name,
source ? source : "stdin"); source ? source : "stdin");
WorkingDir = getwdir(dummy);
preprocess(source); preprocess(source);
} }