From: gpercival Date: Thu, 19 Jun 2003 20:16:33 +0000 (+0000) Subject: *** empty log message *** X-Git-Tag: release/1.7.25~107 X-Git-Url: https://git.donarmstrong.com/?a=commitdiff_plain;h=a7cdf6c27f0f5e47036d0e47b873804de96ee8a4;p=lilypond.git *** empty log message *** --- diff --git a/input/regression/beam-damp.ly b/input/regression/beam-damp.ly new file mode 100644 index 0000000000..8b9be4e509 --- /dev/null +++ b/input/regression/beam-damp.ly @@ -0,0 +1,25 @@ +\version "1.7.18" +\header { texidoc = "@cindex Beam Damp +Beams are less steep than the notes they encompass. " } + +\score{ + \notes\relative c''{ +% \stemUp +% a16-[ b b c] +% c-[ b b a] +% \stemDown +% c-[ b b a] +% a-[ b b c] + \stemUp + g16-[ a b c] + c-[ b a g] + \stemDown + d'-[ c b a] + a-[ b c d] + } + \paper{ + raggedright = ##t + } +} + +%% new-chords-done %% diff --git a/input/regression/beam-knee-symmetry.ly b/input/regression/beam-knee-symmetry.ly new file mode 100644 index 0000000000..c82f968af0 --- /dev/null +++ b/input/regression/beam-knee-symmetry.ly @@ -0,0 +1,17 @@ +\version "1.7.18" +\header { + + texidoc = "Point-symmetric beams should receive the same + quanting. There is no up/down bias in the quanting code." + +} + +\score{ + \notes\relative c'{ + a8-[ b'' a,, b''] + b8-[ a,, b'' a,,] + } + \paper{ + raggedright = ##t + } +}%% new-chords-done %% diff --git a/input/regression/beam-second.ly b/input/regression/beam-second.ly index 99b9145b37..dd9bcf0033 100644 --- a/input/regression/beam-second.ly +++ b/input/regression/beam-second.ly @@ -1,8 +1,4 @@ \version "1.7.18" -% delete me? -%TODO: what's this for? manual beaming? (the two pairs of 16ths) -% showing \stemUp? -% all of those things are covered in refman and/or other files \header{ texidoc=" Seconds are tricky. We used to have problems with seconds being too diff --git a/input/regression/grace-end.ly b/input/regression/grace-end.ly new file mode 100644 index 0000000000..b0909aefcc --- /dev/null +++ b/input/regression/grace-end.ly @@ -0,0 +1,21 @@ +\version "1.7.18" +\header { + + texidoc="@cindex Grace End + Grace notes after the last note do not confuse the timing code." + + +} + +\score { + \context Voice \notes\relative c { + + c4 \grace { d16-[ d16] } + + } + \paper { + raggedright = ##t + } + \midi { } +} +%% new-chords-done %% diff --git a/input/regression/lyric-extender.ly b/input/regression/lyric-extender.ly new file mode 100644 index 0000000000..050af628d0 --- /dev/null +++ b/input/regression/lyric-extender.ly @@ -0,0 +1,11 @@ +\version "1.7.18" +\header { texidoc= "Tests lyric extenders. "} +\score{ + < + \context Staff \notes { c (c-) (c-) c } + \context Lyrics \lyrics { bla __ alb xxx __ yyy } + > +} + + +%% new-chords-done %% diff --git a/input/regression/lyric-hyphen.ly b/input/regression/lyric-hyphen.ly new file mode 100644 index 0000000000..e42af8ac58 --- /dev/null +++ b/input/regression/lyric-hyphen.ly @@ -0,0 +1,14 @@ +\version "1.7.18" +\header {texidoc="Tests lyric hyphens. "} +\score{ + < + \context Staff \notes { c' (c'-) (c'-) c' } + \context Lyrics \context LyricsVoice \lyrics { bla -- alb xxx -- yyy } + > +} + + + + + +%% new-chords-done %% diff --git a/input/regression/multi-measure-rest-instr-name.ly b/input/regression/multi-measure-rest-instr-name.ly new file mode 100644 index 0000000000..32041c6d60 --- /dev/null +++ b/input/regression/multi-measure-rest-instr-name.ly @@ -0,0 +1,20 @@ +\version "1.7.18" +\header { texidoc = "This combines instrument names and multimeasure rests (there was an +interesting bug in 1.3.98). " } + +\score{ + \context Staff < + \property Staff.instrument = "instrument" + \property Staff.instr = "instr" + \notes{c''1 \break R1 } + > + \paper { + \translator { \StaffContext + \consists Instrument_name_engraver + + } + } + \paper { raggedright = ##t } + } + +%% new-chords-done %% diff --git a/input/test/beam-damp.ly b/input/test/beam-damp.ly deleted file mode 100644 index 4e363f04b3..0000000000 --- a/input/test/beam-damp.ly +++ /dev/null @@ -1,31 +0,0 @@ -\header { -% this example doesn't look very useful. Perhaps remove it in -% the future, although it _does_ demonstrate a neat feature of -% lilypond. Maybe regression? -texidoc = "@cindex Beam Damp -Beams are less steep than the notes they encompass. -DELETE or REGRESSION -" } - -\version "1.7.18" -\score{ - \notes\relative c''{ -% \stemUp -% a16-[ b b c] -% c-[ b b a] -% \stemDown -% c-[ b b a] -% a-[ b b c] - \stemUp - g16-[ a b c] - c-[ b a g] - \stemDown - d'-[ c b a] - a-[ b c d] - } - \paper{ - raggedright = ##t - } -} - -%% new-chords-done %% diff --git a/input/test/beam-stem-test.ly b/input/test/beam-stem-test.ly deleted file mode 100644 index 9d1b3e71dc..0000000000 --- a/input/test/beam-stem-test.ly +++ /dev/null @@ -1,19 +0,0 @@ -\version "1.7.18" -% I'm not certain this is useful. Candidate for -% future remove-ing. -\header { - texidoc="@cindex Beam Stem Test -Beam-stem attachment test. Helper file for ps/dvips problems. -REGRESSION or DELETE. " } - -\score { - \context RhythmicStaff \notes { - \stemUp c8-[ c] - \stemDown c8-[ c] - \stemUp c8.-[ c16] - } - \paper { - raggedright = ##t - magnification = 64 - } -}%% new-chords-done %% diff --git a/input/test/beamed-slur-endings.ly b/input/test/beamed-slur-endings.ly deleted file mode 100644 index 2625277f60..0000000000 --- a/input/test/beamed-slur-endings.ly +++ /dev/null @@ -1,30 +0,0 @@ -\version "1.7.18" -% this looks like an example of slurs, not beaming. And it -% looks like regression. -% possible rename to slur-something. -\header { texidoc = "REGRESSION or DELETE " } -\score{ - \notes \relative c''{ - \slurUp c8-(-( c-)-( c4-)-) - \slurDown a8-(-(a-)a4-) - \break - - \slurDown a8-(-(a-)-(a4-)-) - \slurUp c8-(-( c-)c4-) - \break - - \slurDown e8-(-(e-)-( e4-)-) - \slurUp f,8-(-( f-) f4-) - \break - - \slurUp e8-(-(e-)-( e4-)-) - \slurDown f'8-(-(f-)f4-) - \break - - } - \paper{ - indent = 0.0 - linewidth = 60.0\mm - } -} -%% new-chords-done %% diff --git a/input/test/diverse-spacing.ly b/input/test/diverse-spacing.ly deleted file mode 100644 index d8b3effb92..0000000000 --- a/input/test/diverse-spacing.ly +++ /dev/null @@ -1,17 +0,0 @@ -\version "1.7.18" -% I think this one could be removed or regression'd. -\header{texidoc="REGRESSION or DELETE " } -% a few 32nds shouldn't stretch spacing enormously. -\score { -\notes { \time 3/4 -\relative c'{ - g'8. c16 es8. d16 c8. bes32 as g8. c,16 - es4 r8 es | - d-[ es f g as c ] - b4 g r -} - -} -\paper { raggedright = ##t} -} -%% new-chords-done %% diff --git a/input/test/duration-check.ly b/input/test/duration-check.ly deleted file mode 100644 index 6aeb4fb3d5..0000000000 --- a/input/test/duration-check.ly +++ /dev/null @@ -1,56 +0,0 @@ -\version "1.7.18" -% candidate for remove or regression. -\header { - texidoc = "Check whether all @code{duration} properties can -be printed. This once helped track down an obscure memory corruption -bug. MOVE TO REGRESSION? (probably not DELETE) " - -} - - - -#(define (duration-check music) - "Check all rest durations in MUSIC" - - (let* ((name (ly:music-name music)) - (elts (ly:get-mus-property music 'elements)) - (e (ly:get-mus-property music 'element)) - (duration (ly:get-mus-property music 'duration))) - - (if (not (equal? '() duration)) - (begin - (write "duration: " (current-error-port)) - (write duration (current-error-port)) - (newline (current-error-port))) - - (if (equal? name "Rest_req") - (begin - (write "URG" (current-error-port)) - (write name (current-error-port)) - (write music (current-error-port)) - (newline (current-error-port)) - ;;(scm-error 'system-error #f "urg" #f #f))) - (error "boo") - ))) - - (if (pair? elts) - (map duration-check elts)) - - (if (ly:music? e) - (duration-check e))) - - music) - -\score { - \apply #duration-check - < - \notes\relative c'' { - a b8 c16 <>4. - } - \notes\relative c'' { - a b8 c16 d a2 r - } - > -\paper{raggedright = ##t} -} -%% new-chords-done %% diff --git a/input/test/grace-end.ly b/input/test/grace-end.ly deleted file mode 100644 index b0909aefcc..0000000000 --- a/input/test/grace-end.ly +++ /dev/null @@ -1,21 +0,0 @@ -\version "1.7.18" -\header { - - texidoc="@cindex Grace End - Grace notes after the last note do not confuse the timing code." - - -} - -\score { - \context Voice \notes\relative c { - - c4 \grace { d16-[ d16] } - - } - \paper { - raggedright = ##t - } - \midi { } -} -%% new-chords-done %% diff --git a/input/test/instrument-name-mmrest.ly b/input/test/instrument-name-mmrest.ly deleted file mode 100644 index 253881d5dd..0000000000 --- a/input/test/instrument-name-mmrest.ly +++ /dev/null @@ -1,27 +0,0 @@ -\version "1.7.18" -% candidate for regression. -gp -\header { texidoc = "REGRESSION or DELETE " } -%{ - -this combines instrument names and multimeasure rests (there was an -interesting bug in 1.3.98) - -%} - - -\score{ - \context Staff < - \property Staff.instrument = "instrument" - \property Staff.instr = "instr" - \notes{c''1 \break R1 } - > - \paper { - \translator { \StaffContext - \consists Instrument_name_engraver - - } - } - \paper { raggedright = ##t } - } - -%% new-chords-done %% diff --git a/input/test/knee-sym.ly b/input/test/knee-sym.ly deleted file mode 100644 index c82f968af0..0000000000 --- a/input/test/knee-sym.ly +++ /dev/null @@ -1,17 +0,0 @@ -\version "1.7.18" -\header { - - texidoc = "Point-symmetric beams should receive the same - quanting. There is no up/down bias in the quanting code." - -} - -\score{ - \notes\relative c'{ - a8-[ b'' a,, b''] - b8-[ a,, b'' a,,] - } - \paper{ - raggedright = ##t - } -}%% new-chords-done %% diff --git a/input/test/knee.ly b/input/test/knee.ly deleted file mode 100644 index 871b94d04f..0000000000 --- a/input/test/knee.ly +++ /dev/null @@ -1,12 +0,0 @@ -\version "1.7.18" -% candidate for regression? -gp -\header { texidoc = "REGRESSION or DELETE "} -\score{ - \notes\relative c'{ - \property Voice.Beam \override #'auto-knee-gap = ##f - c16-[ \stemDown c'' \stemBoth c,, d] - \stemDown d''-[ a \stemBoth c,, g,] - \stemUp g-[ c' \stemBoth a'' d'] - } -} -%% new-chords-done %% diff --git a/input/test/ly2dvi-testpage.ly b/input/test/ly2dvi-testpage.ly index 4d05bc4889..c6e793f47a 100644 --- a/input/test/ly2dvi-testpage.ly +++ b/input/test/ly2dvi-testpage.ly @@ -1,5 +1,6 @@ \version "1.7.18" -% candidate for regression. -gp +% MERGE with title.ly -gp + %{ Test ly2dvi features. %} diff --git a/input/test/lyric-extender.ly b/input/test/lyric-extender.ly deleted file mode 100644 index 976017ffb6..0000000000 --- a/input/test/lyric-extender.ly +++ /dev/null @@ -1,12 +0,0 @@ -\version "1.7.18" -% regression -gp -\header { texidoc= "DELETE or REGRESSION. "} -\score{ - < - \context Staff \notes { c (c-) (c-) c } - \context Lyrics \lyrics { bla __ alb xxx __ yyy } - > -} - - -%% new-chords-done %% diff --git a/input/test/lyric-hyphen.ly b/input/test/lyric-hyphen.ly deleted file mode 100644 index 22da2bcc9e..0000000000 --- a/input/test/lyric-hyphen.ly +++ /dev/null @@ -1,15 +0,0 @@ -\version "1.7.18" -% regression -gp -\header {texidoc="DELETE or REGRESSION. "} -\score{ - < - \context Staff \notes { c' (c'-) (c'-) c' } - \context Lyrics \context LyricsVoice \lyrics { bla -- alb xxx -- yyy } - > -} - - - - - -%% new-chords-done %% diff --git a/input/test/lyrics.ly b/input/test/lyrics.ly deleted file mode 100644 index 68fdf575e3..0000000000 --- a/input/test/lyrics.ly +++ /dev/null @@ -1,68 +0,0 @@ -\version "1.7.18" -% looks like another lyric test. regression. -gp -\header { texidoc="DELETE or REGRESSION. "} -somewhatLong = \lyrics{ - \property Lyrics . LyricText \set #'font-style = #'roman - AaaaaaA2 - BbbbbbB2 - CcccccC2 - DdddddD2 - EeeeeeE2 - FfffffF2 -} - -ratherLong = \lyrics{ - \property Lyrics . LyricText \set #'font-style = #'roman - LLLLoooonggggg2 - Syyllllaaabbble2 - LLLLoooonggggg2 - Syyllllllaaabbble2 - LLLLoooonggggg2 - Syyyylllaaabbble2 -} - -quiteLong = \lyrics{ - \property Lyrics . LyricText \set #'font-style = #'roman - LLLLLLLLLooooongggggggg2 - Syyyyyyyyyyyyylllllllaaaaaabbble2 - LLLLLLLLLooooongggggggg2 - Syyyyyyyyyyyyylllllllaaaaaabbble2 - LLLLLLLLLooooongggggggg2 - Syyyyyyyyyyyyylllllllaaaaaabbble2 -} - -somewhatLongLyricsStaff = \context Lyrics = somewhat < - \somewhatLong -> - -ratherLongLyricsStaff = \context Lyrics = rather < - \ratherLong -> - -quiteLongLyricsStaff = \context Lyrics = quite < - \quiteLong -> - -melody = \notes -\transpose c c{ - c4 e4 g4 e4 c4 e4 g4 e4 c4 e4 g4 e4 c4 e4 g4 e4 - c4 e4 g4 e4 c4 e4 g4 e4 c4 e4 g4 e4 c4 e4 g4 e4 -} - -melodicStaff = \context Staff = mel < - \melody -> - -\score -{ - < - \melodicStaff - \somewhatLongLyricsStaff -% \ratherLongLyricsStaff - \quiteLongLyricsStaff - > - \paper{ - - } -} -%% new-chords-done %%