]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/smobs.cc
Run `make grand-replace'.
[lilypond.git] / lily / smobs.cc
index 9629ed45ee610702f2d3e4b1024b56be9e3ac693..247489e342b5c759d8638baccc82fb9b2a09ef68 100644 (file)
@@ -3,7 +3,7 @@
 
   source file of the GNU LilyPond music typesetter
 
-  (c) 2005--2006 Han-Wen Nienhuys <hanwen@xs4all.nl>
+  (c) 2005--2008 Han-Wen Nienhuys <hanwen@xs4all.nl>
 */
 
 #include "smobs.hh"
@@ -21,9 +21,9 @@ init_smob_protection ()
 }
 ADD_SCM_INIT_FUNC (init_smob_protection, init_smob_protection);
 
-LY_DEFINE(ly_smob_protects, "ly:smob-protects",
+LY_DEFINE (ly_smob_protects, "ly:smob-protects",
          0, 0, 0, (),
-         "Return lily's internal smob protection list")
+         "Return LilyPond's internal smob protection list.")
 {
   return scm_is_pair (smob_protection_list)
     ? scm_cdr (smob_protection_list)
@@ -44,6 +44,7 @@ protect_smob (SCM smob, SCM *prot_cons)
                 prot);
   *prot_cons = prot;
 #else
+  (void) prot_cons; 
   scm_gc_protect_object (smob);
 #endif
 }
@@ -52,6 +53,7 @@ void
 unprotect_smob (SCM smob, SCM *prot_cons)
 {
 #if 1
+  (void) prot_cons; 
   scm_gc_unprotect_object (smob);
 #else
   SCM next = scm_cdr (*prot_cons);