X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Flily-parser.cc;h=d2499d4c4134c1453cc0a9b1a8618282df26da33;hb=b872748c6aa8bb721ced458691b38ac2fac5dfc8;hp=170a5e77e4a2736157db88a80a2b0ba87cfdb10d;hpb=563bb9fc1b7afd3543fe4ed9251d39a995db8737;p=lilypond.git

diff --git a/lily/lily-parser.cc b/lily/lily-parser.cc
index 170a5e77e4..d2499d4c41 100644
--- a/lily/lily-parser.cc
+++ b/lily/lily-parser.cc
@@ -77,14 +77,14 @@ Lily_parser::~Lily_parser ()
 }
 
 SCM
-Lily_parser::mark_smob ()
+Lily_parser::mark_smob () const
 {
   scm_gc_mark (closures_);
   return (lexer_) ? lexer_->self_scm () : SCM_EOL;
 }
 
 int
-Lily_parser::print_smob (SCM port, scm_print_state *)
+Lily_parser::print_smob (SCM port, scm_print_state *) const
 {
   scm_puts ("#<Lily_parser ", port);
   if (lexer_)
@@ -200,7 +200,7 @@ Lily_parser::parser_error (Input const &i, const string &s)
   error_level_ = 1;
 }
 
-const char Lily_parser::type_p_name_[] = "ly:lily-parser?";
+const char * const Lily_parser::type_p_name_ = "ly:lily-parser?";
 
 /****************************************************************
   OUTPUT-DEF