[t/spec] fudged underscores.t for rakudo, changed is $a, $b to ok $a …

…== $b for

a few numeric tests (not very consistently, though)


git-svn-id: http://svn.pugscode.org/pugs@22229 c213334d-75ef-0310-aa23-eaa082d1ae64

S02-literals/underscores.t

@@ -32,17 +32,20 @@ eval_dies_ok '10_E1', "Underscore before E fails";
 
 eval_dies_ok '10E_1', "Underscore after E fails";
 
-is 3.1_41, 3.141, "Underscores work with floating point after decimal";
+#?rakudo 2 todo 'underscores in floating point numbers'
+ok 3.1_41 == 3.141, "Underscores work with floating point after decimal";
 
-is 10_0.8, 100.8, "Underscores work with floating point before decimal";
+ok 10_0.8 == 100.8, "Underscores work with floating point before decimal";
 
 is 0xdead_beef, 0xdeadbeef, "Underscores work with hex";
 
 is 0b1101_1110_1010_1101_1011_1110_1110_1111, 0xdeadbeef, "Underscores work with binary";
 
+#?rakudo skip 'parse 2e0_1'
 is 2e0_1, 20, "Underscores work in the argument for e";
 
-is 2.1_23, 2.123, "2.1_23 parses as number";
+#?rakudo todo 'underscores in floating point numbers'
+ok 2.1_23 == 2.123, "2.1_23 parses as number";
 
 dies_ok { 2._foo },    "2._foo parses as method call";
 dies_ok { 2._123 },    "2._123 parses as method call";