- if (!get_score_context ())
- {
- error ("ES TODO: no score context, this shouldn't happen");
- SCM sym = ly_symbol2scm ("Score");
- Context_def *t = unsmob_context_def (find_context_def (get_output_def (),
- sym));
- if (!t)
- error (_f ("can't find `%s' context", "Score"));
-
- Object_key const *key = get_context_key ("Score", "");
- Context *c = t->instantiate (SCM_EOL, key);
- add_context (c);
-
- Score_context *sc = dynamic_cast<Score_context *> (c);
- sc->prepare (w);
- }
-