ubergames/lilium-voyager
0
0
Fork 0
mirror of https://github.com/UberGames/lilium-voyager.git synced 2024-11-10 06:31:47 +00:00
Code Issues Projects Releases Packages Wiki Activity

Fixed some compiler warnings in lcc...mostly "long double" stuff.

Browse source
This commit is contained in:
Ryan C. Gordon 2005-11-28 09:53:09 +00:00
parent 807ba08558
commit 4517e7a34b
3 changed files with 6 additions and 6 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
code/tools/lcc/src/c.h
View file

@ -81,7 +81,7 @@ typedef struct table *Table;
typedef union value { typedef union value {
long i; long i;
unsigned long u; unsigned long u;
long double d; double d;
void *p; void *p;
void (*g)(void); void (*g)(void);
} Value; } Value;

2
code/tools/lcc/src/enode.c
View file

@ -184,7 +184,7 @@ Tree cnsttree(Type ty, ...) {
switch (ty->op) { switch (ty->op) {
case INT: p->u.v.i = va_arg(ap, long); break; case INT: p->u.v.i = va_arg(ap, long); break;
case UNSIGNED:p->u.v.u = va_arg(ap, unsigned long)&ones(8*ty->size); break; case UNSIGNED:p->u.v.u = va_arg(ap, unsigned long)&ones(8*ty->size); break;
case FLOAT: p->u.v.d = va_arg(ap, long double); break; case FLOAT: p->u.v.d = va_arg(ap, double); break;
case POINTER: p->u.v.p = va_arg(ap, void *); break; case POINTER: p->u.v.p = va_arg(ap, void *); break;
default: assert(0); default: assert(0);
} }

8
code/tools/lcc/src/simp.c
View file

@ -246,15 +246,15 @@ Tree simplify(int op, Type ty, Tree l, Tree r) {
break; break;
case CVI+F: case CVI+F:
xcvtcnst(I,l->u.v.i,ty,d,(long double)l->u.v.i); xcvtcnst(I,l->u.v.i,ty,d,(double)l->u.v.i);
case CVU+F: case CVU+F:
xcvtcnst(U,l->u.v.u,ty,d,(long double)l->u.v.u); xcvtcnst(U,l->u.v.u,ty,d,(double)l->u.v.u);
break; break;
case CVF+I: case CVF+I:
xcvtcnst(F,l->u.v.d,ty,i,(long)l->u.v.d); xcvtcnst(F,l->u.v.d,ty,i,(long)l->u.v.d);
break; break;
case CVF+F: { case CVF+F: {
float d; float d = 0.0f;
if (l->op == CNST+F) { if (l->op == CNST+F) {
if (l->u.v.d < ty->u.sym->u.limits.min.d) if (l->u.v.d < ty->u.sym->u.limits.min.d)
d = ty->u.sym->u.limits.min.d; d = ty->u.sym->u.limits.min.d;
@ -263,7 +263,7 @@ Tree simplify(int op, Type ty, Tree l, Tree r) {
else else
d = l->u.v.d; d = l->u.v.d;
} }
xcvtcnst(F,l->u.v.d,ty,d,(long double)d); xcvtcnst(F,l->u.v.d,ty,d,(double)d);
break; break;
} }
case BAND+U: case BAND+U: