lilypond-1.3.145

diff --git a/input/bugs/dynamic-collide.ly b/input/bugs/dynamic-collide.ly
index e9aee2cefc989e24f44010397197b7bed5879d69..e69de29bb2d1d6434b8b29ae775ad8c2e48c5391 100644 (file)
--- a/input/bugs/dynamic-collide.ly
+++ b/input/bugs/dynamic-collide.ly
@@ -1,157 +0,0 @@
-
-% dynamics should not collide with staff
-% dynamics (of two voices) should not collide with eachother
-% strange stem through beam bug in bar 8 on viola staff
-% 1-staff-high brace should collapse
-
-\header {
-texidoc="Template for part-combining orchestral scores";
-}
-
-
-End = { \skip 1*8; }
-
-violaI = \notes\relative c'' {
-  c1 \break c c c c\break
-       g4\p\< r r r8 g(|
-       )c,4 r r r8 c|
-       [\!f8\sf(\>as f as][f g d)\!g]|
-               r [es'\p(c)es] r [d(bes)d]|
-
-
-}
-violaII = \notes\relative c'' {
-  c1 c c c c
-       g4\p\< r r r8 g(|
-       )c,4 r r r8 c|
-       [\!f8\sf(\>as f as][f g d)\!g]|
-       r [c\p(g)c] r [bes(g)bes]|
-}
-
-
-violoncello = \notes\relative c {
-  c4\< c c c 
-  \!c1\pp c c c
-       \property Voice.crescendoText = #"cresc."
-       \property Voice.crescendoSpanner = #'dashed-line
-  [g8\p\<(bes' g bes][d bes g)d~]|
-  [d8(a' fis a][d a fis)d]|
-  [\!f!8\sf\>(as f as][f g d)g]|
-  %75
-  \!c,4\p r d r|
-}
-
-contrabasso = \notes\relative c {
-  d8\< d d d  d d d d 
-  \!c1\ff c c c
-       \property Voice.crescendoText = #"cresc."
-       \property Voice.crescendoSpanner = #'dashed-line
-  g4\p\< r r r8 g(|
-  )c4 r r r8 c(|
-  \!)b1\sf|
-  c4\p r d r|
-}
-
-violeStaff =  \notes \context Staff = viole <
- \context Voice=oneViole <
-               \property Staff.instrument = #"Viola"
-               \property Staff.instr = #"Vla."
-
- \End
- >
- \context Voice=twoViole <
-               \property Staff.instrument = #"Viola II"
-               \property Staff.instr = #"Vla. II"
- \End
- >
-  \context Voice=oneViole \partcombine Voice
-    \context Thread=oneViole \violaI
-    \context Thread=twoViole \violaII
->
-
-staffCombinePianoStaffProperties = {
-       \property PianoStaff.devNullThread = #'()
-       \property PianoStaff.soloADue = ##t
-       \property PianoStaff.soloText = #""
-       \property PianoStaff.soloIIText = #""
-       % This is non-conventional, but currently it is
-       % the only way to tell the difference.
-       \property PianoStaff.aDueText = #"\\`a2"
-       \property PianoStaff.splitInterval = #'(1 . 0)
-       \property PianoStaff.changeMoment = #`(,(make-moment 1 1) . ,(make-moment 1 1))
-}
-
-
-\score {
-  <
-  \context StaffGroup <
-  \violeStaff
-
-  \context PianoStaff = bassi_group \notes <
-    \staffCombinePianoStaffProperties
-    \context Staff=oneBassi < \clef bass;
-               \property Staff.instrument = #'(lines
-                 "Violoncello" "    e" "Contrabasso")
-
-               \property Staff.instr = #"Vc."
-               \End >
-    \context Staff=twoBassi < \clef bass;
-               \property Staff.instrument = #"Contrabasso"
-               \property Staff.instr = #"Cb."
-
-    \End >
-  
-    \context Staff=oneBassi \partcombine Staff
-      \context Voice=oneBassi { \violoncello }
-      \context Voice=twoBassi { \contrabasso }
- >
->
- >
-  \paper {
-    % \paperSixteen
-    linewidth = 80 * \staffspace;
-    textheight = 200 * \staffspace;
-    \translator{
-      \ThreadContext
-      \consists "Rest_engraver";
-      
-      % Set value for engraver at thread level,
-      % to override the default that is set in ScoreContext
-      % for added engraver at Voice level
-      devNullThread = #'()
-    }
-    \translator{
-      \VoiceContext
-      \remove "Rest_engraver";    
-
-      % The staff combine (bassi part) needs a
-      % thread_devnull_engraver here.
-      % Instead of maintaining two separate hierarchies,
-      % we switch add it, but switch it off immideately.
-      % The staff combine parts switch it on.
-      % devNullThread = #'never
-      \consists "Thread_devnull_engraver";
-    }
-    \translator{
-      \HaraKiriStaffContext
-      \consists "Mark_engraver";
-    }
-    \translator {
-      \OrchestralScoreContext
-      skipBars = ##t
-      soloText = #"I."
-      soloIIText = #"II."
-      % By default, turn off the Thread_devnull_engraver
-      % at Voice level
-      devNullThread = #'never
-
-      % Hmm
-      currentBarNumber = #218
-      BarNumber \override #'padding = #3
-      RestCollision \override #'maximum-rest-count = #1
-      marginScriptHorizontalAlignment = #1
-      TimeSignature \override #'style = #'C
-    }
-  }
-}
-

diff --git a/input/bugs/dynamic-switch.ly b/input/bugs/dynamic-switch.ly
index 1365e5ea99475a2da07c12453ca912b7dac303e4..c392f4d4cb126438bd65ffab5d94ead3c0ce1730 100644 (file)
--- a/input/bugs/dynamic-switch.ly
+++ b/input/bugs/dynamic-switch.ly
@@ -1,4 +1,5 @@
 
+% what's the problem?
 \score{
        \context Staff <
                \context Voice=one \skip 1;

diff --git a/input/bugs/minimal.ly b/input/bugs/minimal.ly
index 489cbd14e875adc2b0c195f2d86239740e6a2ca1..e69de29bb2d1d6434b8b29ae775ad8c2e48c5391 100644 (file)
--- a/input/bugs/minimal.ly
+++ b/input/bugs/minimal.ly
@@ -1,12 +0,0 @@
-% minimal what?
-% dumps core
-
-
-\score {
-  \sequential {\clef bass ; }
-  \paper {
-%    \translator { \context Score_engraver ; \name "Score";  }
-    \translator { \type "Score_engraver"; \name "Score";  }
-       linewidth = 30 * \staffspace;
-  } 
-}

diff --git a/input/bugs/multiply.ly b/input/bugs/multiply.ly
index 85c02dc5c816451f71ce4e6f9de11c3296492581..6d611c48827ad1349b9dc06564f1c1291f53ab22 100644 (file)
--- a/input/bugs/multiply.ly
+++ b/input/bugs/multiply.ly
@@ -1,8 +1,14 @@
+
+
+
 % ugh: strange order of things, this:
 %    a16 * 1/2 (
 % must be 
 %    a16 ( * 1/2
 
+%{
+?? is this a bug? --hwn
+%}
 
 \score { 
   \context Voice \notes\relative c {

diff --git a/input/bugs/pc-direction.ly b/input/bugs/pc-direction.ly
index b6e9b2ec4a70485aaf3c129e9721588fb77b088e..aa1327175d409cd756c5e1568591756b955d7d81 100644 (file)
--- a/input/bugs/pc-direction.ly
+++ b/input/bugs/pc-direction.ly
@@ -1,6 +1,9 @@
 
 % move to regtest once it works?
 
+
+% still not workign ? --hwn.
+
 \header {
 texidoc="
 On their own staff, staffcombined voices should be stemboth (not up/down);

diff --git a/input/bugs/repeat.ly b/input/bugs/repeat.ly
index dde3c8e74aae37736963232bce18b5c1b30851e4..9a9835f806c8c6e272e26762300b79953a676827 100644 (file)
--- a/input/bugs/repeat.ly
+++ b/input/bugs/repeat.ly
@@ -1,3 +1,3 @@
 
-
+% should start with |:
 \score { \context Staff \notes \repeat volta 3 c1 \alternative { d1 e1 }} 

diff --git a/input/bugs/sbug.ly b/input/bugs/sbug.ly
new file mode 100644 (file)
index 0000000..fae779b
--- /dev/null
+++ b/input/bugs/sbug.ly
@@ -0,0 +1,8 @@
+%  the \stopped collides with the
+%beam.
+
+
+% stopped disappeared ?? 
+\score { \notes {
+\clef "G"; \stemUp [a''8^\stopped a''8_\stopped]
+}}

diff --git a/input/bugs/script-dir.ly b/input/bugs/script-dir.ly
index d8d35df3887f9f7f2cde62c8ef0a4d679fbb9c99..e69de29bb2d1d6434b8b29ae775ad8c2e48c5391 100644 (file)
--- a/input/bugs/script-dir.ly
+++ b/input/bugs/script-dir.ly
@@ -1,5 +0,0 @@
-\score {
-  \context Voice \notes\relative c'' {
-    a-. c-.
-  }
-}

diff --git a/input/bugs/script.ly b/input/bugs/script.ly
index 1f60ff08ffa5d953235c821179f6da60e8ca470d..8b137891791fe96927ad78e64b0aad7bded08bdc 100644 (file)
--- a/input/bugs/script.ly
+++ b/input/bugs/script.ly
@@ -1,9 +1 @@
 
-
-%  the \stopped collides with the
-%beam.
-
-
-\score { \notes {
-\clef "G"; \stemUp [a''8^\stopped a''8^\stopped]
-}}

diff --git a/scm/grob-description.scm b/scm/grob-description.scm
index e2bfae830534ac89a530f4991f0bfe26b9b2402e..ea40dd0cf78df9a5af9f514b2daf545f86ddf3c5 100644 (file)
--- a/scm/grob-description.scm
+++ b/scm/grob-description.scm
@@ -613,12 +613,12 @@
                (meta . ,(grob-description "SustainPedal" sustain-pedal-interface side-position-interface font-interface))
        ))
 
-       ; should split in 3
+       ;; TODO: should split in 3
        (SystemStartDelimiter . (
                (molecule-callback . ,System_start_delimiter::brew_molecule)
                (after-line-breaking-callback . ,System_start_delimiter::after_line_breaking)
-               ;; ugh, in practice, brace has height of 4.1 staff-spaces
-               (brace-collapse-height . 4.1)
+               ;; really 4.0, but 5 to be on safe side.
+               (brace-collapse-height . 5.0)
                (bracket-collapse-height . 1)
                (thickness . 1.6)
                (arch-height . 1.5)
@@ -680,6 +680,7 @@
                (break-align-symbol . Time_signature)
                (visibility-lambda . ,all-visible)
                (breakable . #t)
+               (style . C)
                 (font-family . number)
                 (meta . ,(grob-description "TimeSignature" time-signature-interface  font-interface))
        ))