Hi, The following compilation error occurs on i686-linux:
--8<---------------cut here---------------start------------->8--- BOOTSTRAP(stage1) GUILEC ice-9/control.go wrote `language/cps/verify.go' BOOTSTRAP(stage1) GUILEC ice-9/copy-tree.go wrote `ice-9/copy-tree.go' BOOTSTRAP(stage1) GUILEC ice-9/curried-definitions.go Backtrace: In ice-9/boot-9.scm: 1755:12 19 (with-exception-handler #<procedure c6988 at ice-9/boot-9.scm:1797:7 (exn)> #<procedure f1d60 at system/base/compile.scm:68:9 ()> #:unwind? _ #:unwind-for-type _) In system/base/compile.scm: 69:11 18 (_) 190:11 17 (_ #<closed: file 42e38>) 309:6 16 (read-and-compile #<closed: file 42e70> #:from _ #:to _ #:env _ #:optimization-level _ #:warning-level _ #:opts _) 352:28 15 (compile #<tree-il (seq (let (m) (m-182b3cf1-2) ((call (@@ (guile) define-module*) (const (ice-9 control)) (const #:filename) (const "ice-9/control.scm") (const #:exports) (const (% abort shift reset shift* reset* call-with-escape-continuation call/ec let-escape-continuation let/ec suspendable-continuation?)) (const #:re-exports) (const (call-with-prompt abort-to-prompt default-prompt-tag make-prompt-tag)) (const #:declarative?) (const #t))) (seq (call (@@ (guile) set-current-m?> ?) 265:44 14 (_ #<tree-il (seq (let (m) (m-182b3cf1-2) ((call (@@ (guile) define-module*) (const (ice-9 control)) (const #:filename) (const "ice-9/control.scm") (const #:exports) (const (% abort shift reset shift* reset* call-with-escape-continuation call/ec let-escape-continuation let/ec suspendable-continuation?)) (const #:re-exports) (const (call-with-prompt abort-to-prompt default-prompt-tag make-prompt-tag)) (const #:declarative?) (const #t))) (seq (call (@@ (guile) set-current-module)?> ?) 261:33 13 (_ #<intmap 0-1142> #<directory (ice-9 control) e9c30>) In language/cps/optimize.scm: 136:2 12 (_ _ #<directory (ice-9 control) e9c30>) 111:3 11 (optimize-first-order-cps _ _) In language/cps/switch.scm: 414:6 10 (optimize-branch-chains _) In language/cps/intmap.scm: 519:6 9 (visit-branch #(#(#(#<intset 0-129> (absent) (absent) (absent) (absent) (absent) (absent) (absent) (absent) (absent) (absent) (absent) (absent) (absent) (absent) (absent) (absent) (absent) (absent) (absent) (absent) (absent) (absent) (absent) (absent) (absent) (absent) (absent) (absent) (absent) (absent) (absent) #f) (absent) (absent) (absent) #((absent) (absent) #<intset 130-153> (absent) (absent) (absent) (absent) (absent) (absent) (absent) (absent) (absent) (absent) # ?) ?) ?) ?) 519:6 8 (visit-branch #(#(#<intset 0-129> (absent) (absent) (absent) (absent) (absent) (absent) (absent) (absent) (absent) (absent) (absent) (absent) (absent) (absent) (absent) (absent) (absent) (absent) (absent) (absent) (absent) (absent) (absent) (absent) (absent) (absent) (absent) (absent) (absent) (absent) (absent) #f) (absent) (absent) (absent) #((absent) (absent) #<intset 130-153> (absent) (absent) (absent) (absent) (absent) (absent) (absent) (absent) (absent) (absent) (#) # ?) ?) ?) 519:6 7 (visit-branch #((absent) (absent) #<intset 130-153> (absent) (absent) (absent) (absent) (absent) (absent) (absent) (absent) (absent) (absent) (absent) (absent) (absent) (absent) (absent) (absent) (absent) (absent) (absent) (absent) (absent) (absent) (absent) #<intset 154-734,1124-1129> (absent) (absent) (absent) (absent) (absent) #f) _ 128 _) In language/cps/switch.scm: 99:36 6 (fold-branch-chains #<intmap 0-1129> _ _ #<procedure optimize-branch-chain (var exit tests cps)> _) 343:8 5 (optimize-branch-chain 100 151 (132 134 136 138 140) _) In ice-9/boot-9.scm: 260:13 4 (for-each1 ((call-with-escape-continuation . 135) (call/ec . 133) (reset* . 139) (shift* . 137))) In language/cps/switch.scm: 340:32 3 (_ (call-with-escape-continuation . 135)) In language/cps/guile-vm.scm: 89:31 2 (target-symbol-hash _) 41:18 1 (jenkins-lookup3-hashword2 "call-with-escape-continuation") In ice-9/boot-9.scm: 1676:22 0 (lp 0) ice-9/boot-9.scm:1676:22: In procedure lp: Value out of range 0 to< 18446744073709551615: -512332661 make[2]: *** [Makefile:2517: ice-9/control.go] Error 1 make[2]: *** Waiting for unfinished jobs.... --8<---------------cut here---------------end--------------->8--- According to <https://ci.guix.gnu.org/build/477680/details>, this regression was introduced by <https://git.savannah.gnu.org/cgit/guile.git/commit/?id=3b47f87618047ebb8812788c64a44877a4f2e0dd>. (This affects 3.0.10.) Ludo’.