Guile compat: do not use the "hash-table-as-vector" interface.

[lilypond.git] / scm / document-music.scm

diff --git a/scm/document-music.scm b/scm/document-music.scm
index 4df30649594057a60467af641c8fad47201d8eb5..93b7b362159280679725ec85ce09aa0a8d002057 100644 (file)
--- a/scm/document-music.scm
+++ b/scm/document-music.scm
@@ -28,7 +28,7 @@
           (texi (description-list->texi descs #f)))
       texi)))
 
-(define music-types->names (make-vector 61 '()))
+(define music-types->names (make-hash-table 61))
 (filter-map (lambda (entry)
              (let* ((class (ly:camel-case->lisp-identifier (car entry)))
                     (classes (ly:make-event-class class)))