(define (music-property-description symbol type? description)
(if (not (equal? #f (object-property symbol 'music-doc)))
(begin
- (ly:warn (string-append "Redefining " (symbol->string symbol) "\n"))
+ (ly:warn "Redefining ~S" symbol)
(exit 2)
))
(set-object-property! symbol 'music-type? type?)
(set-object-property! symbol 'music-doc description)
- symbol )
-
+ symbol)
(define-public all-music-properties
(map
TODO: consider making type into symbol")
(absolute-octave ,integer?
"The absolute octave for a octave check note.")
- (articulations ,music-list?
+ (articulations ,ly:music-list?
"Articulation events specifically for this note.")
(articulation-type ,string? "key for script definitions alist.
(compress-procedure ,procedure? "compress this music expression. Argument 1: the music, arg 2: factor")
(context-id ,string? "name of context")
(context-type ,symbol? "type of context")
+ (descend-only ,boolean? "If set, this @code{\\context} will only
+descend in the context tree.")
(denominator ,integer? "denominator in a time signature")
(digit ,integer? "digit for fingering")
(direction ,ly:dir? "Print this up or down?")
(drum-type ,symbol? "Which percussion instrument to play this note on.")
(tags ,list? "List of symbols that for denoting extra details,
-eg. @code{\\tag #'part ...} could tag a piece of music as only being active in a part.")
+e.g. @code{\\tag #'part ...} could tag a piece of music as only being active in a part.")
- (text-type ,symbol? "Particular type of text script (eg. finger, dynamic).")
+ (text-type ,symbol? "Particular type of text script (e.g. finger, dynamic).")
(tempo-unit ,ly:duration? "The unit for the metronome count.")
(tonic ,ly:pitch? "Base of the scale")
+ (error-found ,boolean? "If true, a parsing error was found in this expression")
(element ,ly:music? "The single child of a Music_wrapper music object, or the body of a repeat.")
- (elements ,music-list? "A list of elements for sequential of simultaneous music, or the alternatives of repeated music. ")
+ (elements ,ly:music-list? "A list of elements for sequential of simultaneous music, or the alternatives of repeated music. ")
(force-accidental ,boolean? "If set, a cautionary accidental should always be printed on this note")
(grob-property ,symbol? "The symbol of the grob property to set. ")
(grob-value ,scheme? "The value of the grob property to set")
(name ,symbol? "Name of this music object")
(numerator ,integer? "numerator of a time signature")
(once ,boolean? "Apply this operation only during one time step?")
- (octavation integer?
+ (octavation ,integer?
"This pitch was octavated by how many octaves?
For chord inversions, this is negative.")
(origin ,ly:input-location? "where was this piece of music defined?")
- (penalty ,number? "Penalty for break hint.")
+ (page-penalty ,number? "Penalty for page break hint.")
+ (penalty ,number? "Penalty for line break hint.")
(pitch ,ly:pitch? "the pitch of this note")
(pitch-alist ,list? "list of pitches jointly forming the scale of a key signature")
(pop-first ,boolean? "Do a revert before we try to do a override on some grob property.")
"The function to run with \\applycontext. It must take a single argument, being the context.")
(property-operations ,list?
"Do these operations for instantiating the context.")
- (predicate ,procedure? "the predicate of a \\outputproperty")
+ (predicate ,procedure? "the predicate of a \\outputproperty.")
+ (quoted-events ,vector? "A vector of with moment/event-list entries.")
+ (quoted-music-name ,string? "The name of the voice to quote.")
(type ,symbol? "The type of this music object. Determines iteration in some cases.")
(types ,list? "The types of this music
object; determines by what engraver this music expression is
"Change to what kind of state? Options are
solo1, solo2 and unisono")
- (figure ,string? "a `figure' (which may be
+ (figure ,markup? "a `figure' (which may be
a string) for figured bass")
(alteration ,number? "alteration for figured bass")
(bracket-start ,boolean? "start a bracket