X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=scm%2Fdefine-grob-interfaces.scm;h=4ffd761607c788feef67edba4b1b1e5522bf78fb;hb=0b544cfb7332615ef809b71b57ab656741311ae1;hp=6068579995115078b81526a2793326f97c285de3;hpb=0c6b9c0a459a2116e028f533ef978bf7d918ef00;p=lilypond.git diff --git a/scm/define-grob-interfaces.scm b/scm/define-grob-interfaces.scm index 6068579995..4ffd761607 100644 --- a/scm/define-grob-interfaces.scm +++ b/scm/define-grob-interfaces.scm @@ -1,6 +1,6 @@ ;;;; This file is part of LilyPond, the GNU music typesetter. ;;;; -;;;; Copyright (C) 1998--2012 Han-Wen Nienhuys +;;;; Copyright (C) 1998--2014 Han-Wen Nienhuys ;;;; Jan Nieuwenhuizen ;;;; ;;;; LilyPond is free software: you can redistribute it and/or modify @@ -34,7 +34,11 @@ note)." (ly:add-interface 'ambitus-interface "The line between note heads for a pitch range." - '(gap note-heads thickness)) + '(gap + length-fraction + maximum-gap + note-heads + thickness)) (ly:add-interface 'bar-line-interface @@ -46,8 +50,17 @@ The list of allowed glyphs and predefined bar lines can be found in @file{scm/bar-line.scm}. @code{gap} is used for the gaps in dashed bar lines." - '(allow-span-bar bar-extent gap glyph glyph-name has-span-bar - hair-thickness kern rounded thin-kern thick-thickness)) + '(allow-span-bar + bar-extent + gap + glyph + glyph-name + hair-thickness + has-span-bar + kern + rounded + thin-kern + thick-thickness)) (ly:add-interface 'bass-figure-interface @@ -62,7 +75,15 @@ found in @file{scm/bar-line.scm}. (ly:add-interface 'bend-after-interface "A doit or drop." - '(thickness delta-position)) + '(delta-position + thickness)) + +(ly:add-interface + 'clef-modifier-interface + "The number describing transposition of the clef, placed below +or above clef sign. Usually this is 8 (octave transposition) +or 15 (two octaves), but LilyPond allows any integer here." + '()) (ly:add-interface 'dynamic-interface @@ -105,23 +126,28 @@ found in @file{scm/bar-line.scm}. (ly:add-interface 'footnote-spanner-interface "Make a footnote spanner." - '(footnote-text spanner-placement)) + '(footnote-text + spanner-placement)) (ly:add-interface 'fret-diagram-interface "A fret diagram" - '(align-dir fret-diagram-details size dot-placement-list + '(align-dir + dot-placement-list + fret-diagram-details + size thickness)) (ly:add-interface - 'glissando-interface - "A glissando." - '(glissando-index)) + 'glissando-interface + "A glissando." + '(glissando-index)) (ly:add-interface 'grace-spacing-interface "Keep track of durations in a run of grace notes." - '(columns common-shortest-duration)) + '(columns + common-shortest-duration)) (ly:add-interface 'inline-accidental-interface @@ -172,7 +198,8 @@ accidentals)." (ly:add-interface 'measure-counter-interface "A counter for numbering measures." - '(columns count-from)) + '(columns + count-from)) (ly:add-interface 'metronome-mark-interface @@ -189,28 +216,34 @@ accidentals)." "Note names." '()) -(ly:add-interface - 'octavate-eight-interface - "Interface that permits the nominal identification of the octavian -annotation that multiplies by two the freqency of the pitches present -in a given staff were they played on a clef that lacked said octavian -annotation." - '()) - (ly:add-interface 'only-prebreak-interface "Kill this grob after the line breaking process." '()) +(ly:add-interface + 'outside-staff-axis-group-interface + "A vertical axis group on which outside-staff skyline calculations are done." + '(outside-staff-placement-directive vertical-skyline-elements)) + +(ly:add-interface + 'outside-staff-interface + "A grob that could be placed outside staff." + '(outside-staff-horizontal-padding outside-staff-padding outside-staff-priority)) + (ly:add-interface 'parentheses-interface "Parentheses for other objects." - '(padding stencils)) + '(padding + stencils)) (ly:add-interface 'percent-repeat-interface "Beat, Double and single measure repeats." - '(dot-negative-kern slash-negative-kern slope thickness)) + '(dot-negative-kern + slash-negative-kern + slope + thickness)) (ly:add-interface 'piano-pedal-interface @@ -236,15 +269,20 @@ interesting enough to maintain a hara-kiri staff." (ly:add-interface 'spacing-options-interface "Supports setting of spacing variables." - '(spacing-increment shortest-duration-space)) + '(spacing-increment + shortest-duration-space)) (ly:add-interface 'span-bar-interface "A bar line that is spanned between other barlines. This interface is used for bar lines that connect different staves." - '(glyph-name elements pure-Y-common pure-relevant-grobs - pure-relevant-items pure-relevant-spanners)) + '(glyph-name + elements + pure-Y-common + pure-relevant-grobs + pure-relevant-items + pure-relevant-spanners)) (ly:add-interface 'stanza-number-interface @@ -264,7 +302,10 @@ interesting enough to maintain a hara-kiri staff." (ly:add-interface 'system-start-text-interface "Text in front of the system." - '(long-text self-alignment-X self-alignment-Y text)) + '(long-text + self-alignment-X + self-alignment-Y + text)) (ly:add-interface 'tab-note-head-interface