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

An upstream change from Guile (between 1.9.14 and 1.9.15) removes
support for "hash-table-as-vector" code.  This functionality was
deprecated.

diff --git a/scm/document-backend.scm b/scm/document-backend.scm
index 8a54a6a1e8550b7efd9bc17b78c6d223a252f110..4d55382fc40bfc6af449d2e11f1be6dcd537c01c 100644 (file)
--- a/scm/document-backend.scm
+++ b/scm/document-backend.scm
@@ -68,7 +68,7 @@
          (description-list->texi internal-propdocs #t))
         ""))))
 
-(define iface->grob-table (make-vector 61 '()))
+(define iface->grob-table (make-hash-table 61))
 ;; extract ifaces, and put grob into the hash table.
 (map
  (lambda (x)

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)))

diff --git a/scm/document-translation.scm b/scm/document-translation.scm
index 46606dcf0bd5ae89d2192119ac170ef84bb84c55..3e8c308d5b5a8a9a9657963c1d69e0f88192381c 100644 (file)
--- a/scm/document-translation.scm
+++ b/scm/document-translation.scm
@@ -113,7 +113,7 @@
     #:text (engraver-doc-string grav #t)))
 
 ;; Second level, part of Context description
-(define name->engraver-table (make-vector 61 '()))
+(define name->engraver-table (make-hash-table 61))
 (map
  (lambda (x)
    (hash-set! name->engraver-table (ly:translator-name x) x))