]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/text-interface.cc
(AncientRemoveEmptyStaffContext): switch on
[lilypond.git] / lily / text-interface.cc
index 4c28ee8671373ecd3304da89fad76a938b3d8052..a940c4e452b5f1b48f33af4826e92d3a6786868c 100644 (file)
@@ -9,8 +9,6 @@
 
 #include "text-interface.hh"
 
-#include <cmath>
-using namespace std;
 
 #include "main.hh"
 #include "config.hh"
@@ -57,8 +55,10 @@ Text_interface::interpret_markup (SCM layout_smob, SCM props, SCM markup)
     }
   else
     {
-      programming_error ("not a markup: ");
+      programming_error ("Object is not a markup. ");
+      scm_puts ("This object should be a markup: ", scm_current_error_port ());
       scm_display (markup, scm_current_error_port ());
+      scm_puts ("\n", scm_current_error_port ());
 
       Box b;
       b[X_AXIS].set_empty ();