[perl #68358] tests available

[kyleha]

This is an automatically generated mail to inform you that tests are now 
available in t/spec/S02-names/identifier.t

commit 03e3b22b950c72abd52962a6283ba2b8c8a4f2cb
Author: kyle <k...@c213334d-75ef-0310-aa23-eaa082d1ae64>
Date:   Mon Aug 10 16:50:36 2009 +0000

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

diff --git a/t/spec/S02-names/identifier.t b/t/spec/S02-names/identifier.t
index ef80800..551e2b2 100644
--- a/t/spec/S02-names/identifier.t
+++ b/t/spec/S02-names/identifier.t
@@ -1,7 +1,7 @@
 use v6;
 use Test;
 
-plan 14;
+plan 15;
 
 # L<S02/Names/An identifier is composed of an alphabetic character>
 
@@ -60,4 +60,13 @@ plan 14;
     is sub('RT #65804'), 'RT #65804', 'sub named "sub" works';
 }
 
+# RT #68358
+{
+    my ($x);
+    sub my($a) { $a + 17 }
+    $x = 5;
+    #?rakudo todo 'RT #68358'
+    is my($x), 23, 'call to sub named "my" works';
+}
+
 # vim: ft=perl6