This is an automatically generated mail to inform you that tests are now 
available in t/spec/S05-metasyntax/charset.t

commit 8cf9ce6e75dec38eaf2e2c5c5474bc1336d468d2
Author: kyle <k...@c213334d-75ef-0310-aa23-eaa082d1ae64>
Date:   Tue Dec 29 17:02:28 2009 +0000

    [t/spec] Test for RT 71702: lethal reverse range in charset
    
    git-svn-id: http://svn.pugscode.org/p...@29417 
c213334d-75ef-0310-aa23-eaa082d1ae64

diff --git a/t/spec/S05-metasyntax/charset.t b/t/spec/S05-metasyntax/charset.t
index 1aeba3f..329348c 100644
--- a/t/spec/S05-metasyntax/charset.t
+++ b/t/spec/S05-metasyntax/charset.t
@@ -12,7 +12,7 @@ be valid perl6.
 
 =end pod
 
-plan 25;
+plan *;
 
 if !eval('("a" ~~ /a/)') {
   skip_rest "skipped tests - rules support appears to be missing";
@@ -60,6 +60,12 @@ ok( "foo" ~~ /<[f] #`[comment] + [o]>/, 'comment embedded in 
charset works' );
 #?rakudo skip 'large \\x char spec in regex (RT #67122) (noauto)'
 ok "\x[10001]" ~~ /<[\x10000..\xEFFFF]>/, 'large \\x char spec';
 
+#?rakudo todo 'RT 71702: lethal reverse range in charset'
+eval_dies_ok( "'RT 71702' ~~ /<[d..b]>? RT/",
+    'reverse range in charset is lethal (RT 71702)' );
+
 }
 
+done_testing;
+
 # vim: ft=perl6

Reply via email to