]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/pitch.cc
Issue 4135/2: Replace mark_smob static member functions with non-static members
[lilypond.git] / lily / pitch.cc
index 8fd4d67171cc2cb5970c0a3fed5464e53f0d8602..08e6556cf6962be729c3bb3e24e1775c3b44875c 100644 (file)
@@ -219,11 +219,11 @@ Pitch::down_to (int notename)
 }
 
 const char Pitch::type_p_name_[] = "ly:pitch?";
+
 SCM
-Pitch::mark_smob (SCM x)
+Pitch::mark_smob ()
 {
-  Pitch *p = (Pitch *) SCM_CELL_WORD_1 (x);
-  return p->scale_->self_scm ();
+  return scale_->self_scm ();
 }
 
 int