* compar.c (rb_cmperr): raise comparison failure.

* intern.h: prototype; rb_cmperr

* numeric.c (flo_gt, flo_ge, flo_lt, flo_le, fix_gt, fix_ge,
  fix_lt, fix_le): should fail unless the argument is comparable.
  (ruby-bugs-ja:PR#456)


git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@3768 b2dd03c8-39d4-4d8f-98ff-823fe69b080e

1 files changed, 1 insertions, 0 deletions

diff --git a/intern.h b/intern.h
index 5a299f3003..9b4c86ce9a 100644
--- a/intern.h
+++ b/intern.h
@@ -122,6 +122,7 @@ void rb_define_singleton_method _((VALUE, const char*, VALUE(*)(ANYARGS), int));
 VALUE rb_singleton_class _((VALUE));
 /* compar.c */
 int rb_cmpint _((VALUE));
+NORETURN(void rb_cmperr _((VALUE, VALUE)));
 /* enum.c */
 /* error.c */
 RUBY_EXTERN int ruby_nerrs;