* VERSION (MY_PATCH_LEVEL): make 1.7.0

[lilypond.git] / input / test / accid.ly

diff --git a/input/test/accid.ly b/input/test/accid.ly
index 569bd6a31b0087e7f2f87cd88ddee4668e8e5d71..d26f5292bf66b3f2776ee293090b87faa55fd6b7 100644 (file)
--- a/input/test/accid.ly
+++ b/input/test/accid.ly
@@ -3,7 +3,40 @@
 \score { 
   \context Voice \notes\relative c {
     \time 3/4
-       cisis'' cisis! cisis? |
+       \property Staff.Accidental \set #'style = #'default
+       cisis''^"Accidental style = \#'default" cisis! cisis? |
+       cis cis! cis? | 
+       c c! c? |
+       ces ces! ces? |
+       ceses ceses! ceses? |
+       \break
+       
+       \property Staff.Accidental \set #'style = #'hufnagel
+       cisis^"Accidental style = \#'hufnagel" cisis! cisis? |
+       cis cis! cis? | 
+       c c! c? |
+       ces ces! ces? |
+       ceses ceses! ceses? |
+       \break
+       
+       \property Staff.Accidental \set #'style = #'medicaea
+       cisis^"Accidental style = \#'medicaea" cisis! cisis? |
+       cis cis! cis? | 
+       c c! c? |
+       ces ces! ces? |
+       ceses ceses! ceses? |
+       \break
+       
+       \property Staff.Accidental \set #'style = #'vaticana
+       cisis^"Accidental style = \#'vaticana" cisis! cisis? |
+       cis cis! cis? | 
+       c c! c? |
+       ces ces! ces? |
+       ceses ceses! ceses? |
+       \break
+       
+       \property Staff.Accidental \set #'style = #'mensural
+       cisis^"Accidental style = \#'mensural" cisis! cisis? |
        cis cis! cis? | 
        c c! c? |
        ces ces! ces? |