release commit

[lilypond.git] / lily / measure-grouping-engraver.cc

diff --git a/lily/measure-grouping-engraver.cc b/lily/measure-grouping-engraver.cc
index b6996ca74e3bad24427240ebc09132004c44d4f2..d86f768a0ac5102978902c8a2370475d93f92a2d 100644 (file)
--- a/lily/measure-grouping-engraver.cc
+++ b/lily/measure-grouping-engraver.cc
@@ -73,11 +73,11 @@ Measure_grouping_engraver::process_music ()
        
       Rational where (0);
       for (SCM s = grouping; scm_is_pair (s);
-          where += Rational (scm_to_int (scm_car (s))) * bl,
-          s = scm_cdr (s)
+          where += Rational (scm_to_int (ly_car (s))) * bl,
+          s = ly_cdr (s)
           )
        {
-         int grouplen = scm_to_int (scm_car (s));
+         int grouplen = scm_to_int (ly_car (s));
          if (where == mp)
            {
              if (grouping_)