HEAD at 73c791b8f3124b20e9bdd66428dbdf481ee12921 fails

[ng0 <ng0@pragmatique.xyz>]

Just wanted to rebuild, when I hit this:

   LOAD     (gnu services web)
;;; note: source file ./gnu/services/web.scm
;;;       newer than compiled /home/user/src/guix/guix/gnu/services/web.go
   LOAD     (gnu system)
   LOAD     (gnu system grub)
   LOAD     (gnu tests base)
;;; note: source file ./gnu/tests/base.scm
;;;       newer than compiled /home/user/src/guix/guix/gnu/tests/base.go
Backtrace:
In ice-9/boot-9.scm:
   2986:16 19 (try-module-autoload _ _)
    2316:4 18 (save-module-excursion #<procedure 3fa43f0 at ice-9/boo…>)
   3006:22 17 (_)
In unknown file:
           16 (primitive-load-path "gnu/tests/base" #<procedure 3e560…>)
In ice-9/eval.scm:
    721:20 15 (primitive-eval (define-module (gnu tests base) # (…) …))
In ice-9/psyntax.scm:
   1234:36 14 (expand-top-sequence ((define-module (gnu tests #) # …)) …)
   1181:24 13 (parse _ (("placeholder" placeholder)) ((top) #(# # …)) …)
    284:10 12 (parse _ (("placeholder" placeholder)) (()) _ c&e (eval) …)
In ice-9/eval.scm:
    293:34 11 (_ #<module (#{ g562}#) 66013c0>)
In ice-9/boot-9.scm:
    2866:4 10 (define-module* _ #:filename _ #:pure _ #:version _ # _ …)
   2075:24  9 (call-with-deferred-observers #<procedure 3e53870 at ic…>)
   2879:24  8 (_)
    230:17  7 (map1 (((gnu tests)) ((gnu system)) ((gnu system #)) # …))
   2792:17  6 (resolve-interface (gnu tests) #:select _ #:hide _ # _ # …)
   2718:10  5 (_ (gnu tests) _ _ #:ensure _)
   2986:16  4 (try-module-autoload _ _)
    2316:4  3 (save-module-excursion #<procedure 3800360 at ice-9/boo…>)
   3006:22  2 (_)
In unknown file:
            1 (primitive-load-path "gnu/tests" #<procedure 3e867c0 at…>)
In gnu/tests.scm:
    208:16  0 (_)

gnu/tests.scm:208:16: gnu/tests.scm:208:16: In procedure allocate-struct: 
Wrong type argument in position 2: 6

Some deprecated features have been used.  Set the environment
variable GUILE_WARN_DEPRECATED to "detailed" and rerun the
program to get more information.  Set it to "no" to suppress
this message.
make[2]: *** [Makefile:5148: make-go] Error 1
make[2]: Leaving directory '/home/user/src/guix/guix'
make[1]: *** [Makefile:4275: all-recursive] Error 1
make[1]: Leaving directory '/home/user/src/guix/guix'
make: *** [Makefile:2865: all] Error 2