]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/beam-engraver.cc
* lily/main.cc (setup_guile_env): new function. Set GC min_yields
[lilypond.git] / lily / beam-engraver.cc
index 07c2c9046a14da00ebb5ffc62df859ca14142159..b6168fb863b1681cc6525a346e7ee9f52d089191 100644 (file)
@@ -264,7 +264,7 @@ Beam_engraver::acknowledge_stem (Grob_info info)
        }
 
       stem->set_property ("duration-log",
-                         scm_int2num (durlog));
+                         scm_from_int (durlog));
       Moment stem_location = now - beam_start_mom_ + beam_start_location_;
       beam_info_->add_stem (stem_location,
                            max (durlog- 2, 0));