Issue 4842/6: Don't special-case Scheme_engraver's acknowledgers

[lilypond.git] / lily / include / music-function.hh

diff --git a/lily/include/music-function.hh b/lily/include/music-function.hh
index 99c6c8f157460523d155181d5051a330a5a42b92..f2c349a3e1cdfd1f2bb6572c3c54c727b973bfe4 100644 (file)
--- a/lily/include/music-function.hh
+++ b/lily/include/music-function.hh
@@ -28,10 +28,11 @@ class Music_function : public Smob2<Music_function>
 {
 public:
   static const char type_p_name_[];
-  SCM mark_smob ();
-  int print_smob (SCM, scm_print_state *);
-  SCM get_signature () { return scm1 (); }
-  SCM get_function () { return scm2 (); }
+  int print_smob (SCM, scm_print_state *) const;
+  SCM get_signature () const { return scm1 (); }
+  SCM get_function () const { return scm2 (); }
+  SCM call (SCM args);
+  LY_DECLARE_SMOB_PROC (&Music_function::call, 0, 0, 1);
 };
 
 #endif /* MUSIC_FUNCTION_HH */