From 4fa686dd802104ebc66e9d7f8abd29c0adc9f296 Mon Sep 17 00:00:00 2001 From: Taylor R Campbell Date: Sun, 18 Nov 2018 06:32:51 +0000 Subject: [PATCH] Fix definition of relerr. The expected magnitude should be, well, the magnitude of the expected value, not the one we actually computed! Fortunately it doesn't change the outcome of any of the tests here. --- tests/runtime/test-arith.scm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/tests/runtime/test-arith.scm b/tests/runtime/test-arith.scm index b16802a4f..575317a6b 100644 --- a/tests/runtime/test-arith.scm +++ b/tests/runtime/test-arith.scm @@ -231,7 +231,7 @@ USA. (define (relerr e a) (if (= e 0) (if (= a 0) 0 1) - (magnitude (/ (- e a) a)))) + (magnitude (/ (- e a) e)))) (define-enumerated-test 'expm1-approx (vector -- 2.25.1