[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: Issue 1320: Rewriting bar-line::print
From: |
David Kastrup |
Subject: |
Re: Issue 1320: Rewriting bar-line::print |
Date: |
Tue, 20 Mar 2012 11:07:21 +0100 |
User-agent: |
Gnus/5.13 (Gnus v5.13) Emacs/24.0.94 (gnu/linux) |
Marc Hohl <address@hidden> writes:
> Am 20.03.2012 10:19, schrieb David Kastrup:
>> Marc Hohl<address@hidden> 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?
> IIUC, ly:staff-symbol::height returns an interval
> (according to the definition in lily/staff-symbol.cc)
I stand corrected.
--
David Kastrup
Re: Issue 1320: Rewriting bar-line::print, David Kastrup, 2012/03/20
Re: Issue 1320: Rewriting bar-line::print, Nicolas Sceaux, 2012/03/21