*** empty log message ***

[lilypond.git] / lily / input.cc

diff --git a/lily/input.cc b/lily/input.cc
index 1379f1c7b579ed76f3937f4c84ae891149668882..5ab2be4c7864830cd5d2b6f196c58ec09554f86b 100644 (file)
--- a/lily/input.cc
+++ b/lily/input.cc
@@ -75,6 +75,15 @@ Input::message (string s) const
   ::message (s);
 }
 
+
+void
+Input::programming_error (string s) const
+{
+  message (_f ("programming error: %s", s.c_str ()));
+  message (_ ("continuing, cross fingers") + "\n");
+}
+
+
 void
 Input::warning (string s) const
 {