Protected_scm grob_property_callback_stack = SCM_EOL;
-#ifndef NDEBUG
extern bool debug_property_callbacks;
+#ifndef NDEBUG
static void
print_property_callback_stack ()
{
for (SCM s = grob_property_callback_stack; scm_is_pair (s); s = scm_cdr (s))
message (_f ("%d: %s", frame++, ly_scm_write_string (scm_car (s)).c_str ()));
}
-
+#endif
static SCM modification_callback = SCM_EOL;
static SCM cache_callback = SCM_EOL;
cache_callback = (ly_is_procedure (cb)) ? cb : SCM_BOOL_F;
return SCM_UNSPECIFIED;
}
-#endif
void