python-on-guile fails to compile

[Maxime Devos <maximedevos@telenet.be>]

[-- Attachment #1.1.1: Type: text/plain, Size: 5894 bytes --]

I noticed python-on-guile fails to compile in Guix, so I tried updating 
it, but it still fails (somehow 'type' is #false?):

Type is defined on line

https://gitlab.com/python-on-guile/python-on-guile/-/blob/master/modules/oop/pf-objects.scm#L1530

as #f but set to something later in

https://gitlab.com/python-on-guile/python-on-guile/-/blob/master/modules/oop/pf-objects.scm#L2494

I don't see what's the cause for it staying #false.

I did notice that some macros were defined multiple times (e.g. 
make-python-class), maybe that's somehow relevant.

starting phase `build'
Makefile:1467: warning: overriding recipe for target 'python'
Makefile:842: warning: ignoring old recipe for target 'python'
   GEN      language/python/adress.go
wrote `language/python/adress.go'
   GEN      language/python/guilemod.go
wrote `language/python/guilemod.go'
   GEN      language/python/module/sysconfig.go
wrote `language/python/module/sysconfig.go'
   GEN      oop/dict.go
wrote `oop/dict.go'
   GEN      oop/pf-objects.go
wrote `oop/pf-objects.go'
   GEN      language/python/module/gc.go
wrote `language/python/module/gc.go'
   GEN      language/python/module/_collections_abc.go
wrote `language/python/module/_collections_abc.go'
   GEN      language/python/module/load.go
wrote `language/python/module/load.go'
WARNING: Use of `load' in declarative module (language python module 
load).  Add #:declarative? #f to your define-module invocation.
   GEN      language/python/persist.go
wrote `language/python/persist.go'
   GEN      language/python/exceptions.go
wrote `language/python/exceptions.go'
   GEN      language/python/hash.go
wrote `language/python/hash.go'
   GEN      language/python/bool.go
wrote `language/python/bool.go'
   GEN      language/python/yield.go
wrote `language/python/yield.go'
   GEN      language/python/try.go
wrote `language/python/try.go'
   GEN      language/python/def.go
wrote `language/python/def.go'
   GEN      language/python/for.go
wrote `language/python/for.go'
   GEN      language/python/with.go
Backtrace:
In ice-9/boot-9.scm:
    222:29 19 (map1 (((ice-9 match)) ((ice-9 control)) ((ice-9 format)) 
((oop pf-objects)) ((oop goops)) ((oop dict) #:select (int py-mod-)) 
((language python hash)) ((language python tuple)) ((language python 
exceptions)) ((language python yield)) ((language python for)) 
((language python try)) ((language python bool)) ((language python 
exceptions)) ((language python persist))))
    222:29 18 (map1 (((ice-9 control)) ((ice-9 format)) ((oop 
pf-objects)) ((oop goops)) ((oop dict) #:select (int py-mod-)) 
((language python hash)) ((language python tuple)) ((language python 
exceptions)) ((language python yield)) ((language python for)) 
((language python try)) ((language python bool)) ((language python 
exceptions)) ((language python persist))))
    222:29 17 (map1 (((ice-9 format)) ((oop pf-objects)) ((oop goops)) 
((oop dict) #:select (int py-mod-)) ((language python hash)) ((language 
python tuple)) ((language python exceptions)) ((language python yield)) 
((language python for)) ((language python try)) ((language python bool)) 
((language python exceptions)) ((language python persist))))
    222:29 16 (map1 (((oop pf-objects)) ((oop goops)) ((oop dict) 
#:select (int py-mod-)) ((language python hash)) ((language python 
tuple)) ((language python exceptions)) ((language python yield)) 
((language python for)) ((language python try)) ((language python bool)) 
((language python exceptions)) ((language python persist))))
    222:29 15 (map1 (((oop goops)) ((oop dict) #:select (int py-mod-)) 
((language python hash)) ((language python tuple)) ((language python 
exceptions)) ((language python yield)) ((language python for)) 
((language python try)) ((language python bool)) ((language python 
exceptions)) ((language python persist))))
    222:29 14 (map1 (((oop dict) #:select (int py-mod-)) ((language 
python hash)) ((language python tuple)) ((language python exceptions)) 
((language python yield)) ((language python for)) ((language python 
try)) ((language python bool)) ((language python exceptions)) ((language 
python persist))))
    222:17 13 (map1 (((language python hash)) ((language python tuple)) 
((language python exceptions)) ((language python yield)) ((language 
python for)) ((language python try)) ((language python bool)) ((language 
python exceptions)) ((language python persist))))
   3327:17 12 (resolve-interface (language python hash) #:select _ 
#:hide _ #:prefix _ #:renamer _ #:version _)
In ice-9/threads.scm:
     390:8 11 (_ _)
In ice-9/boot-9.scm:
   3253:13 10 (_)
In ice-9/threads.scm:
     390:8  9 (_ _)
In ice-9/boot-9.scm:
   3544:20  8 (_)
    2836:4  7 (save-module-excursion <procedure 7fffece56480 at 
ice-9/boot-9.scm:3567:16 ()>)
   3564:26  6 (_)
In language/python/guilemod.scm:
    549:14  5 (pload _ <procedure 7fffece9d440 at 
ice-9/boot-9.scm:3545:21 ()>)
In unknown file:
            4 (primitive-load-path "language/python/hash" <procedure 
7fffece9d420 at language/python/guilemod.scm:404:39 x>)
In language/python/hash.scm:
      55:0  3 (_)
In oop/goops.scm:
   1567:11  2 (cache-miss #f __hash__ <procedure 7fffecc5f3b8 at 
language/python/hash.scm:50:0 (self . l)>)
    1585:2  1 (_ _ _)
In ice-9/boot-9.scm:
   1685:16  0 (raise-exception _ #:continuable? _)

ice-9/boot-9.scm:1685:16: In procedure raise-exception:
No applicable method for #<<generic> set (6)> in call (set #f __hash__ 
<procedure 7fffecc5f3b8 at language/python/hash.scm:50:0 (self . l)>)
make: *** [Makefile:1462: language/python/with.go] Error 1
error: in phase 'build': uncaught exception:
%exception #<&invoke-error program: "make" arguments: 
("GUILE_AUTO_COMPILE=0" "COLUMNS=99999") exit-status: 2 term-signal: #f 
stop-signal: #f>

[-- Attachment #1.1.2: OpenPGP public key --]
[-- Type: application/pgp-keys, Size: 929 bytes --]

[-- Attachment #2: OpenPGP digital signature --]
[-- Type: application/pgp-signature, Size: 236 bytes --]