Index: math.c
===================================================================
--- math.c      (revision 25834)
+++ math.c      (working copy)
@@ -671,7 +671,7 @@
     d0 = RFLOAT_VALUE(x);
     fracpart = modf(d0, &intpart);
     if (fracpart == 0.0 &&
-       0 < intpart &&
+       0 < (int)intpart &&
        (n = (int)intpart - 1) < numberof(fact_table)) {
         return DBL2NUM(fact_table[n]);
     }