1 files changed, 15 insertions, 1 deletions
diff --git a/numeric.c b/numeric.c
index 9127a0de2b..75ff41da80 100644
--- a/numeric.c
+++ b/numeric.c
@@ -667,7 +667,7 @@ int
 num2int(val)
     VALUE val;
 {
-    long num = num2int(val);
+    long num = num2long(val);
 
     if (num < INT_MIN || INT_MAX < num) {
 	ArgError("integer %d too big to convert to `int'.", num);
@@ -686,6 +686,20 @@ fix2int(val)
     }
     return (int)num;
 }
+#else
+int
+num2int(val)
+    VALUE val;
+{
+    return num2long(val);
+}
+
+int
+fix2int(val)
+    VALUE val;
+{
+    return FIX2INT(val);
+}
 #endif
 
 VALUE