From: Steve Hancock Date: Sun, 18 Oct 2020 01:16:16 +0000 (-0700) Subject: update test cases for $# parsing fix X-Git-Tag: 20201001.03~67 X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=7e3fa46ca3dccc361483b1ff8b3d24173660d6ed;p=perltidy.git update test cases for $# parsing fix --- diff --git a/t/snippets/comments.in b/t/snippets/comments.in index 6edda543..7c0deb71 100644 --- 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 b6686e7c..f2fa32ce 100644 --- 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 d60f26c6..cd986388 100644 --- 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