CVSROOT:        /cvsroot/lilypond
Module name:    lilypond
Branch:         
Changes by:     Han-Wen Nienhuys <[EMAIL PROTECTED]>    05/06/09 18:28:59

Modified files:
        .              : ChangeLog 
        lily           : program-option.cc 
        scm            : lily.scm 

Log message:
        * lily/program-option.cc: add debug-gc option.
        
        * lily/program-option.cc: rename from scm-option.cc

CVSWeb URLs:
http://savannah.gnu.org/cgi-bin/viewcvs/lilypond/lilypond/ChangeLog.diff?tr1=1.3752&tr2=1.3753&r1=text&r2=text
http://savannah.gnu.org/cgi-bin/viewcvs/lilypond/lilypond/lily/program-option.cc.diff?tr1=1.3&tr2=1.4&r1=text&r2=text
http://savannah.gnu.org/cgi-bin/viewcvs/lilypond/lilypond/scm/lily.scm.diff?tr1=1.360&tr2=1.361&r1=text&r2=text

Patches:
Index: lilypond/ChangeLog
diff -u lilypond/ChangeLog:1.3752 lilypond/ChangeLog:1.3753
--- lilypond/ChangeLog:1.3752   Thu Jun  9 18:05:30 2005
+++ lilypond/ChangeLog  Thu Jun  9 18:28:58 2005
@@ -1,5 +1,7 @@
 2005-06-09  Han-Wen Nienhuys  <[EMAIL PROTECTED]>
 
+       * lily/program-option.cc: add debug-gc option.
+
        * lily/include/lily-guile-macros.hh: don't protect exported module
        objects.
 
Index: lilypond/lily/program-option.cc
diff -u lilypond/lily/program-option.cc:1.3 lilypond/lily/program-option.cc:1.4
--- lilypond/lily/program-option.cc:1.3 Thu Jun  9 17:16:46 2005
+++ lilypond/lily/program-option.cc     Thu Jun  9 18:28:59 2005
@@ -57,6 +57,8 @@
    "delete unusable PostScript files"},   
   {"ttf-verbosity", "0",
    "how much verbosity for TTF font embedding?"},
+  {"debug-gc", "#f",
+   "dump GC protection info"}, 
   {0,0,0},
 };
 
Index: lilypond/scm/lily.scm
diff -u lilypond/scm/lily.scm:1.360 lilypond/scm/lily.scm:1.361
--- lilypond/scm/lily.scm:1.360 Thu Jun  9 18:26:01 2005
+++ lilypond/scm/lily.scm       Thu Jun  9 18:28:59 2005
@@ -327,7 +327,7 @@
         (lambda () (ly:parse-file file-name))
         (lambda (x . args) (handler x file-name)))
 
-  (if #t
+  (if (ly:get-option 'debug-gc)
       (dump-gc-protects)))
 
 (use-modules (scm editor))


_______________________________________________
Lilypond-cvs mailing list
[email protected]
http://lists.gnu.org/mailman/listinfo/lilypond-cvs

Reply via email to