corrected print formats

This commit is contained in:
ceriel 1989-02-02 16:32:19 +00:00
parent 920ba0eebe
commit 9ea59fd48a
4 changed files with 8 additions and 8 deletions

View file

@ -73,10 +73,10 @@ con_float() {
#endif OWNFLOAT #endif OWNFLOAT
if (argval!= 4 && argval!= 8) { if (argval!= 4 && argval!= 8) {
fprintf(stderr,"float constant size = %d\n",argval); fprintf(stderr,"float constant size = %ld\n",argval);
fatal("bad fcon size"); fatal("bad fcon size");
} }
fprintf(codefile,"!float %s sz %d\n", str, argval); fprintf(codefile,"!float %s sz %ld\n", str, argval);
f = atof(str); f = atof(str);
if (f == 0) { if (f == 0) {
if (argval == 8) fprintf(codefile, ".data2 0, 0\n"); if (argval == 8) fprintf(codefile, ".data2 0, 0\n");

View file

@ -73,10 +73,10 @@ con_float() {
#endif OWNFLOAT #endif OWNFLOAT
if (argval!= 4 && argval!= 8) { if (argval!= 4 && argval!= 8) {
fprintf(stderr,"float constant size = %d\n",argval); fprintf(stderr,"float constant size = %ld\n",argval);
fatal("bad fcon size"); fatal("bad fcon size");
} }
fprintf(codefile,"!float %s sz %d\n", str, argval); fprintf(codefile,"!float %s sz %ld\n", str, argval);
f = atof(str); f = atof(str);
if (f == 0) { if (f == 0) {
if (argval == 8) fprintf(codefile, ".data2 0, 0\n"); if (argval == 8) fprintf(codefile, ".data2 0, 0\n");

View file

@ -73,10 +73,10 @@ con_float() {
#endif OWNFLOAT #endif OWNFLOAT
if (argval!= 4 && argval!= 8) { if (argval!= 4 && argval!= 8) {
fprintf(stderr,"float constant size = %d\n",argval); fprintf(stderr,"float constant size = %ld\n",argval);
fatal("bad fcon size"); fatal("bad fcon size");
} }
fprintf(codefile,"!float %s sz %d\n", str, argval); fprintf(codefile,"!float %s sz %ld\n", str, argval);
f = atof(str); f = atof(str);
if (f == 0) { if (f == 0) {
if (argval == 8) fprintf(codefile, ".data2 0, 0\n"); if (argval == 8) fprintf(codefile, ".data2 0, 0\n");

View file

@ -73,10 +73,10 @@ con_float() {
#endif OWNFLOAT #endif OWNFLOAT
if (argval!= 4 && argval!= 8) { if (argval!= 4 && argval!= 8) {
fprintf(stderr,"float constant size = %d\n",argval); fprintf(stderr,"float constant size = %ld\n",argval);
fatal("bad fcon size"); fatal("bad fcon size");
} }
fprintf(codefile,"!float %s sz %d\n", str, argval); fprintf(codefile,"!float %s sz %ld\n", str, argval);
f = atof(str); f = atof(str);
if (f == 0) { if (f == 0) {
if (argval == 8) fprintf(codefile, ".data2 0, 0\n"); if (argval == 8) fprintf(codefile, ".data2 0, 0\n");