]> git.donarmstrong.com Git - lilypond.git/blobdiff - lily/music-function-scheme.cc
Run astyle 2.02.
[lilypond.git] / lily / music-function-scheme.cc
index e87872caaca3bb6802c36ba2fd33aead726ddf55..93c7e0fbc4773cbc121ca45779b1c71db26c8c96 100644 (file)
@@ -26,17 +26,17 @@ LY_DEFINE (ly_make_music_function, "ly:make-music-function", 2, 0, 0,
 {
   LY_ASSERT_TYPE (ly_is_list, signature, 1);
   LY_ASSERT_TYPE (ly_is_procedure, func, 2);
-  int n=0;
+  int n = 0;
   for (SCM p = signature; scm_is_pair (p); p = scm_cdr (p), ++n)
     {
       SCM proc = scm_car (p);
       if (scm_is_pair (proc))
-       proc = scm_car (proc);
+        proc = scm_car (proc);
       if (scm_is_false (scm_procedure_p (proc)))
-       {
-         scm_wrong_type_arg_msg ("music-function", n, p,
-                                 "music function predicate");
-       }
+        {
+          scm_wrong_type_arg_msg ("music-function", n, p,
+                                  "music function predicate");
+        }
     }
 
   return make_music_function (signature, func);