progress_indication (_ ("Parsing..."));
- set_yydebug (flower_dstream &&!flower_dstream->silent_b ("Parser"));
+ set_yydebug (0);
lexer_p_->new_input (init, source_l_);
do_yyparse ();
}
void
-My_lily_parser::remember_spot ()
+My_lily_parser::push_spot ()
{
define_spot_array_.push (here_input ());
}
exit_status_global = 1;
}
-void
-My_lily_parser::set_last_duration (Duration const *d)
-{
- default_duration_ = *d;
-}
Input
SCM al = p->translator_p_dict_p_->to_alist ();
SCM l = SCM_EOL;
- for (SCM s = al ; gh_pair_p (s); s = gh_cdr (s))
+ for (SCM s = al ; gh_pair_p (s); s = ly_cdr (s))
{
- Translator_def * td = unsmob_translator_def (gh_cdar (s));
- l = gh_cons (gh_cons (gh_caar (s), td->to_alist ()), l);
+ Translator_def * td = unsmob_translator_def (ly_cdar (s));
+ l = gh_cons (gh_cons (ly_caar (s), td->to_alist ()), l);
}
return l;
}