Issue 4086/3: Reimplement Music_function in terms of Smob2

[lilypond.git] / lily / function-documentation.cc

diff --git a/lily/function-documentation.cc b/lily/function-documentation.cc
index cce8c666475f95b72e90509dbba8a5a1f4e82241..7bb4543d2f8119f488b93ac7b2f975c51e2df3b3 100644 (file)
--- a/lily/function-documentation.cc
+++ b/lily/function-documentation.cc
@@ -103,14 +103,14 @@ void
 init_func_doc ()
 {
   ly_add_type_predicate ((void *) &is_direction, "direction");
-  ly_add_type_predicate ((void *) &is_music_function, "Music_function");
+  ly_add_type_predicate ((void *) &Music_function::unsmob, "Music_function");
   ly_add_type_predicate ((void *) &ly_is_port, "port");
   ly_add_type_predicate ((void *) &ly_cheap_is_list, "list");
-  ly_add_type_predicate ((void *) &unsmob_global_context, "Global_context");
-  ly_add_type_predicate ((void *) &unsmob_input, "Input");
-  ly_add_type_predicate ((void *) &unsmob_moment, "Moment");
-  ly_add_type_predicate ((void *) &unsmob_paper_score, "Paper_score");
-  ly_add_type_predicate ((void *) &unsmob_performance, "Performance");
+  ly_add_type_predicate ((void *) &Global_context::unsmob, "Global_context");
+  ly_add_type_predicate ((void *) &Input::unsmob, "Input");
+  ly_add_type_predicate ((void *) &Moment::unsmob, "Moment");
+  ly_add_type_predicate ((void *) &Paper_score::unsmob, "Paper_score");
+  ly_add_type_predicate ((void *) &Performance::unsmob, "Performance");
   ly_add_type_predicate ((void *) &is_unpure_pure_container, "unpure pure container");
 
   ly_add_type_predicate ((void *) &is_axis, "axis");
@@ -125,10 +125,10 @@ init_func_doc ()
   ly_add_type_predicate ((void *) &scm_is_rational, "rational");
   ly_add_type_predicate ((void *) &scm_is_string, "string");
   ly_add_type_predicate ((void *) &scm_is_vector, "vector");
-  ly_add_type_predicate ((void *) &unsmob_item, "Item");
-  ly_add_type_predicate ((void *) &unsmob_music, "Music");
-  ly_add_type_predicate ((void *) &unsmob_spanner, "Spanner");
-  ly_add_type_predicate ((void *) &unsmob_stream_event, "Stream_event");
+  ly_add_type_predicate ((void *) &Item::unsmob, "Item");
+  ly_add_type_predicate ((void *) &Music::unsmob, "Music");
+  ly_add_type_predicate ((void *) &Spanner::unsmob, "Spanner");
+  ly_add_type_predicate ((void *) &Stream_event::unsmob, "Stream_event");
 }
 
 ADD_SCM_INIT_FUNC (func_doc, init_func_doc);