unsmob_pitch -> Pitch::unsmob and related

[lilypond.git] / lily / listener.cc

diff --git a/lily/listener.cc b/lily/listener.cc
index c785ff3d72d502302f4f6ba98fbaaa91fbf6d018..cb966adc9a9c20e5b4117b7412c7340ec0b2073a 100644 (file)
--- a/lily/listener.cc
+++ b/lily/listener.cc
@@ -63,8 +63,8 @@ Listener::print_smob (SCM, SCM p, scm_print_state *)
 SCM
 Listener::equal_p (SCM a, SCM b)
 {
-  Listener *l1 = unsmob_listener (a);
-  Listener *l2 = unsmob_listener (b);
+  Listener *l1 = Listener::unsmob (a);
+  Listener *l2 = Listener::unsmob (b);
 
   return (*l1 == *l2) ? SCM_BOOL_T : SCM_BOOL_F;
 }