Docs: (IR) Ensure all properties have type name strings.

- add missing (type-predicate . name) pairs to type-p-name-alist
- correct predicate for 'digit-names

diff --git a/scm/define-grob-properties.scm b/scm/define-grob-properties.scm
index f95b1d20d374f320049c30c0572abe9a9c24c897..fd66a4968e485ec30da10abb21fcef4bde62a1b6 100644 (file)
--- a/scm/define-grob-properties.scm
+++ b/scm/define-grob-properties.scm
@@ -192,7 +192,7 @@ positions.")
 More information on the allowed parameters for a grob can be found by 
 looking at the top of the Internals Reference page for each interface
 having a @code{details} property.")
-     (digit-names ,vector "Names for string finger digits.")
+     (digit-names ,vector? "Names for string finger digits.")
      (direction ,ly:dir? "If @code{side-axis} is @code{0} (or
 @code{#X}), then this property determines whether the object is placed
 @code{#LEFT}, @code{#CENTER} or @code{#RIGHT} with respect to the

diff --git a/scm/lily.scm b/scm/lily.scm
index d62c70bb0ff471637ce3aabe05f7c01fc40e1295..270ed42e1c81c5cea61d249bd4e77d1753450715 100644 (file)
--- a/scm/lily.scm
+++ b/scm/lily.scm
@@ -405,8 +405,8 @@ LilyPond safe mode.  The syntax is the same as `define*-public'."
 (for-each ly:load init-scheme-files)
 
 (set! type-p-name-alist
-      `((,boolean-or-symbol? . "boolean or symbol")
-       (,boolean? . "boolean")
+      `((,boolean? . "boolean")
+       (,boolean-or-symbol? . "boolean or symbol")
        (,char? . "char")
        (,grob-list? . "list of grobs")
        (,hash-table? . "hash table")
@@ -417,17 +417,21 @@ LilyPond safe mode.  The syntax is the same as `define*-public'."
        (,ly:dimension? . "dimension, in staff space")
        (,ly:dir? . "direction")
        (,ly:duration? . "duration")
+       (,ly:font-metric? . "font metric")
        (,ly:grob? . "layout object")
+       (,ly:grob-array? . "array of grobs")
        (,ly:input-location? . "input location")
        (,ly:moment? . "moment")
        (,ly:music? . "music")
+       (,ly:music-list? . "list of music objects")
+       (,ly:music-output? . "music output")
        (,ly:pitch? . "pitch")
        (,ly:translator? . "translator")
-       (,ly:font-metric? . "font metric")
        (,ly:simple-closure? . "simple closure")
+       (,ly:skyline-pair? . "pair of skylines")
+       (,ly:stencil? . "stencil")
        (,markup-list? . "list of markups")
        (,markup? . "markup")
-       (,ly:music-list? . "list of music")
        (,number-or-grob? . "number or grob")
        (,number-or-string? . "number or string")
        (,number-pair? . "pair of numbers")