[svn:parrot] r42859 - trunk/t/op

[dukeleto at svn.parrot.org]

Author: dukeleto
Date: Wed Dec  2 10:07:53 2009
New Revision: 42859
URL: https://trac.parrot.org/parrot/changeset/42859

Log:
[t][cage] Remove PGE-dependence from t/op/number.t since it is part of 'make coretest'

Modified:
   trunk/t/op/number.t

Modified: trunk/t/op/number.t
==============================================================================
--- trunk/t/op/number.t	Wed Dec  2 10:03:16 2009	(r42858)
+++ trunk/t/op/number.t	Wed Dec  2 10:07:53 2009	(r42859)
@@ -794,11 +794,15 @@
 
 # Don't check exact string representation. Last digit part can be different */
 .sub test_sqrt_n_n
-    set $N1, 2
-    sqrt $N2, $N1
-    like( $N2, "^1.414213562373*", 'sqrt_n_n' )
-    sqrt $N2, 2.0
-    like( $N2, "1.414213562373*", 'sqrt_n_n' )
+    $P0 = new 'Float'
+    $N1 = 2
+    $N2 = sqrt $N1
+    $P0 = $N2
+    is( $P0, 1.414213562373, 'sqrt_n_n',1e-6 )
+
+    $N2 = sqrt 2.0
+    $P0 = $N2
+    is( $P0, 1.414213562373, 'sqrt_n_n',1e-6 )
 .end
 
 .sub test_exception_div_n_n_by_zero