]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/smobs.cc
(parse_symbol_list): Bugfix.
[lilypond.git] / lily / smobs.cc
index 63d36f23a57db8afd4fd42af4383da306ead9693..e2ec5d5638124b947cd9cf0c936ebe1e86dff775 100644 (file)
@@ -4,7 +4,6 @@
   source file of the GNU LilyPond music typesetter
 
   (c) 2005 Han-Wen Nienhuys <hanwen@xs4all.nl>
-
 */
 
 #include "smobs.hh"
 static SCM smob_protection_list;
 
 void
-init_smob_protection()
+init_smob_protection ()
 {
   smob_protection_list = scm_cons (SCM_UNDEFINED, SCM_EOL);
   scm_permanent_object (smob_protection_list);
 }
-ADD_SCM_INIT_FUNC(init_smob_protection, init_smob_protection);
+ADD_SCM_INIT_FUNC (init_smob_protection, init_smob_protection);
 
 void
 protect_smob (SCM smob, SCM *prot_cons)
@@ -49,9 +48,7 @@ unprotect_smob (SCM *prot_cons)
       while (scm_is_pair (next)
             && scm_car (next) == SCM_UNDEFINED)
 
-       {
-         next = scm_cdr (next);
-       }
+       next = scm_cdr (next);
 
       scm_set_cdr_x (*prot_cons, next);
     }