X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Fglobal-context.cc;h=df9187d1e5df9363620bc804fd9a16678bc81e92;hb=309a9435d778ed2db26363f6be32e6a100cd630d;hp=3a251eb891caeae523c9277ddb4ffbdb5aaed6c2;hpb=8a7aceb09dd209167281715af1077ec4135fe359;p=lilypond.git diff --git a/lily/global-context.cc b/lily/global-context.cc index 3a251eb891..df9187d1e5 100644 --- a/lily/global-context.cc +++ b/lily/global-context.cc @@ -155,7 +155,8 @@ Global_context::run_iterator_on_me (Music_iterator *iter) if (!get_score_context ()) { SCM sym = ly_symbol2scm ("Score"); - Context_def *t = unsmob_context_def (find_context_def (get_output_def (), sym)); + Context_def *t = unsmob_context_def (find_context_def (get_output_def (), + sym)); if (!t) error (_f ("can't find `%s' context", "Score")); @@ -177,6 +178,7 @@ Global_context::apply_finalizations () SCM lst = get_property ("finalizations"); set_property ("finalizations", SCM_EOL); for (SCM s = lst; scm_is_pair (s); s = scm_cdr (s)) + /* TODO: make safe. */ scm_primitive_eval (scm_car (s)); }