From 173901d59517358cb284633fcfdd216bca05a790 Mon Sep 17 00:00:00 2001
From: David Kastrup <dak@gnu.org>
Date: Fri, 3 Oct 2014 14:01:29 +0200
Subject: [PATCH] Issue 3066: tie in TabStaff (using q) displays one of the
 unisone notes in a chord

This patch just tries to do a better job at matching potentially
corresponding notes when producing ties by not messing up match order as
badly when matching ties to noteheads.
---
 lily/tie-engraver.cc | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/lily/tie-engraver.cc b/lily/tie-engraver.cc
index fa1617612a..dfe41f21b0 100644
--- a/lily/tie-engraver.cc
+++ b/lily/tie-engraver.cc
@@ -151,7 +151,7 @@ Tie_engraver::acknowledge_note_head (Grob_info i)
   Grob *h = i.grob ();
 
   now_heads_.push_back (h);
-  for (vsize i = heads_to_tie_.size (); i--;)
+  for (vsize i = 0; i < heads_to_tie_.size (); i++)
     {
       Grob *th = heads_to_tie_[i].head_;
       Stream_event *right_ev = Stream_event::unsmob (h->get_property ("cause"));
@@ -203,13 +203,15 @@ Tie_engraver::acknowledge_note_head (Grob_info i)
                 heads_to_tie_[j].tie_from_chord_created = true;
             }
         }
+      else
+        i++;
     }
 
   if (ties_.size () && ! tie_column_)
     tie_column_ = make_spanner ("TieColumn", ties_[0]->self_scm ());
 
   if (tie_column_)
-    for (vsize i = ties_.size (); i--;)
+    for (vsize i = 0; i < ties_.size (); i++)
       Tie_column::add_tie (tie_column_, ties_[i]);
 }
 
-- 
2.39.5