[perl #58488] tests available

[kyleha]

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

commit b588d7cad299f00f47d1bdc87dceae7cbfcc45ba
Author: moritz <mor...@c213334d-75ef-0310-aa23-eaa082d1ae64>
Date:   Sat Jul 24 15:28:58 2010 +0000

    [t/spec] test for RT #58488, multiple redefinition of same class in eval
    
    git-svn-id: http://svn.pugscode.org/p...@31805 
c213334d-75ef-0310-aa23-eaa082d1ae64

diff --git a/t/spec/S02-names_and_variables/names.t 
b/t/spec/S02-names_and_variables/names.t
index b72580e..a260b8e 100644
--- a/t/spec/S02-names_and_variables/names.t
+++ b/t/spec/S02-names_and_variables/names.t
@@ -2,7 +2,7 @@ use v6;
 
 use Test;
 
-plan 23;
+plan 24;
 
 # I'm using semi-random nouns for variable names since I'm tired of 
foo/bar/baz and alpha/beta/...
 
@@ -79,9 +79,13 @@ plan 23;
 
 # RT #74276
 # Rakudo had troubles with names starting with Q
-{
-    eval_lives_ok 'class Quox { }; Quox.new', 'class names can start with Q';
+eval_lives_ok 'class Quox { }; Quox.new', 'class names can start with Q';
 
-}
+# RT #58488 
+lives_ok {
+    eval 'class A { has $.a};  my $a = A.new();';
+    eval 'class A { has $.a};  my $a = A.new();';
+    eval 'class A { has $.a};  my $a = A.new();';
+}, 'can redefine a class in eval multiple times without permanent damange';
 
 # vim: ft=perl6