components/library/guile/patches/set-dynamic-entsize.patch

   1 --- guile-2.2.6/module/system/vm/assembler.scm.~1~      2019-08-22 18:08:06.950457598 +0000
   2 +++ guile-2.2.6/module/system/vm/assembler.scm  2019-08-22 18:08:12.651998286 +0000
   3 @@ -1851,7 +1851,8 @@
   4        (set-uword! (- words 2) DT_NULL)
   5        (set-uword! (- words 1) 0)
   6        (make-object asm '.dynamic bv relocs '()
   7 -                   #:type SHT_DYNAMIC #:flags SHF_ALLOC)))
   8 +                   #:type SHT_DYNAMIC #:flags SHF_ALLOC
   9 +                   #:entsize (* 2 word-size))))
  10    (case (asm-word-size asm)
  11      ((4) (emit-dynamic-section 4 bytevector-u32-set! abs32/1))
  12      ((8) (emit-dynamic-section 8 bytevector-u64-set! abs64/1))