X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Ffont-metric.cc;h=c9daa95f3edf2000d39fb47a5d856a8df505073a;hb=90e4d7057f3857da049dfda3d130017d4719bd6b;hp=f18b2d7256ae2717928937c3bbe76cc41799d121;hpb=d2762a4f1add2bb04d6fc34d3c7ae03eeb7d500f;p=lilypond.git

diff --git a/lily/font-metric.cc b/lily/font-metric.cc
index f18b2d7256..c9daa95f3e 100644
--- a/lily/font-metric.cc
+++ b/lily/font-metric.cc
@@ -95,14 +95,14 @@ Font_metric::derived_mark () const
 }
 
 SCM
-Font_metric::mark_smob ()
+Font_metric::mark_smob () const
 {
   derived_mark ();
   return description_;
 }
 
 int
-Font_metric::print_smob (SCM port, scm_print_state *)
+Font_metric::print_smob (SCM port, scm_print_state *) const
 {
   scm_puts ("#<", port);
   scm_puts (class_name (), port);
@@ -112,7 +112,7 @@ Font_metric::print_smob (SCM port, scm_print_state *)
   return 1;
 }
 
-const char Font_metric::type_p_name_[] = "ly:font-metric?";
+const char * const Font_metric::type_p_name_ = "ly:font-metric?";
 
 SCM
 Font_metric::font_file_name () const