]> git.donarmstrong.com Git - lilypond.git/commitdiff
cleanup input/no-notation/
authorHan-Wen Nienhuys <hanwen@xs4all.nl>
Tue, 2 Jan 2007 20:53:41 +0000 (21:53 +0100)
committerHan-Wen Nienhuys <hanwen@xs4all.nl>
Tue, 2 Jan 2007 20:53:41 +0000 (21:53 +0100)
23 files changed:
input/midi/midi-absolute-volume.ly [new file with mode: 0644]
input/no-notation/bar-check.ly [deleted file]
input/no-notation/beam-warn.ly [deleted file]
input/no-notation/die-staff.ly [deleted file]
input/no-notation/display-lily-tests.ly
input/no-notation/dos-guile.ly [deleted file]
input/no-notation/dos-ps.ly [deleted file]
input/no-notation/dos-tex.ly [deleted file]
input/no-notation/dynamic-absolute-volume.ly [deleted file]
input/no-notation/embedded-scm.ly [deleted file]
input/no-notation/parse.ly [deleted file]
input/no-notation/parse2.ly [deleted file]
input/no-notation/parse3.ly [deleted file]
input/no-notation/parse4.ly [deleted file]
input/no-notation/parse5.ly [deleted file]
input/no-notation/recording.ly [deleted file]
input/no-notation/safe-ps.ly [deleted file]
input/no-notation/safe-tex.ly [deleted file]
input/no-notation/skiptypesetting-bar-check.ly [new file with mode: 0644]
input/no-notation/textcresc.ly [deleted file]
input/no-notation/warn-conflicting-key-signatures.ly [new file with mode: 0644]
input/regression/context-die-staff.ly [new file with mode: 0644]
lily/translator-group-ctors.cc

diff --git a/input/midi/midi-absolute-volume.ly b/input/midi/midi-absolute-volume.ly
new file mode 100644 (file)
index 0000000..8c3a24c
--- /dev/null
@@ -0,0 +1,34 @@
+
+\version "2.10.0"
+\header {
+    texidoc = "@cindex Dynamic Absolute Volume
+Absolute dynamics have an effect on MIDI files.
+"
+}
+
+
+\score{
+\relative c''{
+%segfault in engraver
+a1\ppp 
+a1\pp
+a\p
+a\mp
+a\mf
+a\f
+a\ff
+a\fff
+a\sf
+}
+\layout{ ragged-right = ##t }
+
+  \midi {
+    \context {
+      \Score
+      tempoWholesPerMinute = #(ly:make-moment 60 1)
+      }
+    }
+
+
+}
+
diff --git a/input/no-notation/bar-check.ly b/input/no-notation/bar-check.ly
deleted file mode 100644 (file)
index e9a714e..0000000
+++ /dev/null
@@ -1,13 +0,0 @@
-\version "2.10.0"
-
-\header {
-
-texidoc = "skipTypesetting doesn't affect bar checks."
-
-}
-
-\score {  {
-       \set Score.skipTypesetting = ##t
-       c4 c4
-       |
-       c4 c4 }}
diff --git a/input/no-notation/beam-warn.ly b/input/no-notation/beam-warn.ly
deleted file mode 100644 (file)
index 3a6586d..0000000
+++ /dev/null
@@ -1,11 +0,0 @@
-\version "2.10.0"
-
-\header        {
-
-texidoc = "The first duration following a beam-open request is checked if it is short enough."
-
-}
-
-\score {
-   { [c4 c] }
-}
diff --git a/input/no-notation/die-staff.ly b/input/no-notation/die-staff.ly
deleted file mode 100644 (file)
index 4f94b3b..0000000
+++ /dev/null
@@ -1,23 +0,0 @@
-\version "2.10.0"
-
-\header  {
-texidoc = "a staff should really die, if no one's referencing it."
-}
-\score {
- {
-    \new Staff =  "q" {
-       { a' b' c' d' }
-    }
-
-    \break
-
-    \context PianoStaff <<
-      \new Staff =  "i" {
-         { a' b' c' d' }
-      }
-      \new Staff =  "ii" {
-         { \clef "bass" a b c d }
-      }
-    >>
-  }
-}
index 014f63ccdb814597d777947606cbeb88e468aaff..a6b1dacac74c4d93321e84a85b7620d059e9b5c4 100644 (file)
@@ -1,4 +1,4 @@
-\version "2.10.0"
+\version "2.11.6"
 
 #(use-modules (srfi srfi-13)
               (ice-9 format))
@@ -15,7 +15,7 @@
                                   (char=? (peek-char port) #\]))
                              (read-char port))
                           (display c out))))))
