X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=lily%2Fduration-scheme.cc;h=6f1ea4ef908b5336be9ade2c059b38d95363ce5d;hb=9f3572d98bb948c9689cd1f75401a029451fa001;hp=fb4bb102632b9946286d07abc048dfb4308b306a;hpb=04265f11d1f21416ccebd2dcaa1d903dc781b36e;p=lilypond.git

diff --git a/lily/duration-scheme.cc b/lily/duration-scheme.cc
index fb4bb10263..6f1ea4ef90 100644
--- a/lily/duration-scheme.cc
+++ b/lily/duration-scheme.cc
@@ -113,14 +113,6 @@ LY_DEFINE (ly_intlog2, "ly:intlog2",
   return scm_from_int (log);
 }
 
-LY_DEFINE (ly_duration_length, "ly:duration-length",
-	   1, 0, 0, (SCM dur),
-	   "The length of the duration as a Moment.")
-{
-  SCM_ASSERT_TYPE (unsmob_duration (dur), dur, SCM_ARG1, __FUNCTION__, "duration");
-  return Moment (unsmob_duration (dur)->get_length ()).smobbed_copy ();
-}
-
 LY_DEFINE (ly_duration_factor, "ly:duration-factor",
 	   1, 0, 0, (SCM dur),
 	   "Extract the compression factor from @var{dur}. Return as a pair.")