Re: [Lilypond-auto] Issue 2790 in lilypond: Patch: bar-line interface part 2/2

[lilypond]

Updates:
        Status: Started

Comment #16 on issue 2790 by address@hidden: Patch: bar-line interface  
part 2/2
http://code.google.com/p/lilypond/issues/detail?id=2790

Hmm, ok, took a bit of doing (I ended up doing a make test with one CPU so  
I could more easily find the offending snippet).

--snip--
Processing  
`/home/jlowe/lilypond-git/build/out/lybook-testdb/1e/lily-38d61aac.ly
'
Parsing...
Renaming input to:  
`/home/jlowe/lilypond-git/input/regression/bar-number-volta-r
epeat.ly'
Interpreting music...[8][16]
Preprocessing graphical objects...
Interpreting music...[8][16]
Preprocessing graphical objects...
Calculating line breaks...
Drawing systems... Backtrace:
In /home/jlowe/lilypond-git/build/out/share/lilypond/current/scm/lily.scm:
 796:  2* [lilypond-all #]
 809:  3  (let* ((failed #) (separate-logs #) (ping-log #) ...) (gc) ...)
 820:  4* [for-each #<procedure #f #> #]
In unknown file:
   ?:  5* [#<procedure #f (x)> "1e/lily-38d61aac.ly"]
In /home/jlowe/lilypond-git/build/out/share/lilypond/current/scm/lily.scm:
 822:  6* (let* (# # #) (if separate-logs #) (if ping-log #) ...)
 833:  7* [lilypond-file #<procedure #f (key  
failed-file)> "1e/lily-38d61aac.ly"
]
 869:  8  [catch ly-file-failed #<procedure #f ()> #<procedure #f (x .  
args)>]
In unknown file:
   ?:  9* [#<procedure #f ()>]
In /home/jlowe/lilypond-git/build/out/share/lilypond/current/scm/lily.scm:
 870: 10* [ly:parse-file "1e/lily-38d61aac.ly"]
In /home/jlowe/lilypond-git/build/out/share/lilypond/current/ly/init.ly:
  86: 11* (let* ((book-handler #)) (cond (# #) (# #)))
  89: 12  (cond (# #) (# #))
In  
/home/jlowe/lilypond-git/build/out/share/lilypond/current/scm/lily-library.sc
m:
...
 213: 13  [ly:book-process-to-systems #<Book> #< Output_def> ...]
In unknown file:
   ?: 14* [ly:side-position-interface::move-to-extremal-staff #]
   ?: 15* [ly:axis-group-interface::width #<Grob VoltaBracketSpanner >]
   ?: 16* [ly:grob::stencil-width #<Grob VoltaBracket >]
   ?: 17* [ly:volta-bracket-interface::print #<Grob VoltaBracket >]
   ?: 18* [ly:volta-bracket::calc-shorten-pair #<Grob VoltaBracket >]
In  
/home/jlowe/lilypond-git/build/out/share/lilypond/current/scm/bar-line.scm:
 888: 19* (let* (# # # # ...) (set! left-shorten #) (set! right-shorten  
#) ...)
 902: 20* (if (> bar-array-length 0) (ly:grob-array-ref bar-array #) (quote  
()))
 903: 21  [ly:grob-array-ref # {3/2}]

/home/jlowe/lilypond-git/build/out/share/lilypond/current/scm/bar-line.scm:903:3
0: In procedure ly:grob-array-ref in expression (ly:grob-array-ref  
bar-array (/
bar-array-length 2)):
/home/jlowe/lilypond-git/build/out/share/lilypond/current/scm/bar-line.scm:903:3
0: Wrong type argument in position 2 (expecting integer): 3/2

--snip--

Now, '1e/lily-38d61aac.ly' turns out to be:

\sourcefilename "/home/jlowe/lilypond-git/input/regression/bar-number-volta-repe
at.ly"
\sourcefileline 0
\version "2.16.0"

\header {
  texidoc = "Bar numbers can automatically reset at volta repeats.
"
}

musicWithBarNumberCheck =
#(define-music-function (parser location n)
  (integer?)
#{
  \relative c' {
    \override Score.BarNumber #'break-visibility = #'#(#t #t #t)
    \repeat volta 28 {
     c1 |
     c |
     c |
    }
    \alternative {
        << { c \barNumberCheck #n c } \\ { e e } >>
      {
        c \barNumberCheck #n c |
      }
      {
        c \barNumberCheck #n c |
      }
    }
    c c
  }
#})

{
  \set Score . alternativeNumberingStyle = #'numbers
  \musicWithBarNumberCheck #5
  \musicWithBarNumberCheck #12
}
{ \set Score . alternativeNumberingStyle = #'numbers-with-letters
  \musicWithBarNumberCheck #5
  \musicWithBarNumberCheck #12
}




% ****************************************************************
% end ly snippet
% ****************************************************************
---

Hope this helps :)