]> git.donarmstrong.com Git - lilypond.git/commitdiff
patch::: 1.5.7.jcn1
authorJan Nieuwenhuizen <janneke@gnu.org>
Fri, 17 Aug 2001 07:57:58 +0000 (09:57 +0200)
committerJan Nieuwenhuizen <janneke@gnu.org>
Fri, 17 Aug 2001 07:57:58 +0000 (09:57 +0200)
43 files changed:
Documentation/user/invoking.itexi
VERSION
input/bugs/+.ly [new file with mode: 0644]
input/bugs/1st-note-spacing.ly [new file with mode: 0644]
input/bugs/accents.ly [new file with mode: 0644]
input/bugs/accid.ly [new file with mode: 0644]
input/bugs/accidental-collision.ly [new file with mode: 0644]
input/bugs/ancient-font.ly [new file with mode: 0644]
input/bugs/auto-beam.ly [new file with mode: 0644]
input/bugs/barline.ly [new file with mode: 0644]
input/bugs/beaming.ly [new file with mode: 0644]
input/bugs/braces.ly [new file with mode: 0644]
input/bugs/broken-tuplet.ly [new file with mode: 0644]
input/bugs/context-weirdness.ly [new file with mode: 0644]
input/bugs/crescendo-short.ly [new file with mode: 0644]
input/bugs/different-time.ly [new file with mode: 0644]
input/bugs/dots.ly [new file with mode: 0644]
input/bugs/drarn.ly [new file with mode: 0644]
input/bugs/dynamic-switch.ly [new file with mode: 0644]
input/bugs/grace+section.ly [new file with mode: 0644]
input/bugs/grace-finger.ly [new file with mode: 0644]
input/bugs/lyrics-bar.ly [new file with mode: 0644]
input/bugs/lyrics-spacing.ly [new file with mode: 0644]
input/bugs/markup-definition.ly [new file with mode: 0644]
input/bugs/mmrest-collide.ly [new file with mode: 0644]
input/bugs/partial-beam.ly [new file with mode: 0644]
input/bugs/prefatory-spacing.ly [new file with mode: 0644]
input/bugs/repeat.ly [new file with mode: 0644]
input/bugs/rest-melisma.ly [new file with mode: 0644]
input/bugs/slur-attachment.ly [new file with mode: 0644]
input/bugs/slur-dx.ly [new file with mode: 0644]
input/bugs/slur-steep-broken.ly [new file with mode: 0644]
input/bugs/spacing-clefs.ly [new file with mode: 0644]
input/bugs/staff-size.ly [new file with mode: 0644]
input/bugs/standchen-space.ly [new file with mode: 0644]
input/bugs/steep-beam.ly [new file with mode: 0644]
input/bugs/steep.ly [new file with mode: 0644]
input/bugs/text-kerning.ly [new file with mode: 0644]
input/bugs/ties.ly [new file with mode: 0644]
input/bugs/time.ly [new file with mode: 0644]
input/bugs/triplets.ly [new file with mode: 0644]
make/lysdoc-vars.make
scm/grob-description.scm

index 08392660562399ab85c95df28de6042a526ef08b..025e7e2c882d8959256c3ff48340547945e2c80f 100644 (file)
@@ -25,7 +25,7 @@ sequentially.
 
 @item -f,--format=@var{format}
 Output format for sheet music. Choices are @code{tex} (for @TeX{}
-output), @code{pdftex} for PDF@TeX input, @code{ps} (for PostScript), @code{scm} (for a Scheme
+output), @code{pdftex} for PDF@TeX{} input, @code{ps} (for PostScript), @code{scm} (for a Scheme
 dump), and @code{as} (for ASCII-art).
 
 @c TODO: TFMFONTS
diff --git a/VERSION b/VERSION
index 7a3efe2e82a2cdf3a22bf3c0daee84069754bec5..9df8ca014d05e64d7af1aab3029ab6d28f18ac9d 100644 (file)
--- a/VERSION
+++ b/VERSION
@@ -2,7 +2,7 @@ PACKAGE_NAME=LilyPond
 MAJOR_VERSION=1
 MINOR_VERSION=5
 PATCH_LEVEL=7
-MY_PATCH_LEVEL=
+MY_PATCH_LEVEL=jcn1
 
 # use the above to send patches: MY_PATCH_LEVEL is always empty for a
 # released version.
