From 3f2ce6373f7902e02c559876fb7255b5e36aaa64 Mon Sep 17 00:00:00 2001
From: nobu <nobu@b2dd03c8-39d4-4d8f-98ff-823fe69b080e>
Date: Fri, 22 Feb 2013 03:46:47 +0000
Subject: random.c: fix error message

* random.c (rb_random_ulong_limited): fix error message for negative
  value.  [ruby-dev:47061] [Bug #7903]

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@39376 b2dd03c8-39d4-4d8f-98ff-823fe69b080e
---
 numeric.c | 6 ++++++
 1 file changed, 6 insertions(+)

(limited to 'numeric.c')

diff --git a/numeric.c b/numeric.c
index 3216b79ffa..5c629d79c9 100644
--- a/numeric.c
+++ b/numeric.c
@@ -185,6 +185,12 @@ negative_int_p(VALUE num)
     return RTEST(rb_funcall(num, mid, 1, INT2FIX(0)));
 }
 
+int
+rb_num_negative_p(VALUE num)
+{
+    return negative_int_p(num);
+}
+
 /*
  *  call-seq:
  *     num.coerce(numeric)  ->  array
-- 
cgit v1.2.3