From b365c5326258e029b1a23753b5c53ef77e684e1a Mon Sep 17 00:00:00 2001 From: ceriel Date: Wed, 6 Jul 1988 18:18:46 +0000 Subject: [PATCH] removed temp file --- lang/basic/src/bem.h | 1 - lang/basic/src/initialize.c | 4 +--- 2 files changed, 1 insertion(+), 4 deletions(-) diff --git a/lang/basic/src/bem.h b/lang/basic/src/bem.h index b0d41e935..0f09629ec 100644 --- a/lang/basic/src/bem.h +++ b/lang/basic/src/bem.h @@ -48,7 +48,6 @@ extern char tmpfname[MAXFILENAME]; /* temporary statements file */ extern File *emfile; /* EM output file */ extern File *datfile; /* data file */ -extern File *tmp_file; /* compiler temporary */ extern File *yyin; /* Compiler input */ extern int endofinput; diff --git a/lang/basic/src/initialize.c b/lang/basic/src/initialize.c index 5c4e36e53..b849aee68 100644 --- a/lang/basic/src/initialize.c +++ b/lang/basic/src/initialize.c @@ -12,7 +12,6 @@ static char rcs_id[] = "$Header$"; /* generate temporary files etc */ -File *tmp_file; File *datfile; @@ -43,8 +42,7 @@ initialize() C_init((arith)BEMINTSIZE, (arith)BEMPTRSIZE); result1 = sys_open(inpfile, OP_READ, &yyin); result2 = C_open(outfile); - result3 = sys_open(tmpfname,OP_WRITE, &tmp_file); - if ( result1==0 || result2== 0 || result3== 0 ) + if ( result1==0 || result2== 0 ) fatal("Improper file permissions"); C_magic(); fillkex(); /* initialize symbol table */ -- 2.34.1