ly:truncate-list! ; robust version of srfi-1 (list-head)

[lilypond.git] / input / regression / profile-property-access.ly

diff --git a/input/regression/profile-property-access.ly b/input/regression/profile-property-access.ly
index 641c24fe70c092138b4bc1f9749819ef972684cc..21e5476b552c534a01576a361e65c6f4e43342a1 100644 (file)
--- a/input/regression/profile-property-access.ly
+++ b/input/regression/profile-property-access.ly
@@ -26,7 +26,7 @@
    what count rnd
    (string-join
     (map (lambda (x) (format "~30a: ~6@a" (car x) (* rnd (inexact->exact (round (/ (cdr x) rnd))))))
-     (take 
+     (ly:truncate-list! 
     (sort alist prop-stats>?) count))
     "\n"))))