#include <cmath>
+using std::string;
+
Pitch::Pitch (int o, int n, Rational a)
{
notename_ = n;
const char Pitch::type_p_name_[] = "ly:pitch?";
SCM
-Pitch::mark_smob ()
+Pitch::mark_smob () const
{
return scale_->self_scm ();
}
int
-Pitch::print_smob (SCM port, scm_print_state *)
+Pitch::print_smob (SCM port, scm_print_state *) const
{
scm_puts ("#<Pitch ", port);
scm_display (ly_string2scm (to_string ()), port);