Permalink
Browse files

rakudo fudges

  • Loading branch information...
1 parent fcb6304 commit d413b879c991ee0a60f648ffe82f573ca8274b44 @moritz moritz committed Dec 6, 2011
Showing with 3 additions and 1 deletion.
  1. +2 −0 S05-mass/properties-general.t
  2. +1 −1 S32-num/rounders.t
@@ -25,6 +25,7 @@ plan 594;
ok("\x[846D]" ~~ m/^<:L>$/, q{Match <:L> (Letter)} );
ok(!( "\x[846D]" ~~ m/^<:!L>$/ ), q{Don't match negated <L> (Letter)} );
ok(!( "\x[846D]" ~~ m/^<-:L>$/ ), q{Don't match inverted <L> (Letter)} );
+#?rakudo 3 skip 'ICU version dependent :('
ok(!( "\x[9FC4]" ~~ m/^<:L>$/ ), q{Don't match unrelated <L> (Letter)} );
ok("\x[9FC4]" ~~ m/^<:!L>$/, q{Match unrelated negated <L> (Letter)} );
ok("\x[9FC4]" ~~ m/^<-:L>$/, q{Match unrelated inverted <L> (Letter)} );
@@ -33,6 +34,7 @@ ok("\x[9FC4]\x[846D]" ~~ m/<:L>/, q{Match unanchored <:L> (Letter)} );
ok("\x[6DF7]" ~~ m/^<:Letter>$/, q{Match <:Letter>} );
ok(!( "\x[6DF7]" ~~ m/^<:!Letter>$/ ), q{Don't match negated <Letter>} );
ok(!( "\x[6DF7]" ~~ m/^<-:Letter>$/ ), q{Don't match inverted <Letter>} );
+#?rakudo 3 skip 'ICU version dependent :('
ok(!( "\x[9FC4]" ~~ m/^<:Letter>$/ ), q{Don't match unrelated <Letter>} );
ok("\x[9FC4]" ~~ m/^<:!Letter>$/, q{Match unrelated negated <Letter>} );
ok("\x[9FC4]" ~~ m/^<-:Letter>$/, q{Match unrelated inverted <Letter>} );
View
@@ -99,7 +99,7 @@ for %tests.keys.sort -> $type {
}
for %tests.keys.sort -> $t {
- isa_ok eval("{$t}(1.1)"), Int, "rounder $t returns an int";
+ isa_ok eval("{$t}(1.1)"), Int, "rounder $t returns an Int";
}

0 comments on commit d413b87

Please sign in to comment.