-    `(let* ((parser-clone (ly:clone-parser parser))
+    `(let* ((parser-clone (ly:parser-clone parser))
             (input-str (string-trim-both ,lily-string))
             (music (car (ly:music-property (parse-string-result input-str
                                                                 parser-clone)
diff --git a/input/no-notation/dos-guile.ly b/input/no-notation/dos-guile.ly
deleted file mode 100644 (file)
index 9858a59..0000000
+++ /dev/null
@@ -1,14 +0,0 @@
-\version "2.10.0"
-
-\header{
-    
-    texidoc = "This should not hang lilypond --safe-mode."
-    
-}
-
-% DOS
-#(do () (#f))
-
-\score{
-     c''
-}
\ No newline at end of file
diff --git a/input/no-notation/dos-ps.ly b/input/no-notation/dos-ps.ly
deleted file mode 100644 (file)
index 31c0da1..0000000
+++ /dev/null
@@ -1,13 +0,0 @@
-\version "2.10.0"
-
-\header{
-
-    texidoc = "This should not hang lilypond --safe-mode --no-pdf
-    --png run.
-
-}
-
-\score{
-    % DOS
-     c''-"\\embeddedps{ { 0 0 moveto } loop }"
-}
diff --git a/input/no-notation/dos-tex.ly b/input/no-notation/dos-tex.ly
deleted file mode 100644 (file)
index 859df66..0000000
+++ /dev/null
@@ -1,12 +0,0 @@
-\version "2.10.0"
-
-\header{
-    
-    texidoc = "This should not hang lilypond --safe-mode run."
-
-}
-
-\score{
-    % DOS
-     c''-"\\loop\\iftrue\\repeat"
-}
diff --git a/input/no-notation/dynamic-absolute-volume.ly b/input/no-notation/dynamic-absolute-volume.ly
deleted file mode 100644 (file)
index 8c3a24c..0000000
+++ /dev/null
@@ -1,34 +0,0 @@
-
-\version "2.10.0"
-\header {
-    texidoc = "@cindex Dynamic Absolute Volume
-Absolute dynamics have an effect on MIDI files.
-"
-}
-
-
-\score{
-\relative c''{
-%segfault in engraver
-a1\ppp 
-a1\pp
-a\p
-a\mp
-a\mf
-a\f
-a\ff
-a\fff
-a\sf
-}
-\layout{ ragged-right = ##t }
-
-  \midi {
-    \context {
-      \Score
-      tempoWholesPerMinute = #(ly:make-moment 60 1)
-      }
-    }
-
-
-}
-
diff --git a/input/no-notation/embedded-scm.ly b/input/no-notation/embedded-scm.ly
deleted file mode 100644 (file)
index b84dfc8..0000000
+++ /dev/null
@@ -1,22 +0,0 @@
-\version "2.10.0"
-\header {
-    
-    texidoc = "@cindex Embedded scm
-
-You can embed scheme functions in your scores.  While generating the
-output, ``hello world'' is printed to the console.
-"
-     % see also: --safe-mode
-}
-
-#(begin
-  (newline)
-  (display "hello world")
-  (newline))
-
-\score {
-       \relative c' { c }
-       \layout {ragged-right = ##t}
-}
-
-
diff --git a/input/no-notation/parse.ly b/input/no-notation/parse.ly
deleted file mode 100644 (file)
index b851323..0000000
+++ /dev/null
@@ -1,5 +0,0 @@
-\version "2.10.0"
-
-% Test parser error
-
-\score{
diff --git a/input/no-notation/parse2.ly b/input/no-notation/parse2.ly
deleted file mode 100644 (file)
index 5096c6c..0000000
+++ /dev/null
@@ -1,9 +0,0 @@
-\version "2.10.0"
-
-% Test parser error
-
-foo = {
-
-
-\score{
-}
diff --git a/input/no-notation/parse3.ly b/input/no-notation/parse3.ly
deleted file mode 100644 (file)
index cdf9626..0000000
+++ /dev/null
@@ -1,9 +0,0 @@
-\version "2.10.0"
-
-% Test parser error
-
-foo = {
-
-
-\score{
-
diff --git a/input/no-notation/parse4.ly b/input/no-notation/parse4.ly
deleted file mode 100644 (file)
index cee8a6a..0000000
+++ /dev/null
@@ -1,12 +0,0 @@
-\version "2.10.0"
-
-% Test parser error
-
-foo = {
-}
-
-
-\score{
-  burp
-}
-
diff --git a/input/no-notation/parse5.ly b/input/no-notation/parse5.ly
deleted file mode 100644 (file)
index 4b9756e..0000000
+++ /dev/null
@@ -1,11 +0,0 @@
-\version "2.10.0"
-%If you specify two different key sigs at one point, a
-%warning is printed.
-
-\score { 
-\context Voice <<
- { \key cis \major cis4 \key bes \major bes4 }
- { \key cis \major fis4 \key es \major g4 }  
->>
-}
-
diff --git a/input/no-notation/recording.ly b/input/no-notation/recording.ly
deleted file mode 100644 (file)
index 39ea07d..0000000
+++ /dev/null
@@ -1,24 +0,0 @@
-\version "2.10.0"
-\header {
-
-texidoc = "The @code{Recording_group_engraver} will record events
-synchronized in time, collecting them in a list.  This file also shows
-how to skip the rendering and outputting step of the process, using
-@code{ly:run-translator}."
-
-}
-
-theMusic = \context Staff  { c4 d8-. }
-
-#(define (notice-the-events context lst)
-  (map (lambda (x) (display x) (newline))  lst))
-
-listener = \layout {
- \context {
-   \Voice
-   \type "Recording_group_engraver"
-   recordEventSequence = #notice-the-events
- }
-}
-
-#(ly:run-translator theMusic listener)
diff --git a/input/no-notation/safe-ps.ly b/input/no-notation/safe-ps.ly
deleted file mode 100644 (file)
index 8a0ccca..0000000
+++ /dev/null
@@ -1,10 +0,0 @@
-\version "2.10.0"
-
-\header{
-    texidoc = "This should not survive lilypond --safe-mode
-    --no-pdf --png run, and certainly not write /tmp/safe-ps.ps"
-}
-
-\score{
-     c''-"\\embeddedps{ (/tmp/safe-ps.ps) (w) file (hallo) writestring }"
-}
diff --git a/input/no-notation/safe-tex.ly b/input/no-notation/safe-tex.ly
deleted file mode 100644 (file)
index 516146e..0000000
+++ /dev/null
@@ -1,16 +0,0 @@
-\version "2.10.0"
-
-\header{
-    
-    texidoc = "This should not survive lilypond --safe-mode run, and
-    certainly not write /tmp/safe-tex.tex"
-
-    % beware
-    % openout_any=y lilypond --keep --safe-mode -S latexoptions=']{article}
-    % \let\nofiles\relax%' input/no-notation/safe-tex.ly
-
-}
-
-\score{
-     c''-"\\newwrite\\barf\\immediate\\openout\\barf=/tmp/safe-tex.tex\\immediate\\write\\barf{hallo}"
-}
diff --git a/input/no-notation/skiptypesetting-bar-check.ly b/input/no-notation/skiptypesetting-bar-check.ly
new file mode 100644 (file)
index 0000000..e418183
--- /dev/null
@@ -0,0 +1,17 @@
+\version "2.10.0"
+
+\header {
+
+texidoc = "skipTypesetting doesn't affect bar checks."
+
+}
+
+\relative {
+  c4
+  \set Score.skipTypesetting = ##t
+  c4 c4
+  |
+  c4 c4
+  \set Score.skipTypesetting = ##f
+  d
+}
diff --git a/input/no-notation/textcresc.ly b/input/no-notation/textcresc.ly
deleted file mode 100644 (file)
index 08b1fde..0000000
+++ /dev/null
@@ -1,15 +0,0 @@
-\version "2.10.0"
-\header{
-texidoc="crashes lily"
-}
-
-\score {  {
-  \context Voice {
-    \set crescendoText = "cresc."
-    \set crescendoSpanner = #'dashed-line
-    c2. r8 c8 \< \break \! c1
-  }
-}
-\layout { line-width = 5.\cm}
-}
-
diff --git a/input/no-notation/warn-conflicting-key-signatures.ly b/input/no-notation/warn-conflicting-key-signatures.ly
new file mode 100644 (file)
index 0000000..4b9756e
--- /dev/null
@@ -0,0 +1,11 @@
+\version "2.10.0"
+%If you specify two different key sigs at one point, a
+%warning is printed.
+
+\score { 
+\context Voice <<
+ { \key cis \major cis4 \key bes \major bes4 }
+ { \key cis \major fis4 \key es \major g4 }  
+>>
+}
+
diff --git a/input/regression/context-die-staff.ly b/input/regression/context-die-staff.ly
new file mode 100644 (file)
index 0000000..b36ae93
--- /dev/null
@@ -0,0 +1,16 @@
+\version "2.10.0"
+
+\header  {
+texidoc = "a staff should die if there is reference to it."
+}
+\layout {
+  ragged-right = ##t
+  line-width = 2.5 \cm
+  indent = 0.0
+}
+
+{
+  << \new Staff =  "q" \new Voice ="V" c1  >>
+  %% no \break, BreakEvent causes spurious staff
+  \new RhythmicStaff = "R" \new Voice = "RV" c 
+}
index 83feef1634468e1b33cd052d88e53fd532418606..bca809281bbb5f02eeca9372df8f5cfe9f010f8c 100644 (file)
@@ -9,6 +9,7 @@
 #include "score-engraver.hh"
 #include "score-performer.hh"
 #include "warn.hh"
+#include "international.hh"
 
 /*
   Quick & dirty.
@@ -25,11 +26,13 @@ get_translator_group (SCM sym)
   else if (sym == ly_symbol2scm ("Score_performer"))
     return new Score_performer ();
 
-  programming_error ("Couldn't find type");
+  error (_f ("fatal error. Couldn't find type: %s",
+            ly_symbol2string (sym).c_str ()));
   scm_flush (scm_current_error_port ());
   scm_display (sym, scm_current_error_port ());
   scm_flush (scm_current_error_port ());
   
-  assert (0);
+  exit (2);
+  
   return 0;
 }