X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=scm%2Fdefine-grob-interfaces.scm;h=23d200ebde905434de288e8fc10365f8eecf898f;hb=b3f0c2f6c352a850f03dc44a947776199eb3fa0b;hp=8b0dde24f84f86b642aa3c9a4c178ff5c2908289;hpb=2d532bb826559cdb52f1414dabefd23efdbc91a4;p=lilypond.git diff --git a/scm/define-grob-interfaces.scm b/scm/define-grob-interfaces.scm index 8b0dde24f8..23d200ebde 100644 --- a/scm/define-grob-interfaces.scm +++ b/scm/define-grob-interfaces.scm @@ -1,8 +1,8 @@ -;;;; interface-description.scm -- part of generated backend documentation +;;;; define-grob-interfaces.scm -- part of generated backend documentation ;;;; ;;;; source file of the GNU LilyPond music typesetter ;;;; -;;;; (c) 1998--2007 Han-Wen Nienhuys +;;;; (c) 1998--2009 Han-Wen Nienhuys ;;;; Jan Nieuwenhuizen @@ -15,6 +15,11 @@ note)." '()) +(ly:add-interface + 'ambitus-interface + "The line between note heads for a pitch range." + '(gap note-heads thickness)) + (ly:add-interface 'bass-figure-interface "A bass figure text." @@ -61,6 +66,11 @@ note)." "Keep track of durations in a run of grace notes." '(columns common-shortest-duration)) +(ly:add-interface + 'instrument-specific-markup-interface + "Instrument-specific markup (like fret boards or harp pedal diagrams)." + '(fret-diagram-details harp-pedal-details size thickness)) + (ly:add-interface 'key-cancellation-interface "A key cancellation." @@ -104,7 +114,7 @@ note)." (ly:add-interface 'note-name-interface "Note names." - '(style)) + '()) (ly:add-interface 'only-prebreak-interface @@ -119,7 +129,7 @@ note)." (ly:add-interface 'percent-repeat-interface "Beat, Double and single measure repeats." - '(slope thickness)) + '(dot-negative-kern slash-negative-kern slope thickness)) (ly:add-interface 'piano-pedal-interface @@ -162,11 +172,10 @@ interesting enough to maintain a hara-kiri staff." "A right hand finger instruction." '(digit-names)) -;;; todo: this is not typesetting info. Move to interpretation. (ly:add-interface - 'tablature-interface - "An interface for any notes set in a tablature staff." - '()) + 'system-start-text-interface + "Text in front of the system." + '(long-text self-alignment-X self-alignment-Y text)) (ly:add-interface 'trill-spanner-interface