- 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 *) &is_unpure_pure_container, "unpure pure container");
-
+ ly_add_type_predicate ((void *) &Global_context::is_smob, "Global_context");
+ ly_add_type_predicate ((void *) &Paper_score::is_smob, "Paper_score");
+ ly_add_type_predicate ((void *) &Performance::is_smob, "Performance");