Re: [pugs] array interpolation question

[Garrett Rooney]

Garrett Rooney wrote:
Assuming the spec is correct, here's a patch to add some more tests to 
t/op/string_interpolation.t.
Of course, those should have been todo_is tests...  Here's the right patch.
-garrett
Index: t/op/string_interpolation.t
===================================================================
--- t/op/string_interpolation.t (revision 574)
+++ t/op/string_interpolation.t (working copy)
@@ -11,7 +11,7 @@
 
 =cut
 
-plan 5;
+plan 7;
 
 my $world = "World";
 
@@ -23,4 +23,7 @@
 
 sub list_count ([EMAIL PROTECTED]) { [EMAIL PROTECTED] }
 my @a = (1,2,3);
-ok(list_count("@a") == 1, 'quoted interpolation gets string context');
+ok(list_count("@a[]") == 1, 'quoted interpolation gets string context');
+
+todo_is("@a", '@a', "array without empty square brackets doesn't interpolate");
+todo_is("@a[]", '1 2 3', 'array with empty square brackets interpolates');