X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Fpartial-iterator.cc;h=80048d827c87bcec64bdefc0615e041d93409533;hb=c7acad264e49f23e333dd66a0e1d50005c630068;hp=798dd3f069017a313911a937643e4cd7bb1dae15;hpb=0c14539bc83d6bb405141b6f21430b33d1e8fcf0;p=lilypond.git

diff --git a/lily/partial-iterator.cc b/lily/partial-iterator.cc
index 798dd3f069..80048d827c 100644
--- a/lily/partial-iterator.cc
+++ b/lily/partial-iterator.cc
@@ -24,6 +24,7 @@
 #include "moment.hh"
 #include "music.hh"
 #include "simple-music-iterator.hh"
+#include "lily-imports.hh"
 
 class Partial_iterator : public Simple_music_iterator
 {
@@ -53,9 +54,8 @@ Partial_iterator::process (Moment m)
       // measurePosition when initializing.
 
       Context *timing = unsmob<Context>
-                        (scm_call_2 (ly_lily_module_constant ("ly:context-find"),
-                                     get_outlet ()->self_scm (),
-                                     ly_symbol2scm ("Timing")));
+        (Lily::ly_context_find (get_outlet ()->self_scm (),
+                                ly_symbol2scm ("Timing")));
 
       if (!timing)
         programming_error ("missing Timing in \\partial");
@@ -92,9 +92,7 @@ Partial_iterator::finalization (SCM ctx, SCM length)
   LY_ASSERT_SMOB (Context, ctx, 1);
   LY_ASSERT_SMOB (Moment, length, 2);
   Context *timing = unsmob<Context>
-    (scm_call_2 (ly_lily_module_constant ("ly:context-find"),
-                 ctx,
-                 ly_symbol2scm ("Timing")));
+    (Lily::ly_context_find (ctx, ly_symbol2scm ("Timing")));
   if (!timing) {
     programming_error ("missing Timing in \\partial");
     return SCM_UNSPECIFIED;