Re: New, more powerful version of \shape!

[David Kastrup]

Urs Liska <address@hidden> writes:

> Urs Liska <address@hidden> schrieb:
>>
>>
>>
>>
>>David Kastrup <address@hidden> schrieb:
>>>Janek Warchoł <address@hidden> writes:
>>>
>>>> Hi all,
>>>>
>>>> \shape is an awesome function, indispensable for creating
>>>> publication-quality slurs. However, after using it 1107 times in a
>>>> recent project (this number is not a joke!),
>>>
>>>Well, it should be.  It means that our slur shaping and quanting is
>>>apparently not doing its job.
>>>
>>>-- 
>>>David Kastrup
>>>
>>>
>>
>>Janek, can you come up with a reliable way of determining the total
>>number of slurs, ties etc in the project?
>
> Maybe with assistance from Frescobaldi's parser?

Probably easier to do with assistance from LilyPond's parser.

#(define slur-count 0)

oldSlur = (

"(" =
#(define-event-function (parser location) ()
  (set! slur-count (1+ slur-count))
  oldSlur)

...
#(format #t "\nSlur count: ~S\n" slur-count)

Now that's just the number of input slurs.  If you want the number of
output slurs, you probably would make an engraver.

-- 
David Kastrup