test documents.
* Documentation/user/converters.itely:
Documentation/user/invoking.itexi: Some small fixes for uniform
usage example.
* input/font20.ly, font-body.ly: New files, moved from input/test.
* input/test/different-time-signatures.ly: Add FIXME marker;
comment-out broken code.
* Documentation/regression-test.tely: Comment-out, add
obsolete-marker and url to regression-test-dir.
* input/test/GNUmakefile:
* input/regression/GNUmakefile: Add rule for lys-to-tely.py.
* input/regression/+.ly:
* input/test/+.ly: New file.
2002-07-21 Jan Nieuwenhuizen <janneke@gnu.org>
+ * Documentation/index.texi: Add pointers to new regression and
+ test documents.
+
+ * Documentation/user/converters.itely:
+ Documentation/user/invoking.itexi: Some small fixes for uniform
+ usage example.
+
+ * input/allfontsize.ly, size*.ly: New files, moved from
+ input/regression.
+
+ * input/font20.ly, font-body.ly: New files, moved from input/test.
+
+ * input/font*.ly: New files, moved from input/test.
+
+ * input/test/*.ly: Remove empty files, fix broken ones.
+
+ * input/test/different-time-signatures.ly: Add FIXME marker;
+ comment-out broken code.
+
+ * Documentation/regression-test.tely: Comment-out, add
+ obsolete-marker and url to regression-test-dir.
+
+ * input/test/GNUmakefile:
+ * input/regression/GNUmakefile: Add rule for lys-to-tely.py.
+
+ * input/regression/+.ly:
+ * input/test/+.ly: New file.
+
* input/test/cue-notes.ly: better example
* Documentation/user/refman.itely (Font selection): font size doco
@c Jan's site?
@itemize @bullet
-@item @uref{../out-www/regression-test.html,Regression Test}
-A large document that tests all kinds of features (also as
-@uref{../out-www/regression-test.ps.gz,Postscript}
-and
-@uref{../out-www/regression-test.pdf,PDF}).
+@item @uref{../../input/regression/out-www/regression.html,Regression Tests}
+A large document that tests all kinds of features.
+@c (also as
+@c @uref{../out-www/regression-test.ps.gz,Postscript}
+@c and
+@c @uref{../out-www/regression-test.pdf,PDF}).
+@item @uref{../../input/test/out-www/test.html,Feature Tests}
+A large document that tests all kinds of features.
@item @uref{../../input/bugs/out-www/bugs.html,Bugs}
-A document that shows bugs
+A document that shows bugs.
@c (also as
-\input texinfo @c -*-texinfo-*- vim:tw=72
+\input texinfo @c -*-texinfo-*-
+
@setfilename regression-test.info
@settitle LilyPond Regression test
+
@html
<!--- @@WEB-TITLE@@=Regression Test --->
@end html
@node Top, , , (dir)
+This file has moved.
+
+See @uref{../../input/regression/out-www/regression.html,Regression Tests}.
+
+@ignore
+
@section Introduction
This document presents a brief overview of LilyPond features. When the
@lilypondfile[printfilename]{molecule-hacking.ly}
+@end ignore
@bye
The program is invoked as follows:
@example
- convert-ly [@var{options}] @var{files}
+ convert-ly [@var{option}]@dots{} @var{file}@dots{}
@end example
Usage:
@example
- lilypond [@var{options}] @var{file}@dots{}
+ lilypond [@var{option}]@dots{} @var{file}@dots{}
@end example
#!@PYTHON@
+
+'''
+TODO:
+
+ * Add @nodes, plit at sections?
+ * Less kludged first introduction file
+ * include *.texi files for text at start of section?
+
+'''
+
+
import sys
import os
import string
SUBDIRS=bugs test regression tutorial no-notation ascii-art template mutopia
# nereides is tweaked a lot, can't do (read webpage)
-examples=trip star-spangled-banner paddy twinkle
+examples=trip star-spangled-banner paddy twinkle font20
+examples+=size11 size13 size16 size20 size23 size26
LOCALSTEPMAKE_TEMPLATES=ly mutopia
EXTRA_DIST_FILES=paddy.abc
--- /dev/null
+\version "1.5.68"
+
+
+
+
+\score { \notes
+ \relative c'' \context Staff {
+ \emptyText
+ \repeat volta 2 { \time 4/4 c4^"cuivr\\'e"_\fermata }
+ \alternative {
+ { \property Voice.TextScript \set #'font-style = #'italic d-4_"cantabile" }
+ { e } } \grace { c16 }
+ \property Voice.TextScript \set #'font-style = #'large
+ f4-\ff^""^"Largo" \mark "B" g
+ }
+ \paper { linewidth = -1.0
+ % \translator {\BarNumberingStaffContext} }
+ }
+}
+%% +.ly: Be the first .ly file for lys-to-tely.py.
+%% Better to make lys-to-tely.py include "introduction.texi" or
+%% other .texi documents too?
+
+
\header{
texidoc = "
@section Introduction
"
}
-\score {
- \context Lyrics \lyrics { "." }
+\score{
+\context Lyrics \lyrics { "." }
}
LOCALSTEPMAKE_TEMPLATES=lilypond ly lysdoc
EXTRA_DIST_FILES=README
-include $(depth)/make/stepmake.make
+include $(depth)/make/stepmake.make
+
+TITLE=LilyPond Assorted Possible Bugs
-TITLE=Assorted Possible Bugs
--- /dev/null
+\version "1.5.68"
+
+% body for the font test. Does not work standalone
+
+
+FontBody= \notes\transpose c''{
+ \bar "|:"
+ \time 4/4
+ \context Staff < \context Voice = VB { \stemUp e'\longa a\breve | }
+ \context Voice = VA { \stemDown
+ c1 \clef "bass" b,, \clef "violin" c' a'
+ c2 \clef "alto" g c' \clef "violin" a'
+ } >
+ \stemBoth
+ c4 g c' a' \bar ":|"
+ a\ppp-\upbow a\pp-\downbow a\p^\turn a\mp^\fermata |
+ a\mf_\fermata a\f-\stopped a\ff-\open a\fff^\trill|
+ a\fp-\reverseturn a4.\sf a4.\sfz | a4\fz % a\rf
+ [c8-\prall c-\mordent] [a'-\prallmordent a'-\prallprall]
+ [c8-\upprall a'8-\downprall] [a'-\segno c-\coda] |
+ [c \< d e f] [as' ges' f' e']
+ [cis' dis' c' des'] [cisis' disis' \! ceses' deses'] |
+ \clef "bass"
+ r\longa * 1/4 r\breve *1/2
+ r1 r2 r4 r8 r16 r32 r64 r128 r128 |
+ \context Staff < \context Voice = VA { \stemUp r2 c'2 c,,,1 }
+ \context Voice = VB {\stemDown r2 c2 r1 }>
+ \stemBoth
+ \clef "violin"
+ e8_. g'8-> e16^^ g'16_^
+ e32 _| g'32^| g''32-\ltoe g''32-\lheel
+ e64-\rtoe g'64-\rheel c4... |
+\context Voice = mensural \relative c'' {
+\property Voice . noteHeadStyle = #'mensural
+\property Voice. stemCentered = ##t
+c\maxima*1/8
+c\longa*1/4 c\breve*1/2 c1 c2 c4 c8
+}
+ \property Voice . noteHeadStyle = #'harmonic
+
+ \transpose c'{
+ \time 4/4
+ \property Voice . TextScript \override #'font-style = #'Finger
+ \property Voice . noteHeadStyle = #'diamond
+ c1^"1" d2^"2" e4^"3"
+ \property Voice . noteHeadStyle = #'cross
+ f4^"4"
+ g4^"5"
+ \property Voice . noteHeadStyle = ##f
+ % Music to the Martians!
+ < bes4^"6" e_"7" c_"8" >
+ a^"0"_"9"
+
+ a'^\flageolet
+ \property Voice . TextScript \override #'font-style = #'roman
+ \time 1/2 a2 |
+ \time 3/2 < a1.
+ { s4 \ppp \< s4 \! s4 \fff s4 \> s4 \! s4\ppp} >
+ |
+ \time 2/4 a2 |
+ \time 5/4 a1.. |
+ \time 6/8 a2. |
+ \time 7/8 a2.. |
+ \time 9/8 a1... |
+ \time 12/8 a1. |
+ \time 12/4
+ r1. r2. r4. r8. r16. r32. r64. r64. |
+ c2\sustainDown c\sustainUp |
+ }
+}
+
+\score {
+ \FontBody
+}
--- /dev/null
+\version "1.5.68"
+\header{
+title= "The Feta font"
+subtitle = "proofsheet"
+enteredby = "jcn"
+copyright = "public domain"
+description = "This file tests the Feta music-font in the 20pt version"
+TestedFeatures =
+ "(Feta definitively is not an abbreviation of Font-En-TjA)"
+}
+
+ \paper{
+ linewidth = 17.5 \cm
+ }
+
+\include "font-body.ly"
+
+
--- /dev/null
+%% +.ly: Be the first .ly file for lys-to-tely.py.
+%% Better to make lys-to-tely.py include "introduction.texi" or
+%% other .texi documents too?
+
+
+\header{
+texidoc = "
+@section Introduction
+
+This document presents a brief overview of LilyPond features. When the
+text correspond with the shown notation, we consider LilyPond Officially
+BugFree (tm). This document is intended for finding bugs, and
+documenting bugfixes.
+
+TODO: order of tests (file names!), test only one feature per test.
+Smaller and neater tests.
+
+
+"
+
+foollilypondbook = "
+\score
+"
+}
+
+\score{
+\context Lyrics \lyrics { "." }
+}
depth = ../..
-LOCALSTEPMAKE_TEMPLATES=ly mutopia
+STEPMAKE_TEMPLATES=documentation texinfo tex
+LOCALSTEPMAKE_TEMPLATES=lilypond ly lysdoc
+
include $(depth)/make/stepmake.make
+TITLE=LilyPond Regression Tests
+++ /dev/null
-\version "1.5.68"
-
-
-
-
-\score { \notes
- \relative c'' \context Staff {
- \emptyText
- \repeat volta 2 { \time 4/4 c4^"cuivr\\'e"_\fermata }
- \alternative {
- { \property Voice.TextScript \set #'font-style = #'italic d-4_"cantabile" }
- { e } } \grace { c16 }
- \property Voice.TextScript \set #'font-style = #'large
- f4-\ff^""^"Largo" \mark "B" g
- }
- \paper { linewidth = -1.0
- % \translator {\BarNumberingStaffContext} }
- }
-}
-\score { \notes
+\score {
+ \notes
\context Staff \notes <
- % the f and g on 4th beat are exceptionally ugh.
- \context Voice=i { \stemUp c4 d e f g2 g4 a | }
- \context Voice=ii { \stemDown g4 f e g g2 g2 }
->}
+ %% the f and g on 4th beat are exceptionally ugh.
+ \context Voice=i { \stemUp c4 d e f g2 g4 a | }
+ \context Voice=ii { \stemDown g4 f e g g2 g2 }
+ >
}
+
+++ /dev/null
-\version "1.5.68"
-
-\header{
-texidoc="
-Fonts are available in a default set of sizes: 11, 13, 16, 20, 23 and
-26pt staffheight. Sizes of the text fonts and symbol fonts are made
-to match the staff dimensions.
-"
-}
-
-\include "paper11.ly"
-\include "allfontstyle.ly"
+++ /dev/null
-\version "1.5.68"
-
-\include "paper13.ly"
-\include "allfontstyle.ly"
+++ /dev/null
-\version "1.5.68"
-
-\include "paper16.ly"
-\include "allfontstyle.ly"
+++ /dev/null
-\version "1.5.68"
-
-\include "paper20.ly"
-\include "allfontstyle.ly"
+++ /dev/null
-\version "1.5.68"
-
-\include "paper23.ly"
-\include "allfontstyle.ly"
+++ /dev/null
-\version "1.5.68"
-
-\include "paper26.ly"
-\include "allfontstyle.ly"
--- /dev/null
+\version "1.5.68"
+
+\header{
+texidoc="
+Fonts are available in a default set of sizes: 11, 13, 16, 20, 23 and
+26pt staffheight. Sizes of the text fonts and symbol fonts are made
+to match the staff dimensions.
+"
+}
+
+\include "paper11.ly"
+\include "allfontstyle.ly"
--- /dev/null
+\version "1.5.68"
+
+\include "paper13.ly"
+\include "allfontstyle.ly"
--- /dev/null
+\version "1.5.68"
+
+\include "paper16.ly"
+\include "allfontstyle.ly"
--- /dev/null
+\version "1.5.68"
+
+\include "paper20.ly"
+\include "allfontstyle.ly"
--- /dev/null
+\version "1.5.68"
+
+\include "paper23.ly"
+\include "allfontstyle.ly"
--- /dev/null
+\version "1.5.68"
+
+\include "paper26.ly"
+\include "allfontstyle.ly"
--- /dev/null
+%% +.ly: Be the first .ly file for lys-to-tely.py.
+%% Better to make lys-to-tely.py include "introduction.texi" or
+%% other .texi documents too?
+
+\header{
+texidoc = "
+@section Introduction
+
+This document tests all kinds of features, from simple to advanced,
+that are not really suited for the reference manual, and are not
+needed as a regression test.
+
+Here you may also find dirty tricks, or very the very latest features
+that have not been documented or fully implemented yet.
+
+"
+
+foollilypondbook = "
+\score
+"
+}
+
+\score{
+\context Lyrics \lyrics { "." }
+}
-# input/test/Makefile
depth = ../..
-examples= font20 ancient-font
-LOCALSTEPMAKE_TEMPLATES=ly mutopia
+
+STEPMAKE_TEMPLATES=documentation texinfo tex
+LOCALSTEPMAKE_TEMPLATES=lilypond ly lysdoc
+
+## Hmm, would this work? No -- if we really want examples, move
+## to other dir (input/) comes to mind.
+## examples = font20 ancient-font
+## LOCALSTEPMAKE_TEMPLATES += ly mutopia
EXTRA_DISTFILES=features.abc
include $(depth)/make/stepmake.make
+TITLE=LilyPond Feature Tests
#(define (make-script x)
(let ((m (ly-make-music "Articulation_req")))
- ;;(ly-set-mus-property m 'articulation-type 'staccato)
+ ;;(ly-set-mus-property! m 'articulation-type 'staccato)
;; urg
- (ly-set-mus-property m 'articulation-type x)
- (ly-set-mus-property m 'script x)
+ (ly-set-mus-property! m 'articulation-type x)
+ (ly-set-mus-property! m 'script x)
m))
#(define (add-script m x)
(if (equal? (ly-music-name m) "Request_chord")
- (ly-set-mus-property m 'elements
+ (ly-set-mus-property! m 'elements
(cons (make-script x)
(ly-get-mus-property m 'elements)))
\context ChordNames=es \notes\transpose es\tab
\context Staff=e \notes\transpose e\tab
\context ChordNames=e \notes\transpose e\tab
+%{ FIXME: remove some, gs barfs
\context Staff=fis \notes\transpose fis\tab
\context ChordNames=fis \notes\transpose fis\tab
\context Staff=g \notes\transpose g\tab
\context ChordNames=bes \notes\transpose bes,\tab
\context Staff=b \notes\transpose b,\tab
\context ChordNames=b \notes\transpose b,\tab
+%}
>
\paper{
textheight = \vsize - 4.0 * \staffheight
% barline spacing disrupts visual rhythm.
-#(define nbal (acons '("Staff_bar" "begin-of-note") '(minimum_space 0.0) default-break-align-space-alist))
+%%FIXME
+
+%% #(define nbal (acons '("Staff_bar" "begin-of-note") '(minimum_space 0.0) default-break-align-space-alist)) %% FIXME
\score{
\notes \relative c' <
linewidth = -1.0\cm
\translator{
\ScoreContext
- BreakAlignment \override #'space-alist = #nbal
+%%FIXME BreakAlignment \override #'space-alist = #nbal
\remove Timing_engraver
}
\translator{
Figured bass is created by the FiguredBass context which eats
note-requests and rest-requests. You can enter these either using
-standard @code{< >} notation, or using the special @code{\figures { }}
+standard @code{< >} notation, or using the special @code{\figures @{ @}}
mode, which allows you to type numbers, like @code{<4 6+>}.
" }
+++ /dev/null
-\version "1.5.68"
-
-% body for the font test. Does not work standalone
-
-
-FontBody= \notes\transpose c''{
- \bar "|:"
- \time 4/4
- \context Staff < \context Voice = VB { \stemUp e'\longa a\breve | }
- \context Voice = VA { \stemDown
- c1 \clef "bass" b,, \clef "violin" c' a'
- c2 \clef "alto" g c' \clef "violin" a'
- } >
- \stemBoth
- c4 g c' a' \bar ":|"
- a\ppp-\upbow a\pp-\downbow a\p^\turn a\mp^\fermata |
- a\mf_\fermata a\f-\stopped a\ff-\open a\fff^\trill|
- a\fp-\reverseturn a4.\sf a4.\sfz | a4\fz % a\rf
- [c8-\prall c-\mordent] [a'-\prallmordent a'-\prallprall]
- [c8-\upprall a'8-\downprall] [a'-\segno c-\coda] |
- [c \< d e f] [as' ges' f' e']
- [cis' dis' c' des'] [cisis' disis' \! ceses' deses'] |
- \clef "bass"
- r\longa * 1/4 r\breve *1/2
- r1 r2 r4 r8 r16 r32 r64 r128 r128 |
- \context Staff < \context Voice = VA { \stemUp r2 c'2 c,,,1 }
- \context Voice = VB {\stemDown r2 c2 r1 }>
- \stemBoth
- \clef "violin"
- e8_. g'8-> e16^^ g'16_^
- e32 _| g'32^| g''32-\ltoe g''32-\lheel
- e64-\rtoe g'64-\rheel c4... |
-\context Voice = mensural \relative c'' {
-\property Voice . noteHeadStyle = #'mensural
-\property Voice. stemCentered = ##t
-c\maxima*1/8
-c\longa*1/4 c\breve*1/2 c1 c2 c4 c8
-}
- \property Voice . noteHeadStyle = #'harmonic
-
- \transpose c'{
- \time 4/4
- \property Voice . TextScript \override #'font-style = #'Finger
- \property Voice . noteHeadStyle = #'diamond
- c1^"1" d2^"2" e4^"3"
- \property Voice . noteHeadStyle = #'cross
- f4^"4"
- g4^"5"
- \property Voice . noteHeadStyle = ##f
- % Music to the Martians!
- < bes4^"6" e_"7" c_"8" >
- a^"0"_"9"
-
- a'^\flageolet
- \property Voice . TextScript \override #'font-style = #'roman
- \time 1/2 a2 |
- \time 3/2 < a1.
- { s4 \ppp \< s4 \! s4 \fff s4 \> s4 \! s4\ppp} >
- |
- \time 2/4 a2 |
- \time 5/4 a1.. |
- \time 6/8 a2. |
- \time 7/8 a2.. |
- \time 9/8 a1... |
- \time 12/8 a1. |
- \time 12/4
- r1. r2. r4. r8. r16. r32. r64. r64. |
- c2\sustainDown c\sustainUp |
- }
-}
-\score {
- \FontBody
-}
+++ /dev/null
-\version "1.5.68"
-
-
-\header{
-title= "The Feta Font"
-subtitle = "proofsheet"
-enteredby = "jcn & hwn"
-copyright = "public domain"
-description = "This file tests the Feta music font, 11pt"
-% "(Feta definitively is not an abbreviation of Font-En-TjA)"
-}
-
-
-\include "paper11.ly"
-\include "font-body.ly"
-\score{
- \FontBody
- \paper{
- \paperEleven
- linewidth = 17.5 \cm
-
- }
-}
-
+++ /dev/null
-\version "1.5.68"
-\header{
-title= "The Feta Font"
-subtitle = "proofsheet"
-enteredby = "jcn & hwn"
-copyright = "public domain"
-description = "This file tests the Feta music font, 11pt"
-% "(Feta definitively is not an abbreviation of Font-En-TjA)"
-}
-
-
-\include "paper13.ly"
-\paper{
-linewidth = 17.5 \cm
-}
-\include "font-body.ly"
-
+++ /dev/null
-\version "1.5.68"
-\header{
-title= "The Feta Font"
-subtitle = "proofsheet"
-enteredby = "jcn & hwn"
-copyright = "public domain"
-description = "This file tests the Feta music font"
-% "(Feta definitively is not an abbreviation of Font-En-TjA)"
-}
-
-
-\include "paper16.ly"
- \paper{
- % don't change this.
- % otherwise 16pt and 20pt layouts differ.
-
- linewidth = 12.5 \cm}
-
- \include "font-body.ly"
+++ /dev/null
-\version "1.5.68"
-\header{
-title= "The Feta font"
-subtitle = "proofsheet"
-enteredby = "jcn"
-copyright = "public domain"
-description = "This file tests the Feta music-font in the 20pt version"
-TestedFeatures =
- "(Feta definitively is not an abbreviation of Font-En-TjA)"
-}
-
- \paper{
- linewidth = 17.5 \cm
- }
-
-\include "font-body.ly"
-
-
+++ /dev/null
-\version "1.5.68"
-
-\header{
-title= "The Feta Font"
-subtitle = "proofsheet"
-enteredby = "jcn & hwn"
-copyright = "public domain"
-description = "This file tests the Feta music font"
-% "(Feta definitively is not an abbreviation of Font-En-TjA)"
-}
-
-\include "paper26.ly"
- \paper{
-
- linewidth = 17.5 \cm
-
- }
-
- \include "font-body.ly"
-
\name SquashVoice
\alias Voice
\consists Pitch_squash_engraver
- \consists Local_key_engraver
+ \consists "Accidental_engraver"
squashedPosition = #0
NoteHead \override #'style = #'slash
Accidentals \override #'transparent = ##t
\translator {
\VoiceContext
\alias SquashVoice
- \consists Local_key_engraver
+ \consists "Accidental_engraver"
}
\translator {
\ScoreContext
}
\translator {
\StaffContext
- \remove Local_key_engraver
+ \remove "Accidental_engraver"
\accepts SquashVoice
}
linewidth = -1
+++ /dev/null
-\version "1.5.68"
-
-
-
s1 | \mark "12"
s1 | \mark \default
s1 | \mark "A2"
- s1 | \mark #'(music "scripts-segno")
+%% FIXME s1 | \mark #'(music "scripts-segno")
s1
}
+++ /dev/null
-\version "1.5.68"
\version "1.5.68"
-\include "german-chords.ly"
+\include "german-chords-init.ly"
% #(set! german-Bb #t)
\score { \notes {
\mel \break
- \apply #unfold-repeats \mel
+%% \apply #unfold-repeats \mel FIXME
}
}
(let* ((es (ly-get-mus-property ch 'elements)))
- (ly-set-mus-property ch 'elements
+ (ly-set-mus-property! ch 'elements
(voicify-list (split-list es music-separator?) 0))
ch
))
(voicify-chord m)
(begin
(if (pair? es)
- (ly-set-mus-property m 'elements (map voicify-music es)))
+ (ly-set-mus-property! m 'elements (map voicify-music es)))
(if (music? e)
- (ly-set-mus-property m 'element (voicify-music e)))
+ (ly-set-mus-property! m 'element (voicify-music e)))
m)
\score {
\notes {
+ c''
\property Voice.Stem \set #'length = #"foo"
\property Voice.Stem \set #'longth = #2
\property Staff.clefStyle = #"foo"
projects / lilypond.git / commitdiff