X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Fsource-file.cc;h=5a94927a7ffb549977f5b284f5fda18f3bdf91a6;hb=7d71f371e483a4a305fc16a2b3fbce879a464253;hp=1118b9d286ee29a823c6ce0b2a7d6041a9ed19aa;hpb=55ff9f5a64a00b6c369be47eb8ca3949250f120b;p=lilypond.git

diff --git a/lily/source-file.cc b/lily/source-file.cc
index 1118b9d286..5a94927a7f 100644
--- a/lily/source-file.cc
+++ b/lily/source-file.cc
@@ -365,13 +365,13 @@ Source_file::get_port () const
 const char Source_file::type_p_name_[] = "ly:source-file?";
 
 SCM
-Source_file::mark_smob ()
+Source_file::mark_smob () const
 {
   return str_port_;
 }
 
 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);