godzil/tack
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

corrected con_float

Browse Source
This commit is contained in:
ceriel 1987-11-06 13:12:21 +00:00
parent 4cffa32536
commit a43db23e66
4 changed files with 4 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
mach/m68020/ncg/mach.c
View File

@ -88,7 +88,7 @@ con_float() {
p = (char *) &f;
}
fprintf(codefile, ".data1 0%o", *p++ & 0377);
for (i = argval-2; i; i--) {
for (i = argval-1; i; i--) {
fprintf(codefile,",0%o", *p++ & 0377);
}
#else OWNFLOAT

2
mach/m68k2/ncg/mach.c
View File

@ -88,7 +88,7 @@ con_float() {
p = (char *) &f;
}
fprintf(codefile, ".data1 0%o", *p++ & 0377);
for (i = argval-2; i; i--) {
for (i = argval-1; i; i--) {
fprintf(codefile,",0%o", *p++ & 0377);
}
#else OWNFLOAT

2
mach/m68k4/ncg/mach.c
View File

@ -88,7 +88,7 @@ con_float() {
p = (char *) &f;
}
fprintf(codefile, ".data1 0%o", *p++ & 0377);
for (i = argval-2; i; i--) {
for (i = argval-1; i; i--) {
fprintf(codefile,",0%o", *p++ & 0377);
}
#else OWNFLOAT

2
mach/moon3/ncg/mach.c
View File

@ -88,7 +88,7 @@ con_float() {
p = (char *) &f;
}
fprintf(codefile, ".data1 0%o", *p++ & 0377);
for (i = argval-2; i; i--) {
for (i = argval-1; i; i--) {
fprintf(codefile,",0%o", *p++ & 0377);
}
#else OWNFLOAT