From: Steve Hancock <perltidy@users.sourceforge.net>
Date: Wed, 29 Dec 2021 15:07:00 +0000 (-0800)
Subject: add several convergence tests
X-Git-Tag: 20211029.05~15
X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=8947f85e3746812bbae21c573903780e7320dcef;p=perltidy.git

add several convergence tests
---

diff --git a/dev-bin/run_convergence_tests.pl.data b/dev-bin/run_convergence_tests.pl.data
index ba9b08c0..535ce4d3 100644
--- a/dev-bin/run_convergence_tests.pl.data
+++ b/dev-bin/run_convergence_tests.pl.data
@@ -5513,6 +5513,25 @@ is(
 --vertical-tightness=1
 --weld-nested-containers
 
+==> b1132.in <==
+   my @temp
+         =unexpand (
+       map { sprintf "%-32s%s", @$_ } @_ ) ;
+
+   my @temp = unexpand(
+      map {
+         sprintf "%-32s%s",
+           @$_
+      } @_
+   );
+
+
+==> b1132.par <==
+--indent-columns=3
+--line-up-parentheses
+--maximum-line-length=44
+--norecombine
+
 ==> b1134.in <==
 {
        ok do{
@@ -8452,6 +8471,36 @@ function(
 --maximum-line-length=30
 --variable-maximum-line-length
 
+==> b1272.in <==
+ $this->{Normals} =
+   (
+     PDL->zeroes(
+                  3, (
+                    map { $_ - 1 }
+                      @{ $this->{XYDims} }
+                  ),
+                  @{ $this->{OverDims} }
+     )->double
+ )->dummy( 3, $this->{XYDims}[1] );
+
+ $this->{Normals} = (
+           PDL->zeroes(
+                        3, (
+                         map { $_ - 1 }
+                           @{ $this->{XYDims} }
+                        ),
+                        @{ $this->{OverDims} }
+           )->double
+ )->dummy( 3, $this->{XYDims}[1] );
+
+
+==> b1272.par <==
+--break-before-paren=2
+--extended-line-up-parentheses
+--indent-columns=1
+--maximum-line-length=47
+--opening-paren-right
+
 ==> b1280.in <==
 # S1
     for my $method qw(GetBook Wishlist AddBook RemoveBook