Re: AIX and gcc (moving targets)

[p5sagit/p5-mst-13.2.git] / ext / Thread / sync.t

diff --git a/ext/Thread/sync.t b/ext/Thread/sync.t
index 9c2e589..6445b55 100644 (file)
--- a/ext/Thread/sync.t
+++ b/ext/Thread/sync.t
@@ -2,8 +2,7 @@ use Thread;
 
 $level = 0;
 
-sub single_file {
-    use attrs 'locked';
+sub single_file : locked {
     my $arg = shift;
     $level++;
     print "Level $level for $arg\n";