some test requires double precision

883b97ab · Yukihiro Matsumoto · 34cf0567 · 883b97ab · 883b97ab
Commit 883b97ab authored Aug 01, 2012 by Yukihiro Matsumoto
Hide whitespace changes
Inline Side-by-side

Showing with 2 additions and 2 deletions

src/math.c src/math.c +1 -1

test/t/math.rb test/t/math.rb +1 -1

No files found.
--- a/src/math.c
+++ b/src/math.c
@@ -647,7 +647,7 @@ mrb_init_math(mrb_state *mrb)
 #endif

 #ifdef MRB_USE_FLOAT
-  mrb_define_const(mrb, mrb_math, "TOLERANCE", mrb_float_value(1e-6));
+  mrb_define_const(mrb, mrb_math, "TOLERANCE", mrb_float_value(1e-5));
 #else
  mrb_define_const(mrb, mrb_math, "TOLERANCE", mrb_float_value(1e-12));
 #endif

--- a/test/t/math.rb
+++ b/test/t/math.rb
@@ -12,7 +12,7 @@ if Object.const_defined?(:Math)

  assert('Fundamental trig identities') do
    result = true
-    N = 15
+    N = 13
    N.times do |i|
      a  = Math::PI / N * i
      ca = Math::PI / 2 - a