Marc Hohl <m...@hohlart.de> writes: > Hello list, > > I want to rewrite most if not all definitions currently settled in > lily/bar-line.cc in scheme. Please see the attached file for my > progress so far; I don't get any error messages, but no bar lines either :-( > > Is this a feasible approach? What am I currently doing wrong? > > Thanks for any pointers, > > Marc > \version "2.15.34" > > #(define (bar-line::calc-bar-extent grob) > (let ((staff-symbol (ly:grob-object grob 'staff-symbol)) > (staff-extent (cons 0 0))) > > (if (ly:grob? staff-symbol) > (let* ((bar-line-color (ly:grob-property grob 'color)) > (staff-color (ly:grob-property staff-symbol 'color)) > (radius (ly:staff-symbol-staff-radius grob)) > (line-thickness (ly:staff-symbol-line-thickness grob))) > > (set! staff-extent (ly:staff-symbol::height staff-symbol))
Shouldn't staff-extent be a cons/interval? -- David Kastrup _______________________________________________ lilypond-devel mailing list lilypond-devel@gnu.org https://lists.gnu.org/mailman/listinfo/lilypond-devel
