From 63c66d0382201a505d78ac6fc2764f989a5455df Mon Sep 17 00:00:00 2001
From: Steve Hancock <perltidy@users.sourceforge.net>
Date: Thu, 6 Aug 2020 08:06:40 -0700
Subject: [PATCH] update comments

---
 lib/Perl/Tidy/VerticalAligner.pm | 7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/lib/Perl/Tidy/VerticalAligner.pm b/lib/Perl/Tidy/VerticalAligner.pm
index 0bf075ed..be07a290 100644
--- a/lib/Perl/Tidy/VerticalAligner.pm
+++ b/lib/Perl/Tidy/VerticalAligner.pm
@@ -2203,9 +2203,16 @@ EOM
 
 {    # closure for decode_alignment_token
 
+    # This routine is called repeatedly for each token, so it needs to be
+    # efficient.  We can speed things up by remembering the inputs and outputs
+    # in a hash.
     my %decoded_token;
 
     sub initialize_decode {
+
+        # We will re-initialize the hash for each file. Otherwise, there is
+        # a danger that the hash can become arbitrarily large if a very large
+        # number of files is processed at once.
         %decoded_token = ();
         return;
     }
-- 
2.39.5