remove warnings (use of Any in string context)

timo · timo · commit 60bc178bee64 · 2013-01-14T10:59:50.000+01:00
diff --git a/S04-declarations/my.t b/S04-declarations/my.t
@@ -310,7 +310,7 @@ eval_lives_ok 'multi f(@a) { }; multi f(*@a) { }; f(my @a = (1, 2, 3))',
     my & = { * - 5 };
     is my @, Array.new, q{anonymous @ doesn't overshare};
     is my %, ().hash, q{anonymous % doesn't overshare};
-    is my &, Any, q{anonymous & doesn't overshare};
+    ok (my &) eqv Any, q{anonymous sub doesn't overshare};
 }
 
 # vim: ft=perl6

Original file line number	Diff line number	Diff line change
`@@ -310,7 +310,7 @@ eval_lives_ok 'multi f(@a) { }; multi f(*@a) { }; f(my @a = (1, 2, 3))',`
`310`	`310`	`my & = { * - 5 };`
`311`	`311`	`is my @, Array.new, q{anonymous @ doesn't overshare};`
`312`	`312`	`is my %, ().hash, q{anonymous % doesn't overshare};`
`313`		`- is my &, Any, q{anonymous & doesn't overshare};`
	`313`	`+ ok (my &) eqv Any, q{anonymous sub doesn't overshare};`
`314`	`314`	`}`
`315`	`315`
`316`	`316`	`# vim: ft=perl6`