X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Fsource-file.cc;h=14fdf2beb3b6ef4c10ff835c60deeca2a5811157;hb=bb2d483cfa555f003f3f1962faa16fe298fe8c96;hp=b06edbf0b3a6a8af9a780c66dbbe03f9ae632bb3;hpb=1b5f1825a6655583a6209fedd51b98f4865bb2cd;p=lilypond.git

diff --git a/lily/source-file.cc b/lily/source-file.cc
index b06edbf0b3..14fdf2beb3 100644
--- a/lily/source-file.cc
+++ b/lily/source-file.cc
@@ -362,7 +362,7 @@ Source_file::get_port () const
 /****************************************************************/
 
 
-const char Source_file::type_p_name_[] = "ly:source-file?";
+const char * const Source_file::type_p_name_ = "ly:source-file?";
 
 SCM
 Source_file::mark_smob () const
@@ -371,7 +371,7 @@ Source_file::mark_smob () const
 }
 
 int
-Source_file::print_smob (SCM port, scm_print_state *)
+Source_file::print_smob (SCM port, scm_print_state *) const
 {
   scm_puts ("#<Source_file ", port);
   scm_puts (name_.c_str (), port);