[perl #64948] tests available

[kyleha]

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

commit 47c7c0d6a671619b234a9747c4107e48891e987b
Author: kyle <k...@c213334d-75ef-0310-aa23-eaa082d1ae64>
Date:   Wed Aug 12 03:51:17 2009 +0000

    [t/spec] Test for RT #64948
    
    git-svn-id: http://svn.pugscode.org/p...@27966 
c213334d-75ef-0310-aa23-eaa082d1ae64

diff --git a/t/spec/S05-match/capturing-contexts.t 
b/t/spec/S05-match/capturing-contexts.t
index 112ffb5..a9a8e46 100644
--- a/t/spec/S05-match/capturing-contexts.t
+++ b/t/spec/S05-match/capturing-contexts.t
@@ -2,7 +2,7 @@ use v6;
 
 use Test;
 
-plan 16;
+plan 18;
 
 if !eval('("a" ~~ /a/)') {
   skip_rest "skipped tests - rules support appears to be missing";
@@ -63,4 +63,15 @@ if !eval('("a" ~~ /a/)') {
     is ~$<o>, 'o o', 'match list stringifies like a normal list AFTER "isa"';
 }
 
+# RT #64948
+{
+    #?rakudo todo 'RT #64948'
+    ok %( 'foo' ~~ /foo/ ).can( 'exists' ),
+       'Match coerced to Hash has "exists" method';
+
+    my %match_as_hash = %( 'foo' ~~ /foo/ );
+    ok %match_as_hash.can( 'exists' ),
+       'Match stored in Hash has "exists" method';
+}
+
 # vim: ft=perl6