remove some of the lint complaints

This commit is contained in:
ceriel 1988-03-31 11:17:47 +00:00
parent 4e419a19cd
commit 14d7db7499
3 changed files with 10 additions and 0 deletions

View file

@ -256,7 +256,9 @@ if (Debug)
c3_p regcp[MAXCREG];
rl_p regls[MAXCREG];
c3_p cp,findcoerc();
#ifdef MAXSPLIT
int sret;
#endif
int stackpad;
struct perm *tup,*ntup,*besttup,*tuples();

View file

@ -20,7 +20,9 @@ static char rcsid[] = "$Header$";
chrefcount(regno,amount,tflag) {
register struct reginfo *rp;
#if MAXMEMBERS != 0
register i;
#endif
rp= &machregs[regno];
#if MAXMEMBERS!=0
@ -40,7 +42,9 @@ chrefcount(regno,amount,tflag) {
getrefcount(regno) {
register struct reginfo *rp;
#if MAXMEMBERS != 0
register i,maxcount;
#endif
rp= &machregs[regno];
#if MAXMEMBERS!=0

View file

@ -52,7 +52,9 @@ instance(instno,token) register token_p token; {
register inst_p inp;
int i;
register token_p tp;
#if MAXMEMBERS != 0
struct reginfo *rp;
#endif
int regno;
result_t result;
@ -145,7 +147,9 @@ instance(instno,token) register token_p token; {
cinstance(instno,token,tp,regno) register token_p token,tp; {
register inst_p inp;
int i;
#if MAXMEMBERS != 0
struct reginfo *rp;
#endif
result_t result;
int sh; /* saved stackheight */