diff --git a/input/bugs/+.ly b/input/bugs/+.ly
new file mode 100644 (file)
index 0000000..a7b9a9c
--- /dev/null
@@ -0,0 +1,20 @@
+\header{
+texidoc = "
+@section Introduction
+
+This document presents brief overview of all simple bugs known to
+exist in LilyPond.  Things that don't look like bugs, have hopefully
+been fixed.  Note that this page only shows notational bugs, input
+that does not result in any notation (ie, crashes lilypond) should go
+in @file{input/no-notation/}.
+
+"
+
+foollilypondbook = "
+\score
+"
+}
+
+\score {
+  \context Lyrics \lyrics { "." }
+}
diff --git a/input/bugs/1st-note-spacing.ly b/input/bugs/1st-note-spacing.ly
new file mode 100644 (file)
index 0000000..56803b1
--- /dev/null
@@ -0,0 +1,12 @@
+\header {
+texidoc="apparently added in 1.5.2 -- what about it?"
+}
+\version "1.3.148"
+
+\score {\notes \relative c'' <
+\context Staff = SA { \times 6/7 { [c8 c c c c c c] }  }
+\context Staff = SB { \times 6/6 { [c c c c c c] }  }
+>
+
+\paper { linewidth = -1. }
+} 
diff --git a/input/bugs/accents.ly b/input/bugs/accents.ly
new file mode 100644 (file)
index 0000000..6d26098
--- /dev/null
@@ -0,0 +1,13 @@
+\version "1.3.148"
+\score {
+  \context Staff \notes\relative c''<
+    \context Voice=one {
+      \voiceOne
+      e2->
+    }
+    \context Voice=two {
+      \voiceTwo
+      f,2->
+    }
+  >
+}
\ No newline at end of file
diff --git a/input/bugs/accid.ly b/input/bugs/accid.ly
new file mode 100644 (file)
index 0000000..c04b3dd
--- /dev/null
@@ -0,0 +1,11 @@
+\header {
+texidoc="The sharp is printed too far to the left."
+}
+
+\version "1.4.0"
+\score {
+\notes \context Staff <
+  \context Voice = up {\stemUp gis''4}
+  \context Voice = dwn {\stemDown <ces' d'>}
+>
+}
diff --git a/input/bugs/accidental-collision.ly b/input/bugs/accidental-collision.ly
new file mode 100644 (file)
index 0000000..3844066
--- /dev/null
@@ -0,0 +1,16 @@
+\header {
+texidoc="The two sharps overstrike, the flat and sharp overstrike"
+}
+\version "1.3.148"
+
+\include "paper16.ly"
+\score {
+  \notes {
+    \relative c'' \context Voice \sequential {
+     <dis1 ais e> <bes dis>
+   }
+  }
+  \paper{
+      linewidth = 5.0\cm
+  }
+}
diff --git a/input/bugs/ancient-font.ly b/input/bugs/ancient-font.ly
new file mode 100644 (file)
index 0000000..6aef817
--- /dev/null
@@ -0,0 +1,132 @@
+\version "1.3.148"
+\header {
+texidoc="setting staff symbol properties the normal way is broken"
+    title      = "ancient font test"
+    date       = "2000"
+}
+
+
+
+\include "paper26.ly"
+
+global =  \notes {
+    \property Score.timing = ##f
+%   \property Staff.TimeSignature \override #'style = #'old
+}
+
+upperVoice =  \context Staff = upperVoice <
+    \global
+    \property Staff.StaffSymbol \override #'line-count = #4
+    \notes \transpose c' {
+       \property Voice.NoteHead \override #'style = #'mensural
+       \property Voice.Stem \override #'stem-centered = ##t
+       \property Staff.Custos \override #'style = #'vaticana
+       \clef "vaticana_fa2"
+       c2 d e f g
+
+%      \property Staff.clefGlyph = #"clefs-vaticana_do"
+%      \property Staff.clefPosition = #1
+%      \property Staff.clefOctavation = #0 
+       \clef "vaticana_do2"
+
+       a b c'
+       b a g f
+       \clef "vaticana_fa1"
+       e d c1 \bar "|"
+
+       \property Staff.Custos \override #'style = #'medicaea
+       \clef "medicaea_fa2"
+       c2 d e f g
+       \clef "medicaea_do2"
+       a b c'
+       b a g f
+       \clef "medicaea_fa1"
+       e d c1 \bar "|"
+
+       \property Staff.Custos \override #'style = #'hufnagel
+       \clef "hufnagel_fa2"
+       c2 d e f g
+       \clef "hufnagel_do2"
+       a b c'
+       b a g f
+       \clef "hufnagel_fa1"
+       e d c1 \bar "||"
+    }
+>
+
+lowerVoice =  \context Staff = lowerNotes <
+    \global
+    \property Staff.StaffSymbol \override #'line-count = #5
+    \notes \transpose c' {
+        \property Voice.NoteHead \override #'style = #'mensural
+       \property Voice.Stem \override #'stem-centered = ##t
+       \property Staff.Custos \override #'style = #'mensural
+       \clef "mensural1_c2"
+       c2 d e f g
+        \property Staff.forceClef = ##t
+       \clef "mensural1_c2"
+       a b c'
+       b a g f
+       \clef "mensural2_c2"
+       e d c1 \bar "|"
+
+       \clef "mensural2_c2"
+       c2 d e f g
+        \property Staff.forceClef = ##t
+       \clef "mensural3_c2"
+       a b c'
+       b a g f
+       \clef "mensural3_c2"
+       e d c1 \bar "|"
+
+       \clef "mensural1_f"
+       c2 d e f g
+        \property Staff.forceClef = ##t
+       \clef "mensural1_f"
+       a b c'
+       b a g f
+       \clef "mensural2_f"
+       e d c1 \bar "|"
+
+        \property Staff.forceClef = ##t
+       \clef "mensural2_f"
+       c2 d e f g
+       \clef "mensural_g"
+       a' b' c''
+       b' a' g' f'
+        \property Staff.forceClef = ##t
+       \clef "mensural_g"
+       e' d' c'1 \bar "|"
+
+        \property Staff.forceClef = ##t
+       \clef "mensural_g"
+       c'2 d' e' f' g'
+       \clef "hufnagel_do_fa"
+       a b c'
+       b a g f
+        \property Staff.forceClef = ##t
+       \clef "hufnagel_do_fa"
+       e d c1 \bar "||"
+    }
+>
+
+\score {
+    \context ChoirStaff <
+       \upperVoice
+       \lowerVoice
+    >
+    \paper {
+%      \paperTwentysix
+       linewidth = 17.25\cm
+       textheight = 26.0\cm
+       indent = 0.0
+       \translator {
+           \StaffContext
+           \consists Custos_engraver
+%          Custos \override #'style = #'mensural
+           \remove Time_signature_engraver
+%          StaffSymbol \override #'line-count = #4
+       }
+    }
+}
+
diff --git a/input/bugs/auto-beam.ly b/input/bugs/auto-beam.ly
new file mode 100644 (file)
index 0000000..3a7687c
--- /dev/null
@@ -0,0 +1,18 @@
+\version "1.3.148"
+
+\header {
+texidoc="The Automatic beamer does not put @strong{unfinished} beams
+on the last notes of a score."
+}
+
+\score {
+  <
+    \context Staff=a\notes\relative c'' {
+      a8 a8 a2. a8 a8
+    }
+    \notes\relative c'' {
+      a8 a a a a2
+      a8 a a a
+    }
+  >
+}
diff --git a/input/bugs/barline.ly b/input/bugs/barline.ly
new file mode 100644 (file)
index 0000000..73fb363
--- /dev/null
@@ -0,0 +1,27 @@
+\version "1.3.148"
+
+\header {
+texidoc = "Staves that end half way a system should end at the bar line."
+}
+
+melody = \notes \relative c' {
+       \partial 8
+       g8 |
+       \bar "|."\clef bass
+}
+
+
+
+accompaniment = \chords  \sequential {
+       r8
+       r2 r2
+}
+
+\score {
+       \simultaneous {
+         \context ChordNames \accompaniment
+            \context Staff {
+               \melody }
+       }
+       \paper { }
+}
diff --git a/input/bugs/beaming.ly b/input/bugs/beaming.ly
new file mode 100644 (file)
index 0000000..54d1d38
--- /dev/null
@@ -0,0 +1,9 @@
+\header {
+texidoc="Automatic beamer behaves differently in different measuere locations."
+}
+\version "1.3.148"
+
+\score { \notes {
+
+       [\times 2/3 {c16 c c} c8]
+       [\times 2/3 {c16 c c} c8]}}
diff --git a/input/bugs/braces.ly b/input/bugs/braces.ly
new file mode 100644 (file)
index 0000000..94ee08d
--- /dev/null
@@ -0,0 +1,83 @@
+\version "1.3.148"
+
+
+\header {
+texidoc = "Braces at different sizes don't attach exactly to the staffs.
+Previously, some braces were too small, while others were too big; this was
+apparently caused by dvips + mf rounding.  Now, braces are just a bit
+too big."
+}
+
+\include "paper11.ly"
+\paper { linewidth = -1.0 }
+
+\score {
+  \context GrandStaff <
+    \context Staff = a \notes c''1
+    \context Staff = b \notes c''1
+  >
+}
+
+
+\include "paper13.ly"
+\paper { linewidth = -1.0 }
+
+\score {
+  \context GrandStaff <
+    \context Staff = a \notes c''1
+    \context Staff = b \notes c''1
+  >
+  \paper {
+    \translator {
+      \GrandStaffContext
+      SystemStartDelimiter \override #'weird = #-5
+    }
+  }
+}
+
+
+\include "paper16.ly"
+\paper { linewidth = -1.0 }
+
+\score {
+  \context GrandStaff <
+    \context Staff = a \notes c''1
+    \context Staff = b \notes c''1
+  >
+  \paper {
+    \translator {
+      \GrandStaffContext
+      SystemStartDelimiter \override #'weird = #5
+    }
+  }
+}
+
+
+\include "paper20.ly"
+\paper { linewidth = -1.0 }
+
+\score {
+  \context GrandStaff <
+    \context Staff = a \notes c''1
+    \context Staff = b \notes c''1
+  >
+  \paper {
+    \translator {
+      \GrandStaffContext
+      SystemStartDelimiter \override #'weird = #-7
+    }
+  }
+}
+
+
+\include "paper26.ly"
+\paper { linewidth = -1.0 }
+
+\score {
+  \context GrandStaff <
+    \context Staff = a \notes c''1
+    \context Staff = b \notes c''1
+    \context Staff = c \notes c''1
+    \context Staff = d \notes c''1
+  >
+}
diff --git a/input/bugs/broken-tuplet.ly b/input/bugs/broken-tuplet.ly
new file mode 100644 (file)
index 0000000..5008c4a
--- /dev/null
@@ -0,0 +1,18 @@
+\version "1.3.148"
+
+\header {
+
+texidoc = "tuplet bracket doesn't behave properly at line break. Not a real problem."
+}
+
+\score{
+       \notes\relative c''< 
+       {       % broken cresc dumps core
+               c2 c4*2/3 \times 2/3 { c( c c }
+               c4 c c c
+       } >
+       \paper{
+       indent = 0.
+               linewidth=30.\mm
+       }
+}
diff --git a/input/bugs/context-weirdness.ly b/input/bugs/context-weirdness.ly
new file mode 100644 (file)
index 0000000..b7f4a6e
--- /dev/null
@@ -0,0 +1,52 @@
+\header {
+texidoc = "context level weirdness.  after some commands, explicit
+ \context Voice commands must be inserted; otherwise subsequent property
+ settings fail silently"
+}
+
+% from les-nereides.ly
+
+ #(define (make-text-checker text)
+  (lambda (elt) (equal? text (ly-get-grob-property elt 'text))))
+
+\score {
+  \context PianoStaff <
+    \context Staff=upper \notes\relative c' {
+        \property Score.timing = ##f
+
+        \outputproperty #(make-text-checker "foe") #'extra-offset = #'(-2 . 4)
+        c-"foe"
+       
+       \translator Staff=lower
+
+       % staff switch moves us
+       % implicitely to staff level: text-checker won't see "foe"
+        \outputproperty #(make-text-checker "foe") #'extra-offset = #'(-2 . 4)
+        c-"foe"
+
+       % get back to Voice level: it works again
+       \context Voice
+       \outputproperty #(make-text-checker "foe") #'extra-offset = #'(-2 . 4)
+        c-"foe"
+
+       \clef treble
+       
+       % clef change moves us
+       % implicitely to staff level: text-checker won't see "foe"
+        \outputproperty #(make-text-checker "foe") #'extra-offset = #'(-2 . 4)
+        c-"foe"
+
+       % get back to Voice level: it works again
+       \context Voice
+       \outputproperty #(make-text-checker "foe") #'extra-offset = #'(-2 . 4)
+        c-"foe"
+       
+    }
+    \context Staff=lower \notes\relative c' {
+      s
+    }
+  >
+  \paper {
+    linewidth = -1.0
+  }
+}
\ No newline at end of file
diff --git a/input/bugs/crescendo-short.ly b/input/bugs/crescendo-short.ly
new file mode 100644 (file)
index 0000000..f7a7cf5
--- /dev/null
@@ -0,0 +1,20 @@
+\include "paper23.ly"
+
+\score {
+   \notes \relative c'' {
+       \clef "treble"
+       \time 4/4
+       \partial 4
+       \property Voice.Slur \override
+               #'attachment-offset = #'((-0.5 . 0.75) . (0 . 0.75))
+       \property Voice.DynamicText \override #'padding = #-2
+       \property Voice.DynamicLineSpanner \override #'padding = #2
+       [e,8-"."-\pp-\cr-\upbow ( )f-"."-\rc] |
+       ges4-\decr ( ) f8-\rced r8 r2 \bar "||"
+       
+
+   }
+   \paper {
+   linewidth=9.0\cm
+   }
+}
diff --git a/input/bugs/different-time.ly b/input/bugs/different-time.ly
new file mode 100644 (file)
index 0000000..2db2460
--- /dev/null
@@ -0,0 +1,33 @@
+\version "1.3.148"
+
+\header {
+texidoc = " Spacing for one staff in polymetric music should
+be not hampered by a staff in another time signature."
+}
+
+\score{
+    \context PianoStaff <
+        \context Staff = upper \notes\relative c''{
+           \property Staff.timeSignatureFraction = #'(3 . 4)
+           c4 c c
+           c2.
+                   
+        }
+        \context Staff = lower \notes\relative c' {
+           \property Staff.timeSignatureFraction = #'(4 . 4)
+           c4 c c c
+           c1
+        }
+    > 
+    \paper{
+       linewidth=-1.0
+       \translator {
+           \ScoreContext
+           \remove Timing_engraver
+       }
+       \translator {
+           \StaffContext
+           \consists Timing_engraver
+       }
+    }
+}
diff --git a/input/bugs/dots.ly b/input/bugs/dots.ly
new file mode 100644 (file)
index 0000000..b279b4c
--- /dev/null
@@ -0,0 +1,11 @@
+\version "1.3.148"
+
+\header {
+ texidoc = "Dots should remain close to the heads they belong to, but should not overlap."
+}
+
+
+\score {
+  \notes
+   \context Voice { <f,4. c'' d e f> }
+}
diff --git a/input/bugs/drarn.ly b/input/bugs/drarn.ly
new file mode 100644 (file)
index 0000000..5e0b385
--- /dev/null
@@ -0,0 +1,24 @@
+\version "1.3.148"
+%% oops, weird small ties
+
+\score {
+  \context Staff \notes <
+    \time 3/8
+    \context Voice=one \relative c'' {
+      \property Voice.Stem \set #'direction = #1
+      \property Voice.Tie \set #'direction = #1
+      \property Voice.Slur \set #'direction = #1
+      \property Voice.Slur \set #'attachment = #'(head . head)
+      c8 c()c  
+    }
+    \context Voice=two \relative c'' {
+      \property Voice.Stem \set #'direction = #-1
+      \property Voice.Tie \set #'direction = #-1
+      \property Voice.Slur \set #'direction = #-1
+      \property Voice.Slur \set #'attachment = #'(head . head)
+      a8()a~a  
+    }
+  >
+  \paper { linewidth = -1. } 
+%  \paper { linewidth = 40*\staffspace } 
+}
diff --git a/input/bugs/dynamic-switch.ly b/input/bugs/dynamic-switch.ly
new file mode 100644 (file)
index 0000000..1445400
--- /dev/null
@@ -0,0 +1,30 @@
+\header{
+% what's the problem?
+% well, that's elementary my dear watson
+texidoc="The decrescendo disappears when the part combiner decides that
+the a2 and c2 should be a chord in one voice.  Using the commented
+version, with a c2 instead of a2, the decrescendo reappears."
+}
+\version "1.3.148"
+
+\score{
+       \context Staff <
+               \context Voice=one \skip 1
+               \context Voice=two \skip 1
+               \context Voice=one \partcombine Voice
+                       \context Thread=one \notes\relative c'' {
+                               c2 \clef bass c2
+                               c2 c2
+                       }
+                       \context Thread=two \notes\relative c'' {
+                               b2 \< a4 () \! a
+                               %c2 \> a4 () \! a
+                               a2 \> a4 () \! a
+                       }
+       >
+       \paper{
+               linewidth=140.\mm
+       }
+}
+
+
diff --git a/input/bugs/grace+section.ly b/input/bugs/grace+section.ly
new file mode 100644 (file)
index 0000000..c87c8be
--- /dev/null
@@ -0,0 +1,10 @@
+\header{
+texidoc = "@section Grace notes"
+foollilypondbook = "
+\score
+"
+}
+
+\score {
+  \context Lyrics \lyrics { "." }
+}
diff --git a/input/bugs/grace-finger.ly b/input/bugs/grace-finger.ly
new file mode 100644 (file)
index 0000000..9fffe3a
--- /dev/null
@@ -0,0 +1,10 @@
+\version "1.3.148"
+
+
+ % ?
+\score {
+\notes \context Voice = VA \relative c'' {
+       \grace {[b8^1 c^2]} d4^3
+}
+\paper {linewidth = -1. }}
diff --git a/input/bugs/lyrics-bar.ly b/input/bugs/lyrics-bar.ly
new file mode 100644 (file)
index 0000000..97239ab
--- /dev/null
@@ -0,0 +1,47 @@
+\version "1.3.148"
+
+%
+%
+
+\header{
+texidoc = "
+Adding a @code{Bar_engraver} to the LyricsVoice context makes sure that
+lyrics don't collide with barlines.
+
+Lyrics with barline colliding is fine now, BUT
+There's an horizontal gap between staff and end bar .
+"
+}
+
+\score {
+       \context StaffGroup <
+       \notes \context Staff {
+               b1 \bar "|:" b1 \bar ":|"
+       }
+       \lyrics\context Lyrics <
+               \context LyricsVoiceWithBars {
+%                      thisContextHasBarEngraver1  added
+                       ThisContextCertainlyHasBarEngraverAddedButThereHasBeenSomethingFunnyBefore1.  Here.
+               }
+               \context LyricsVoice {
+                       this4 one has no BarEngraverAddedToContext1
+               }
+       >
+       \notes \context Staff = SB { b1 b1 }
+       >
+       \paper {
+               linewidth = -1.0\cm
+               \translator {
+                       \LyricsContext
+                       \accepts "LyricsVoiceWithBars"
+               }
+               \translator {
+                       \LyricsVoiceContext
+                       \consists "Bar_engraver"
+                       \name "LyricsVoiceWithBars"
+               }
+               \translator {
+                       \LyricsVoiceContext
+               }
+       }
+}
diff --git a/input/bugs/lyrics-spacing.ly b/input/bugs/lyrics-spacing.ly
new file mode 100644 (file)
index 0000000..623016d
--- /dev/null
@@ -0,0 +1,27 @@
+\include "norsk.ly"
+
+\header {
+texidoc ="``baz'' should be centered on the a (tenor voice), but it is
+not."
+}
+
+\version "1.3.148"
+
+sop = \notes \transpose c''  {e2 e fis1 }
+alt = \notes \relative c' {cis2 e e d }
+ten = \notes \relative c' {a2 a a1 }
+txt = \lyrics {foo2 bar baz jazz }
+
+\score {
+    <
+       \context Staff = up \notes <
+           \context Voice=sopv {\stemUp \sop}
+           \context Voice=altv {\stemDown \alt}
+       >
+       \context Staff = down \notes < \clef "F"
+           \context Voice=tenv {\stemUp \ten}
+       >
+       \context Lyrics = la { \txt }
+    >
+    \paper { linewidth = -1 }
+}
diff --git a/input/bugs/markup-definition.ly b/input/bugs/markup-definition.ly
new file mode 100644 (file)
index 0000000..6703aed
--- /dev/null
@@ -0,0 +1,26 @@
+\version "1.3.148"
+\header {
+
+texidoc="
+The definition of markup is incomplete.
+
+Ideally, either the input is valid, and all information therein is
+used, or it is invalid, and an error message is produced."
+
+}
+
+
+\score { \notes \relative c' {
+    f_#'(lines "one" ( "tow"))
+
+    % FIXED:three ignored
+    f_#'(lines "one" ( "two" "three" ))        
+
+    % right way of using multiple markups
+    f_#'(lines "one" ((bold italic) "towo"))
+    
+    % italic ignored.
+    % possibly explicit relaxed code for chords stuff, must check
+    f_#'(lines "one" (bold italic "towo"))
+    
+  }}
diff --git a/input/bugs/mmrest-collide.ly b/input/bugs/mmrest-collide.ly
new file mode 100644 (file)
index 0000000..d78913c
--- /dev/null
@@ -0,0 +1,18 @@
+\version "1.3.148"
+\header {
+texidoc="multi-measure-rests (bar 2) should `collide' (ie, not clash)
+ with notes, just as normal rests (bar 1)."
+}
+
+\score {
+  \notes\context Staff <
+     \context Voice=one \relative c''{
+       d d d d
+       d d d d
+     } 
+     \context Voice=two {
+       r1
+       R
+     } 
+  >
+}
\ No newline at end of file
diff --git a/input/bugs/partial-beam.ly b/input/bugs/partial-beam.ly
new file mode 100644 (file)
index 0000000..44898ea
--- /dev/null
@@ -0,0 +1,28 @@
+\version "1.3.148"
+%docme -- geen id, lijkt ok?
+
+\include "paper20.ly"
+Sopnotes = \notes {
+       \time 4/4
+       \key g \major
+       \clef treble
+       \partial 8 * 3
+       e'8 f'8 g'8 |
+       d'8 d'16 d'16 e'8. e'16 g'8 g'8 f'8 f'8
+}
+
+\score {
+       \notes
+       <
+               \context Staff="sop"
+               <
+                   \Sopnotes
+               >
+       >
+       \paper {
+                \translator {
+                 \StaffContext 
+                        autoBeamSettings \override #'(end * * * * ) = #(make-moment 1 8)
+               }
+       }
+}
diff --git a/input/bugs/prefatory-spacing.ly b/input/bugs/prefatory-spacing.ly
new file mode 100644 (file)
index 0000000..06e718b
--- /dev/null
@@ -0,0 +1,15 @@
+\version "1.3.148"
+
+\header { texidoc= "Spacing after clef/key should be stretched
+equidistantly for large stretching, but should stay clear of prefatory
+matter for small stretching. Support in the spacing engine for
+separate spring constants for stretching/shrinking is needed" 
+}
+
+foo = \notes\relative c''   {   \key as \major f }
+
+\score {
+
+  < \foo 
+  >
+}
diff --git a/input/bugs/repeat.ly b/input/bugs/repeat.ly
new file mode 100644 (file)
index 0000000..6be2e60
--- /dev/null
@@ -0,0 +1,6 @@
+\version "1.3.148"
+\header{
+texidoc=" should start with |:"
+}
+
+\score { \context Staff \notes \repeat volta 3 c1 \alternative { d1 e1 }} 
diff --git a/input/bugs/rest-melisma.ly b/input/bugs/rest-melisma.ly
new file mode 100644 (file)
index 0000000..b8ef6e7
--- /dev/null
@@ -0,0 +1,20 @@
+\version "1.3.148"
+\header {
+texidoc = "slur or long note on other staves fool lily into extending melisma"
+}
+\score {
+  <
+    \addlyrics
+      \notes {
+       \property Staff.automaticMelismata= ##t
+       c4 () c r c
+      }
+      \context Lyrics \lyrics { foo __ bar }
+    \context Staff=foolMelismata \notes{
+      c4 ( c c ) c
+    }  
+    \context Staff=foolMelismata \notes{
+      c1
+    }  
+  >  
+}
\ No newline at end of file
diff --git a/input/bugs/slur-attachment.ly b/input/bugs/slur-attachment.ly
new file mode 100644 (file)
index 0000000..2353bba
--- /dev/null
@@ -0,0 +1,21 @@
+\version "1.3.148"
+
+\header{
+texidoc = "
+Slurs should be attached to note heads, except when they would collide
+with beams.  Also see: ophee-slurs.
+"
+}
+\score{
+       \notes \relative c''{
+               \property Voice.Slur \set #'direction = #1
+               a8( a )a4
+               a4( a8 )a
+               a8 a()a4
+               a4() a8 a
+       }
+       \paper{ 
+               indent = 0.0
+               linewidth = 100.\mm
+       }
+}
diff --git a/input/bugs/slur-dx.ly b/input/bugs/slur-dx.ly
new file mode 100644 (file)
index 0000000..146202f
--- /dev/null
@@ -0,0 +1,19 @@
+\version "1.3.148"
+
+\header{
+texidoc = "
+ Wouldbe-steep-starting slurs look ugly.
+" }
+
+\score {
+  \notes \relative c'' {
+    \property Voice.Stem \set #'direction = #1
+    \property Voice.Slur \set #'direction = #1
+    d,32( d'4 )d8..
+    \property Voice.Slur \set #'attachment = #'(stem . stem)
+    d,32( d'4 )d8..
+  }
+  \paper {
+    linewidth = -1.
+  }
+} 
diff --git a/input/bugs/slur-steep-broken.ly b/input/bugs/slur-steep-broken.ly
new file mode 100644 (file)
index 0000000..20320aa
--- /dev/null
@@ -0,0 +1,14 @@
+\version "1.3.148"
+
+\score{
+  \notes\relative c''{
+    \time 2/4
+    [f8 e d f, (] | \break
+    [) a'8. gis16 fis8. cis16] |
+  }
+  \paper{
+    linewidth = 3.0\cm
+    indent = .0
+  }
+}
+
diff --git a/input/bugs/spacing-clefs.ly b/input/bugs/spacing-clefs.ly
new file mode 100644 (file)
index 0000000..67c31e7
--- /dev/null
@@ -0,0 +1,21 @@
+
+\header {
+texidoc = "If possible clef changes and the like 
+should be folded under notes of the different staff
+"
+}
+\score { \notes \relative c'' < \context Staff = SA {
+c4 c16 c c c  cis4 cis4
+c4 c4 c4 c
+
+
+ }
+   { \key d \major c2
+     \clef bass
+     c,2 c cis2  } >
+
+   \paper { linewidth = -1. } 
+ }
+
+
diff --git a/input/bugs/staff-size.ly b/input/bugs/staff-size.ly
new file mode 100644 (file)
index 0000000..e87807b
--- /dev/null
@@ -0,0 +1,23 @@
+\version "1.3.148"
+\header{
+texidoc="separate staff-size is clumsy with \override.
+Also, it doesn't seem to work anymore."
+}
+
+\score {
+  \notes \relative c' < \context Voice {
+       \property Staff.staffSpace = #10
+       \property Staff.fontSize = #-1
+       \property Voice.fontSize = #-1
+       
+       \property Voice . dynamicDirection = \up \stemDown
+%\key gis \major
+       c8 d [e f g a] b c \ff
+  }
+
+\context Staff = VB {  \property Voice . dynamicDirection = \down c,,4 \ff c c c  }
+
+>
+\paper { linewidth = -1. }
+}
+
diff --git a/input/bugs/standchen-space.ly b/input/bugs/standchen-space.ly
new file mode 100644 (file)
index 0000000..275b055
--- /dev/null
@@ -0,0 +1,12 @@
+\version "1.3.148"
+\header{
+texidoc="what about this.    -> regression?"
+}
+\score {
+\notes \relative c' <
+\context Staff = SA  { c4. c8 \times 2/3 { [c8 c c] } }
+\context Staff = SB  { c8 c c c c c }
+>
+
+\paper { linewidth = -1. }
+}
diff --git a/input/bugs/steep-beam.ly b/input/bugs/steep-beam.ly
new file mode 100644 (file)
index 0000000..f07d339
--- /dev/null
@@ -0,0 +1,7 @@
+\version "1.3.148"
+
+\header {
+texidoc = "1st beam should prob. be horizontal."
+}
+
+\score { \notes <{  [ r8 g''16 des'] [r8 c16 a] }>}
diff --git a/input/bugs/steep.ly b/input/bugs/steep.ly
new file mode 100644 (file)
index 0000000..a52379c
--- /dev/null
@@ -0,0 +1,17 @@
+\version "1.3.148"
+\header{
+texidoc="Ugly slur"
+}
+
+
+\score{
+       \notes\relative c''{
+               a'( a a [a8...] b,32\break
+               c4 \clef bass c,,, c )c
+       }
+       \paper{
+               indent=0.0\mm
+               linewidth=40.0\mm
+       }
+}
+
diff --git a/input/bugs/text-kerning.ly b/input/bugs/text-kerning.ly
new file mode 100644 (file)
index 0000000..4f67222
--- /dev/null
@@ -0,0 +1,16 @@
+\version "1.3.148"
+
+
+\header {
+texidoc = "LilyPond doesn't kern text, but TeX does, leading to skewed results: the VAVAVAVA takes less space than LilyPond thinks it does." } 
+
+\score {
+ \notes \relative c'' < \context Voice {
+%       c16 c16 c16 c16 c4
+        c4 c4 c4
+ }
+\context Lyrics  \lyrics {   foobar4 -- VAVAVAVAV4 -- foobar4 } >
+
+       
+ \paper { linewidth = -10.0\cm }
+}
diff --git a/input/bugs/ties.ly b/input/bugs/ties.ly
new file mode 100644 (file)
index 0000000..cbd12e9
--- /dev/null
@@ -0,0 +1,22 @@
+\version "1.3.148"
+
+\header {
+  texidoc="Positioning of last ties is incorrect ties between 2-1 and 1-1
+  durations differ."
+}
+
+\score {
+  \context Staff <
+    \context Voice = a \notes\relative c'' {
+      \voiceOne
+      r2 a2 a1~a
+    }
+    \context Voice = y \notes\relative c' {
+      \voiceTwo
+      r2 a2~a1~a
+    }
+  >
+  \paper {
+    linewidth = 100 * \staffspace
+  }
+}
diff --git a/input/bugs/time.ly b/input/bugs/time.ly
new file mode 100644 (file)
index 0000000..3ffea81
--- /dev/null
@@ -0,0 +1,11 @@
+\version "1.3.148"
+\header {
+texidoc="Should use old style."
+}
+
+\score {
+  \notes { 
+    \property Staff.TimeSignature \override #'style = #'oldC4/4
+    s1 
+  }
+}
diff --git a/input/bugs/triplets.ly b/input/bugs/triplets.ly
new file mode 100644 (file)
index 0000000..0d0e629
--- /dev/null
@@ -0,0 +1,32 @@
+\version "1.3.148"
+
+\header {
+texidoc = "Simple beams.  This broke somewhere < 1.3.110
+"
+  title = "Gammes Chromatiques"
+  composer = ""
+  filename = "gammes_chromatiques.ly"
+}
+
+%{
+           - At bar 3 of 2nd score, stems are too big (or the beams are
+          badly positionned)
+%}
+
+exI = \notes \relative c' {
+  \repeat "volta" 2 {
+    \times 2/3 {c8( cis d} \times 2/3 {dis e f} 
+    \times 2/3 {fis g gis} \times 2/3 {a bes b} |
+    \property Voice.TupletBracket \override #'tuplet-number-visibility = ##f
+    \property Voice.TupletBracket \override #'tuplet-bracket-visibility = ##f
+    \times 2/3 {c8 cis d} \times 2/3 {dis e f} 
+    \times 2/3 {fis g gis} \times 2/3 {a bes b} |
+    \times 2/3 {c b bes} \times 2/3 {a aes g}
+    \times 2/3 {fis f e} \times 2/3 {ees d des} |
+    \times 2/3 {c b bes} \times 2/3 {a aes g}
+    \times 2/3 {fis f e} \times 2/3 {ees d )des}
+  }
+  c1 || \break
+}
+
+\score { \context Staff { \notes { \exI } } }
index b3143833f97a442a1cb0bd44783c808ab8b91e92..765b796074b435058183aa474bed6708b959860a 100644 (file)
@@ -1,4 +1,7 @@
 TITLE=LYs Doc
 LY_FILES = $(wildcard *.ly)
+
+EXTRA_DIST_FILES += $(LY_FILES)
+
 NAME=$(notdir $(pwd))
 
index c24f36972381fc566585ecc88ab09e6d33b21165..dc0fbd7a07376d092adad860f9620478da6a05d0 100644 (file)
                 ))
              
        (SpacingSpanner . (
-               (spacing-procedure . ,Spacing_spanner::set_springs)
+               (spacing-procedure . ,New_spacing_spanner::set_springs)
                (stem-spacing-correction . 0.5)
                (grace-space-factor . 0.8)