scm/grob-description.scm: idem.
+2002-04-12 Han-Wen Nienhuys <hanwen@cs.uu.nl>
+
+ * lily/*.cc: add some undocced properties.
+ scm/grob-description.scm: idem.
+
2002-04-12 Heikki Junes <hjunes@cc.hut.fi>
* lilypond-font-lock.el: Handle slurs \( and \), numbers,
@lilypondfile[printfilename]{glissando.ly}
-@lilypondfile[printfilename]{fingering.ly}
+@c @l ilypondfile[printfilename]{fingering.ly}
@section Dynamics
@lilypondfile[printfilename]{spacing-stem-same-direction.ly}
-@lilypondfile[printfilename]{spacing-individual-tuning.ly}
+@c @l ilypondfile[printfilename]{spacing-individual-tuning.ly}
@lilypondfile[printfilename]{spacing-note-flags.ly}
Here's how you'd specify a weird looking beam that instead of being
horizontal, falls two staff spaces:
+
+[FIXME]
+
+
@lilypond[fragment,relative,verbatim]
\property Voice.Beam \set #'staff-position = #4
\property Voice.Beam \set #'height = #-4
[c8 c]
@end lilypond
+[TODO: doc autokneeing ? ]
+
@c TODO -> why this ref? Document?
@cindex @code{neutral-direction}
PACKAGE_NAME=LilyPond
MAJOR_VERSION=1
MINOR_VERSION=5
-PATCH_LEVEL=51
-MY_PATCH_LEVEL=hjj4
+PATCH_LEVEL=52
+MY_PATCH_LEVEL=
# use the above to send patches: MY_PATCH_LEVEL is always empty for a
+++ /dev/null
-/*
- bass-figure.cc
- */
-
-
-
-
ADD_INTERFACE (Chord_name, "chord-name-interface",
"generate a chord name",
- "pitches chord inversion bass begin-of-line-visible");
+ "pitches chord chord-name-function inversion bass begin-of-line-visible");
ADD_INTERFACE (Paper_column, "paper-column-interface",
"",
- "between-cols when bounded-by-me shortest-playing-duration shortest-starter-duration");
+ "between-cols between-system-string when bounded-by-me shortest-playing-duration shortest-starter-duration");
ADD_INTERFACE (Rest,"rest-interface",
"a rest",
- "style");
+ "style minimum-beam-collision-distance");
Pointer_group_interface::add_grob (spacing_p_, ly_symbol2scm ("wishes"), i.grob_l_);
}
- if (to_boolean (i.grob_l_->get_grob_property ("non-rhythmic")))
+ if (i.grob_l_->internal_has_interface (ly_symbol2scm ("lyric-syllable-interface")))
return;
/*
MinimumVerticalExtent = ##f
ExtraVerticalExtent = ##f
VerticalExtent = ##f
-
- VerticalAxisGroup \override #'invisible-staff = ##t
}
+
(define (brew-bass-figure grob)
"Make a molecule for a Figured Bass grob"
(let* (
(padding (ly-get-grob-property grob 'padding))
(kerning (ly-get-grob-property grob 'kern))
(thickness (*
- (ly-get-paper-variable grob 'stafflinethickness)
+ (ly-get-paper-variable grob 'linethickness)
(ly-get-grob-property grob 'thickness))
)
)
mol
))
+
+(ly-add-interface
+'bass-figure-interface
+ "A bass figure, including bracket"
+ '(padding thickness ))
(padding . 0.1)
(kern . 0.2)
(thickness . 1.0)
- (meta . ((interfaces . (text-interface self-alignment-interface font-interface))))
+ (meta . ((interfaces . (text-interface bass-figure-interface self-alignment-interface font-interface))))
))
(Beam
. (
(molecule-callback . ,Text_item::brew_molecule)
(X-offset-callbacks . (,Self_alignment_interface::aligned_on_self))
(self-alignment-X . 0)
- (non-rhythmic . #t)
(word-space . 0.6)
(ignore-length-mismatch . #f)
(begin-alignment . 4)
(edge-height . (1.0 . 1.0))
(shorten-pair . (0.0 . 0.0))
(thickness . 1.0)
- (meta . ((interfaces . (piano-pedal-interface))))
+ (meta . ((interfaces . (text-spanner-interface piano-pedal-interface))))
))
(RepeatSlash
(grob-property-description 'grace-space-factor number? "space grace at this fraction of the increment.")
(grob-property-description 'position-callbacks list? "list of
functions set spanner positions.")
+(grob-property-description 'chord-name-function procedure? "DOCME")
+(grob-property-description 'minimum-beam-collision-distance number?
+"Minimum distance to beam for a rest collision.")