From e8730266e57b68c51a52f6de9dc8a3edb21328f3 Mon Sep 17 00:00:00 2001 From: ceriel Date: Fri, 19 Aug 1988 13:40:01 +0000 Subject: [PATCH] removed not-used variable --- lang/basic/src/bem.c | 1 - lang/basic/src/bem.h | 1 - lang/basic/src/initialize.c | 2 -- 3 files changed, 4 deletions(-) diff --git a/lang/basic/src/bem.c b/lang/basic/src/bem.c index fe747dc6c..1791db4ba 100644 --- a/lang/basic/src/bem.c +++ b/lang/basic/src/bem.c @@ -28,7 +28,6 @@ static char rcs_graph[] = RCS_GRAPH ; char *program; char datfname[MAXFILENAME] ; -char tmpfname[MAXFILENAME] ; char *inpfile, *outfile; int BEMINTSIZE = EMINTSIZE; diff --git a/lang/basic/src/bem.h b/lang/basic/src/bem.h index 0f09629ec..1ee7b457e 100644 --- a/lang/basic/src/bem.h +++ b/lang/basic/src/bem.h @@ -44,7 +44,6 @@ extern char *inpfile; /* input tko compiler */ extern char *outfile; /* output from compiler */ extern char datfname[MAXFILENAME]; /* data statements file */ -extern char tmpfname[MAXFILENAME]; /* temporary statements file */ extern File *emfile; /* EM output file */ extern File *datfile; /* data file */ diff --git a/lang/basic/src/initialize.c b/lang/basic/src/initialize.c index 3a7edff5d..09d510ea5 100644 --- a/lang/basic/src/initialize.c +++ b/lang/basic/src/initialize.c @@ -4,7 +4,6 @@ */ #include "bem.h" -#include #ifndef NORSCID static char rcs_id[] = "$Header$"; @@ -21,7 +20,6 @@ initialize() register char *cindex, *cptr; int result1, result2; - (void) sprint(tmpfname,"%s/abc%d",TMP_DIR,getpid()); /* Find the basename */ /* Strip leading directories */ cindex= (char *)0; -- 2.34.1