From 26b0f8bb6153418977192d4ea19afd2e9e6f52dd Mon Sep 17 00:00:00 2001 From: hanwen Date: Tue, 20 Jan 2004 11:49:51 +0000 Subject: [PATCH] (get_default_dir): new algorithm for tuplet direction. --- ChangeLog | 3 +++ lily/tuplet-bracket.cc | 15 +++++++-------- 2 files changed, 10 insertions(+), 8 deletions(-) diff --git a/ChangeLog b/ChangeLog index 643b316d6f..f1af5ba501 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,5 +1,8 @@ 2004-01-20 Han-Wen Nienhuys + * lily/tuplet-bracket.cc (get_default_dir): new algorithm for + tuplet direction. + * mf/parmesan-heads.mf (overdone_heads): enlarge harmonic head. 2004-01-19 Han-Wen Nienhuys diff --git a/lily/tuplet-bracket.cc b/lily/tuplet-bracket.cc index 18e21a57df..bfd22d886e 100644 --- a/lily/tuplet-bracket.cc +++ b/lily/tuplet-bracket.cc @@ -495,22 +495,21 @@ Tuplet_bracket::after_line_breaking (SCM smob) /* - similar to slur. + similar to beam ? */ Direction Tuplet_bracket::get_default_dir (Grob*me) { - Direction d = UP; + Drul_array dirs(0,0); for (SCM s = me->get_grob_property ("note-columns"); gh_pair_p (s); s = ly_cdr (s)) { Grob * nc = unsmob_grob (ly_car (s)); - if (Note_column::dir (nc) < 0) - { - d = DOWN; - break; - } + + + dirs[Note_column::dir (nc)]++; } - return d; + + return dirs[UP] >= dirs[DOWN] ? UP : DOWN; } void -- 2.39.5