release: 1.3.61

[lilypond.git] / scm / lily.scm

diff --git a/scm/lily.scm b/scm/lily.scm
index ded3b1ff301edabb4406e3e07b041b2dd2581ab9..80e3ffeb6ae74ac8903a06ce9146444c95a2ec4f 100644 (file)
--- a/scm/lily.scm
+++ b/scm/lily.scm
@@ -136,6 +136,7 @@
    )
 )
 
+;; silly, use alist? 
 (define (find-notehead-symbol duration style)
   (case style
    ((cross) "2cross")
@@ -292,7 +293,8 @@
   
   (define (end-output) 
        (begin
-               (display (gc-stats))
+; uncomment for some stats about lily memory     
+;              (display (gc-stats))
     (string-append "\n\\EndLilyPondOutput"
                   ; Put GC stats here.
                   )))