mods_ = scm_reverse (mod_list);
}
-const char Context_mod::type_p_name_[] = "ly:context-mod?";
+const char * const Context_mod::type_p_name_ = "ly:context-mod?";
int
-Context_mod::print_smob (SCM port, scm_print_state *)
+Context_mod::print_smob (SCM port, scm_print_state *) const
{
scm_puts ("#<Context_mod ", port);
scm_display (get_mods (), port);
}
SCM
-Context_mod::mark_smob ()
+Context_mod::mark_smob () const
{
return mods_;
}