meesbs
/
tinycc
forked from Mirrors/tinycc
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Fix negation of 0.0 and -0.0

master
Thomas Preud'homme 2014-01-04 12:56:14 +08:00
parent 0382131c6f
commit 3eed3506b4
1 changed files with 15 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

17
tccgen.c
View File

@ -3794,9 +3794,22 @@ ST_FUNC void unary(void)
break;
case '-':
next();
vpushi(0);
unary();
gen_op('-');
t = vtop->type.t & VT_BTYPE;
/* handle (-)0.0 */
if ((vtop->r & (VT_VALMASK | VT_LVAL | VT_SYM)) == VT_CONST &&
is_float(t)) {
if (t == VT_FLOAT)
vtop->c.f = -vtop->c.f;
else if (t == VT_DOUBLE)
vtop->c.d = -vtop->c.d;
else
vtop->c.ld = -vtop->c.ld;
} else {
vpushi(0);
vswap();
gen_op('-');
}
break;
case TOK_LAND:
if (!gnu_ext)