checking exact (guile cvs).
* scm/*: Escape backslashes in scheme strings (guile cvs).
+2004-01-10 Jan Nieuwenhuizen <janneke@gnu.org>
+
+ * lily/paper-outputter.cc (output_scope): Check if number before
+ checking exact (guile cvs).
+
+ * scm/*: Escape backslashes in scheme strings (guile cvs).
+
2004-01-10 Han-Wen Nienhuys <hanwen@xs4all.nl>
* Documentation/user/refman.itely (Tablatures basic): annotate
{
output_String_def (prefix + s, ly_scm2string (v));
}
- else if (scm_exact_p (v) == SCM_BOOL_T)
+ else if (scm_number_p (v) == SCM_BOOL_T && scm_exact_p (v) == SCM_BOOL_T)
{
output_int_def (prefix + s, gh_scm2int (v));
}
(define (override-property-setting context context-prop setting value)
- "Like the C++ code that executes \override, but without type
+ "Like the C++ code that executes \\override, but without type
checking. "
(ly:set-context-property! context context-prop
;; fixme we should standardize on omit-root (or the other one.)
;; perhaps the default should also be reversed --hwn
(define-public (sequential-music-to-chord-exceptions seq . rest)
- "Transform sequential music SEQ of type <<c d e>>-\markup{ foobar }
+ "Transform sequential music SEQ of type <<c d e>>-\\markup{ foobar }
to (cons CDE-PITCHES FOOBAR-MARKUP), or to (cons DE-PITCHES
FOOBAR-MARKUP) if OMIT-ROOT is given and non-false.
"
Offset callbacks can be stacked, i.e.
@example
- \property .... \override #'Y-offset-callbacks = #(list
+ \\property .... \\override #'Y-offset-callbacks = #(list
callback1 callback2 callback3)
@end example
(grob-property-description 'linea boolean? "attach vertical lines to this neume?.")
(grob-property-description 'line-count integer? "Number of staff
lines. If you want to override this for staffs individually, you must
-use @code{\outputproperty}. @code{\property .. \override} will not
-work: @code{\override} is processed after the StaffSymbol is created,
+use @code{\\outputproperty}. @code{\\property .. \\override} will not
+work: @code{\\override} is processed after the StaffSymbol is created,
and will have no effect.
")
(grob-property-description 'maximum-rest-count integer? "kill off rests so we don't more than this number left.")
"The function to run with \\applycontext. It must take a single argument, being the context.")
(music-property-description 'property-operations list?
"Do these operations for instantiating the context.")
-(music-property-description 'predicate procedure? "the predicate of a \outputproperty")
+(music-property-description 'predicate procedure? "the predicate of a \\outputproperty")
(music-property-description 'type symbol? "The type of this music object. Determines iteration in some cases.")
(music-property-description 'types list? "The types of this music object. Determines iteration in some cases.")
(music-property-description 'repeat-count integer? "do a @code{\repeat} how ofen?")
(AbsoluteDynamicEvent
. (
(description . "Creates a dynamic mark. Syntax: @var{note}@code{\\x},
-where x is one of \@\{\\ppp, \\pp, \\p, \\mp, \\mf, \\f, \\ff, \\fff.\@\}")
+where x is one of \\@\\{\\ppp, \\pp, \\p, \\mp, \\mf, \\f, \\ff, \\fff.\\@\\}")
(internal-class-name . "Event")
(types . (general-music event dynamic-event absolute-dynamic-event))
))
))
(MarkEvent
. (
- (description . "Insert a rehearsal mark. Syntax: @code{\mark} @var{marker},
+ (description . "Insert a rehearsal mark. Syntax: @code{\\mark} @var{marker},
e.g. @code{\\mark \"A\"}.")
(internal-class-name . "Event")
. (
(description . "Set a context property.
-Syntax: @code{\property @var{context}.@var{prop} = @var{scheme-val}}.")
+Syntax: @code{\\property @var{context}.@var{prop} = @var{scheme-val}}.")
(internal-class-name . "Music")
(types . (layout-instruction general-music))
(iterator-ctor . ,Property_iterator::constructor)
(PropertyUnset
. (
- (description . "Remove the definition of a context @code{\property}.")
+ (description . "Remove the definition of a context @code{\\property}.")
(internal-class-name . "Music")
(types . (layout-instruction general-music))
(translator-property-description 'explicitKeySignatureVisibility
procedure? "visibility-lambda function for explicit Key changes;
-\override of #'break-visibility will set the visibility for normal
+\\override of #'break-visibility will set the visibility for normal
(ie. at the start of the line) key signatures.")
(translator-property-description 'extraNatural boolean? "Whether to typeset an
This will create a start-repeat bar in this staff only.
-If not set explicitly (by property or @code{\bar}), this is set
+If not set explicitly (by property or @code{\\bar}), this is set
according to values of @code{defaultBarType}, @code{barAlways},
@code{barNonAuto} and @code{measurePosition}.
(define-public (context-spec-music m context . rest)
- "Add \context CONTEXT = foo to M. "
+ "Add \\context CONTEXT = foo to M. "
(let* ((cm (make-music-by-name 'ContextSpeccedMusic)))
(ly:set-mus-property! cm 'element m)
))
(define-public (glue-mm-rest-texts music)
- "Check if we have R1*4-\markup { .. }, and if applicable convert to
+ "Check if we have R1*4-\\markup { .. }, and if applicable convert to
a property set for MultiMeasureRestNumber."
(define (script-to-mmrest-text script-music)
3. The command is now available in markup mode, e.g.
- \markup { .... \COMMAND #1 argument ... }
+ \\markup { .... \\COMMAND #1 argument ... }
BUGS:
(define-public (override-markup paper props . rest)
"Tack the 1st arg in REST onto PROPS, e.g.
-\override #'(font-family . married) \"bla\"
+\\override #'(font-family . married) \"bla\"
"
(define-public (strut-markup paper props . rest)
- "Syntax: \strut
+ "Syntax: \\strut
A box of the same height as the space.
"