]> git.donarmstrong.com Git - lilypond.git/blobdiff - input/test/count-systems.ly
* input/test/chord-names-jazz.ly:
[lilypond.git] / input / test / count-systems.ly
index 4f3fb803ce67705d674399ff3591e3fbc653230f..37a612a4b1d156393531e1f13168bbcf973b52ea 100644 (file)
@@ -7,9 +7,19 @@ The function which controls the printing of the system number may be also
 overridden to print, for example, the number of systems or the system
 number of a grob.
 " }
+
 % Original comment has no sense? -HJJ:
 % This can be most useful to assertain that a piece uses a specified number of lines.
 
+%% What is the problem? -- jcn:
+%% See, eg, input/mutopia/J.S.Bach/baerenreiter-sarabande.ly for
+%% an application:
+
+%% We want this to perfectly match the Baerenreiter spacing.
+%% If we're not using 6 systems, there's definately a problem.
+%% #(define (assert-system-count smob n) ...
+
+
 #(define (display-systemno smob)
   (let* ((this-system (ly:grob-system smob))
         (systems (ly:spanner-broken-into