update test cases for $# parsing fix

diff --git a/t/snippets/comments.in b/t/snippets/comments.in
index 6edda543f0bd05bcc20bba11401dc001c90a9422..7c0deb71a825100c5958e04fad6d57ecf167a064 100644 (file)
--- a/t/snippets/comments.in
+++ b/t/snippets/comments.in
@@ -13,7 +13,7 @@ sub macro_get_names { #
    local(%name)=();  ## a static side comment to test -ssc
 
  # a spaced block comment to test -isbc
-   for (0..$                                          #mac_ver) {
+   for (0..$#mac_ver) {
       # a very long comment for testing the parameter --nooutdent-long-comments (or -nolc)
       $name{$_} = $mac_ext[$idx{$mac_exti[$_]}];
       $vmsfile =~ s/;[\d\-]*$//; # very long side comment; Clip off version number; we can use a newer version as well

diff --git a/t/snippets17.t b/t/snippets17.t
index b6686e7c44bed56fbb258256621777921cc3bd27..f2fa32ce32a9004dad3beeda7c85e4d496a4dbf7 100644 (file)
--- a/t/snippets17.t
+++ b/t/snippets17.t
@@ -103,7 +103,7 @@ sub macro_get_names { #
    local(%name)=();  ## a static side comment to test -ssc
 
  # a spaced block comment to test -isbc
-   for (0..$                                          #mac_ver) {
+   for (0..$#mac_ver) {
       # a very long comment for testing the parameter --nooutdent-long-comments (or -nolc)
       $name{$_} = $mac_ext[$idx{$mac_exti[$_]}];
       $vmsfile =~ s/;[\d\-]*$//; # very long side comment; Clip off version number; we can use a newer version as well

diff --git a/t/snippets18.t b/t/snippets18.t
index d60f26c675d03223e29366715e7256215d36187c..cd9863881f7d4412a45cb4b78d8395c5d9397784 100644 (file)
--- a/t/snippets18.t
+++ b/t/snippets18.t
@@ -132,7 +132,7 @@ sub macro_get_names { #
    local(%name)=();  ## a static side comment to test -ssc
 
  # a spaced block comment to test -isbc
-   for (0..$                                          #mac_ver) {
+   for (0..$#mac_ver) {
       # a very long comment for testing the parameter --nooutdent-long-comments (or -nolc)
       $name{$_} = $mac_ext[$idx{$mac_exti[$_]}];
       $vmsfile =~ s/;[\d\-]*$//; # very long side comment; Clip off version number; we can use a newer version as well