Add tests, fixes for tests, reinstate and type-convert stuff marked "bitrot"

[ccom.git] / fp.c

diff --git a/fp.c b/fp.c
index 241b733..b8efa0d 100644 (file)
--- a/fp.c
+++ b/fp.c
@@ -361,10 +361,9 @@ static int32_t moveifp11(val) _DOUBLE *val; {
 }
 
 static int32_t moviffp11(val, fac) int32_t val; _DOUBLE *fac; {
-       int32_t i, qdouble, leni;
+       int32_t i;
        int32_t exp, sign;
 
-       qdouble = FPS & FPS_D;
        fac->l = val;
        fac->h = 0;
        if (fac->l) {