Bug#943905: gnutls28 FTCBFS during guile bindings

[Helmut Grohne]

Source: gnutls28
Version: 3.6.10-3
Severity: important
User: debian-cross at lists.debian.org
Usertags: ftcbfs

gnutls28 startes failing to cross build in the version above:

http://crossqa.debian.net/build/gnutls28_3.6.10-3_ppc64el_20191031081945.log
| /bin/mkdir -p "`dirname "modules/gnutls.go"`" ;   \
| : && out=1 || out=- ;     \
| unset GUILE_LOAD_COMPILED_PATH ; LC_ALL=C   \
| GNUTLS_GUILE_EXTENSION_DIR="/<<PKGBUILDDIR>>/b4deb/guile/src" \
| /usr/bin/guild compile --target="powerpc64le-unknown-linux-gnu"    \
|   -L "../guile/modules"    \
|   -L "../../guile/modules"    \
|   -Wformat -Wunbound-variable -Warity-mismatch   \
|   -o "modules/gnutls.go" "modules/gnutls.scm" >&$out
| ;;; note: auto-compilation is enabled, set GUILE_AUTO_COMPILE=0
| ;;;       or pass the --no-auto-compile argument to disable.
| ;;; compiling /usr/bin/guild
| ;;; WARNING: compilation of /usr/bin/guild failed:
| ;;; failed to create path for auto-compiled file "/usr/bin/guild"
| Backtrace:
| In ice-9/boot-9.scm:
|     705:2 19 (call-with-prompt _ _ #<procedure default-prompt-handle?>)
| In ice-9/eval.scm:
|     619:8 18 (_ #(#(#<directory (guile-user) 5587ebf93140>)))
|     155:9 17 (_ _)
| In srfi/srfi-1.scm:
|     640:9 16 (for-each #<procedure 5587ec0fbf80 at scripts/compile.?> ?)
| In scripts/compile.scm:
|    264:26 15 (_ _)
| In system/base/target.scm:
|      57:6 14 (with-target _ _)
| In system/base/compile.scm:
|     152:6 13 (compile-file _ #:output-file _ #:from _ #:to _ #:env _ ?)
|      43:4 12 (call-once _)
| In ice-9/boot-9.scm:
|     841:4 11 (with-throw-handler _ _ _)
| In system/base/compile.scm:
|     59:11 10 (_)
|    155:11  9 (_ #<closed: file 5587ec0ec850>)
|    235:18  8 (read-and-compile #<input: gnutls.scm 13> #:from _ #:to ?)
|    183:32  7 (compile-fold (#<procedure compile-tree-il (x e opts)>) ?)
| In ice-9/boot-9.scm:
|    2312:4  6 (save-module-excursion #<procedure 5587ebec70c0 at lang?>)
| In language/scheme/compile-tree-il.scm:
|     31:15  5 (_)
| In ice-9/psyntax.scm:
|   1262:36  4 (expand-top-sequence ((eval-when (expand load eval) ?)) ?)
|   1209:24  3 (parse _ (("placeholder" placeholder)) ((top) #(# # ?)) ?)
|    285:10  2 (parse _ (("placeholder" placeholder)) ((top) #(# # ?)) ?)
| In unknown file:
|            1 (load-extension "/<<BUILDDIR>>/gnutls28-3.6.1?" ?)
| In ice-9/boot-9.scm:
|    752:25  0 (dispatch-exception _ _ _)
| 
| ice-9/boot-9.scm:752:25: In procedure dispatch-exception:
| In procedure dynamic-link: file: "/<<PKGBUILDDIR>>/b4deb/guile/src/guile-gnutls-v-2", message: "file not found"
| make[5]: *** [Makefile:2348: modules/gnutls.go] Error 1
| make[5]: Leaving directory '/<<PKGBUILDDIR>>/b4deb/guile'
| make[4]: *** [Makefile:1827: all-recursive] Error 1
| make[4]: Leaving directory '/<<PKGBUILDDIR>>/b4deb/guile'
| make[3]: *** [Makefile:1591: all-recursive] Error 1
| make[3]: Leaving directory '/<<PKGBUILDDIR>>/b4deb'
| make[2]: *** [Makefile:1518: all] Error 2
| make[2]: Leaving directory '/<<PKGBUILDDIR>>/b4deb'
| dh_auto_build: cd b4deb && make -j1 returned exit code 2
| make[1]: *** [debian/rules:72: override_dh_auto_build] Error 255
| make[1]: Leaving directory '/<<PKGBUILDDIR>>'
| make: *** [debian/rules:118: binary-arch] Error 2
| dpkg-buildpackage: error: debian/rules binary-arch subprocess returned exit status 2

This is bad as we need to cross build gnutls28 for bootstrapping
architectures (-> severity important). I looked into it and I couldn't
figure out how to fix it given my lack of guile knowledge.

Andreas or Rob, can one of you figure out how to make this work? I've
also Cc'ed debian-cross at l.d.o for help. We know that guile supports
cross building in principle.

In the absence of a solution, I propose adding a build profile
"pkg.gnutls28.noguile" to disable the gnutls-guile package. I do prefer
working with as few build profiles as possible though.

What is your preference here? A build profile or fixing the cross build?

Helmut