X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Fprob.cc;h=8b14f73416a820ee325d2ea6ea80ae53db5b9ff6;hb=f4abbfff5f0d985a457e15586dbcc3ae473b0dee;hp=9d668b2969b7c34b786827a6ba490cad3ae356f8;hpb=5bbfc22fce036b9b69df5e420de93e11da23c05e;p=lilypond.git

diff --git a/lily/prob.cc b/lily/prob.cc
index 9d668b2969..8b14f73416 100644
--- a/lily/prob.cc
+++ b/lily/prob.cc
@@ -64,7 +64,7 @@ Prob::equal_p (SCM sa, SCM sb)
           SCM aval = scm_cdar (aprop);
           SCM bval = scm_cdar (bprop);
           if (scm_caar (aprop) != scm_caar (bprop)
-              || (!(unsmob_input (aval) && unsmob_input (bval))
+              || (!(Input::unsmob (aval) && Input::unsmob (bval))
                   &&
                   !to_boolean (scm_equal_p (aval, bval))))
             return SCM_BOOL_F;