The grand \paper -> \layout, \bookpaper -> \paper renaming.

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

diff --git a/lily/measure-grouping-engraver.cc b/lily/measure-grouping-engraver.cc
index b6996ca74e3bad24427240ebc09132004c44d4f2..75bb7b2c3beb5a08b555762c53a395277fadd913 100644 (file)
--- a/lily/measure-grouping-engraver.cc
+++ b/lily/measure-grouping-engraver.cc
@@ -73,7 +73,7 @@ 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,
+          where += Rational ((int) scm_to_int (scm_car (s))) * bl,
           s = scm_cdr (s)
           )
        {