Use scm_to_int64/from_int64 for Rational/SCM conversions.

[lilypond.git] / lily / duration-scheme.cc

diff --git a/lily/duration-scheme.cc b/lily/duration-scheme.cc
index d37147558112e5d64442d7a2fa44b7538341fe07..5bc12ea0731eebd694ee0caa4f1f3dc89e8b4b4c 100644 (file)
--- a/lily/duration-scheme.cc
+++ b/lily/duration-scheme.cc
@@ -134,5 +134,5 @@ LY_DEFINE (ly_duration_factor, "ly:duration-factor",
 {
   LY_ASSERT_SMOB (Duration, dur, 1);
   Rational r = unsmob_duration (dur)->factor ();
-  return scm_cons (scm_from_int (r.num ()), scm_from_int (r.den ()));
+  return scm_cons (scm_from_int64 (r.num ()), scm_from_int64 (r.den ()));
 }