From dcfd932cf14ff6080883310f893d20e2dc3761c4 Mon Sep 17 00:00:00 2001 From: colomon Date: Sun, 9 May 2010 06:49:39 +0000 Subject: [PATCH] [t/spec] Fix test and unfudge. git-svn-id: http://svn.pugscode.org/pugs@30595 c213334d-75ef-0310-aa23-eaa082d1ae64 --- t/spec/S32-num/sqrt.t | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/t/spec/S32-num/sqrt.t b/t/spec/S32-num/sqrt.t index 4064ede05..d646041dc 100644 --- a/t/spec/S32-num/sqrt.t +++ b/t/spec/S32-num/sqrt.t @@ -30,12 +30,11 @@ is(sqrt(-Inf), NaN, 'sqrt(-Inf) is NaN'); is(sqrt(-0/1), -0/1, 'sqrt preserves sign of Rat zero'); is(sqrt(-0.0e0), -0.0e0, 'sqrt preserves sign of Num zero'); -#?rakudo skip 'named args' { is_approx(sqrt(:x(2)), 1.41421356, 'got the square root of 2 with named args'); is_approx(sqrt(:x(5)) * sqrt(5), 5, 'got the square root of 5 with named args'); is_approx(sqrt(:x(1/42)) * sqrt(1/42), 1/42, 'got the square root of 1/42 with named args'); - is_approx(sqrt(:x(1e2)) * sqrt(1e2), 10, 'got the square root of 1e2 with named args'); + is_approx(sqrt(:x(1e2)) * sqrt(1e2), 100, 'got the square root of 1e2 with named args'); is(sqrt(:x(-1)), NaN, 'sqrt(:x(-1)) is NaN'); } -- 2.11.4.GIT