This commit is contained in:
ceriel 1988-03-31 10:38:05 +00:00
parent 092292683c
commit 4e419a19cd
4 changed files with 20 additions and 20 deletions

View file

@ -61,7 +61,6 @@ static int been_here;
con_float() { con_float() {
double f; double f;
double atof(); double atof();
float fl;
int i; int i;
#ifndef OWNFLOAT #ifndef OWNFLOAT
double f1; double f1;
@ -70,6 +69,7 @@ con_float() {
int sign = 0; int sign = 0;
int fraction[4] ; int fraction[4] ;
#else OWNFLOAT #else OWNFLOAT
float fl;
char *p; char *p;
#endif OWNFLOAT #endif OWNFLOAT
@ -265,15 +265,15 @@ f_regsave()
save(); save();
} }
regsave(str,off,size) regsave(s,off,size)
char *str; char *s;
long off; long off;
{ {
assert (regnr < 9); assert (regnr < 9);
regsav[regnr].rs_reg = str; regsav[regnr].rs_reg = s;
regsav[regnr].rs_off = off; regsav[regnr].rs_off = off;
regsav[regnr++].rs_size = size; regsav[regnr++].rs_size = size;
fprintf(codefile, "!Local %ld into %s\n",off,str); fprintf(codefile, "!Local %ld into %s\n",off,s);
} }
regreturn() regreturn()

View file

@ -61,7 +61,6 @@ static int been_here;
con_float() { con_float() {
double f; double f;
double atof(); double atof();
float fl;
int i; int i;
#ifndef OWNFLOAT #ifndef OWNFLOAT
double f1; double f1;
@ -70,6 +69,7 @@ con_float() {
int sign = 0; int sign = 0;
int fraction[4] ; int fraction[4] ;
#else OWNFLOAT #else OWNFLOAT
float fl;
char *p; char *p;
#endif OWNFLOAT #endif OWNFLOAT
@ -265,15 +265,15 @@ f_regsave()
save(); save();
} }
regsave(str,off,size) regsave(s,off,size)
char *str; char *s;
long off; long off;
{ {
assert (regnr < 9); assert (regnr < 9);
regsav[regnr].rs_reg = str; regsav[regnr].rs_reg = s;
regsav[regnr].rs_off = off; regsav[regnr].rs_off = off;
regsav[regnr++].rs_size = size; regsav[regnr++].rs_size = size;
fprintf(codefile, "!Local %ld into %s\n",off,str); fprintf(codefile, "!Local %ld into %s\n",off,s);
} }
regreturn() regreturn()

View file

@ -61,7 +61,6 @@ static int been_here;
con_float() { con_float() {
double f; double f;
double atof(); double atof();
float fl;
int i; int i;
#ifndef OWNFLOAT #ifndef OWNFLOAT
double f1; double f1;
@ -70,6 +69,7 @@ con_float() {
int sign = 0; int sign = 0;
int fraction[4] ; int fraction[4] ;
#else OWNFLOAT #else OWNFLOAT
float fl;
char *p; char *p;
#endif OWNFLOAT #endif OWNFLOAT
@ -265,15 +265,15 @@ f_regsave()
save(); save();
} }
regsave(str,off,size) regsave(s,off,size)
char *str; char *s;
long off; long off;
{ {
assert (regnr < 9); assert (regnr < 9);
regsav[regnr].rs_reg = str; regsav[regnr].rs_reg = s;
regsav[regnr].rs_off = off; regsav[regnr].rs_off = off;
regsav[regnr++].rs_size = size; regsav[regnr++].rs_size = size;
fprintf(codefile, "!Local %ld into %s\n",off,str); fprintf(codefile, "!Local %ld into %s\n",off,s);
} }
regreturn() regreturn()

View file

@ -61,7 +61,6 @@ static int been_here;
con_float() { con_float() {
double f; double f;
double atof(); double atof();
float fl;
int i; int i;
#ifndef OWNFLOAT #ifndef OWNFLOAT
double f1; double f1;
@ -70,6 +69,7 @@ con_float() {
int sign = 0; int sign = 0;
int fraction[4] ; int fraction[4] ;
#else OWNFLOAT #else OWNFLOAT
float fl;
char *p; char *p;
#endif OWNFLOAT #endif OWNFLOAT
@ -265,15 +265,15 @@ f_regsave()
save(); save();
} }
regsave(str,off,size) regsave(s,off,size)
char *str; char *s;
long off; long off;
{ {
assert (regnr < 9); assert (regnr < 9);
regsav[regnr].rs_reg = str; regsav[regnr].rs_reg = s;
regsav[regnr].rs_off = off; regsav[regnr].rs_off = off;
regsav[regnr++].rs_size = size; regsav[regnr++].rs_size = size;
fprintf(codefile, "!Local %ld into %s\n",off,str); fprintf(codefile, "!Local %ld into %s\n",off,s);
} }
regreturn() regreturn()