Re: Merging ‘core-updates’ real soon

[Kaelyn]

On Wednesday, August 28th, 2024 at 9:48 AM, André Batista <nandre@riseup.net> 
wrote:

> 
> 
> Hi again,
> 
> ter 27 ago 2024 às 16:04:43 (1724785483), nandre@riseup.net enviou:
> 
> > PS: my i686 system reconfigure is still ongoing right now. I'll report
> > back if any other issue comes around (fingers crossed).
> 
> 
> Unfortunately, I've had no luck. System reconfiguration fails when trying
> to build 'binutils-64-bit-bfd-2.41' with a more cryptic error message:
> 
> $ zcat 
> /var/log/guix/drvs/01/yl5wdsb4v16l7dphvr37090qmr7li8-binutils-64-bit-bfd-2.41.drv.gz
> ice-9/read.scm:126:4: In procedure read-expr*:
> /gnu/store/34j6xzczp0291qvrggzcfqnbqks1djz1-binutils-64-bit-bfd-2.41-builder:1:2744:
>  Unknown # object: "#<"
> 
> This builder has only one occurrence of '#<' which is a '#<gexp ...>':
> 
> 
> $ cat 
> /gnu/store/34j6xzczp0291qvrggzcfqnbqks1djz1-binutils-64-bit-bfd-2.41-builder
> (begin (use-modules (guix build gnu-build-system) (guix build utils)) (begin 
> (define %build-inputs (quote (("source" . 
> "/gnu/store/gfw3m9f9jz1m36f1sz1vqnqvfrqsb2k1-binutils-2.41.tar.zst") ("bison" 
> . "/gnu/store/jng0ydhr8xw28svcgm1dzbykli29wxih-bison-3.8.2") ("tar" . 
> "/gnu/store/m8h0hv6g549nh9n9xfjphjrzqg8g2r2w-tar-1.34") ("gzip" . 
> "/gnu/store/b3mdz7n6j9dzkyi0scdbldnzrwcc3nlg-gzip-1.13") ("bzip2" . 
> "/gnu/store/2aqa6wi5y81yprflz59cjk91pgwvy48w-bzip2-1.0.8") ("file" . 
> "/gnu/store/k4ycd4b9zqrzxmdivjbhakjjymg8bfsv-file-5.45") ("diffutils" . 
> "/gnu/store/ra6mdl923hpjw0yyrrj3j1snhibs32z0-diffutils-3.10") ("patch" . 
> "/gnu/store/p76jj9sv007cj4hmfskjjsscy9z0vrc6-patch-2.7.6") ("findutils" . 
> "/gnu/store/p1g6q2qnp1m0iza4d09mknyqx1xspws3-findutils-4.9.0") ("gawk" . 
> "/gnu/store/mbgs4jl3vbhi6vya4p64hjfyj3739qzi-gawk-5.3.0") ("zstd" . 
> "/gnu/store/542d6rh6ci06ngcgiprnambqfws09i4f-zstd-1.5.2") ("sed" . 
> "/gnu/store/mqb37w640rg4hx9nx00274r2kz54kc3w-sed-4.8") ("grep" . 
> "/gnu/store/wpykxc5blf6vcw7bmqa4k21sqs44p8as-grep-3.11") ("xz" . 
> "/gnu/store/cnv0rzdrdmlb3c43sr9n5vagjh3qn0k1-xz-5.4.5") ("coreutils" . 
> "/gnu/store/yxcrwcdd7blcczlc50i6lgcnj2w7nlja-coreutils-9.1") ("make" . 
> "/gnu/store/c6i7ihy40368732m574lpgvygikd4ql9-make-4.4.1") ("bash" . 
> "/gnu/store/ak41ci13apcxh5ahd8lc9rv6l7bqnwym-bash-minimal-5.1.16") 
> ("ld-wrapper" . "/gnu/store/d7ayy457nq3a42myfgqs2mc2zbx7z406-ld-wrapper-0") 
> ("binutils" . "/gnu/store/zf310q29z3apmkp3g6hck29z1d39ajly-binutils-2.41") 
> ("gcc" . "/gnu/store/xgqbv2lkh6z9x6wgyfjvcpr8paw0zd9a-gcc-11.4.0") ("libc" . 
> "/gnu/store/g88kcslhrdmd0b5bap2f2ghj26i7jdlm-glibc-2.39") ("libc:static" . 
> "/gnu/store/3wg51p14zipq2rl2k59pw7i8hirbdnb5-glibc-2.39-static") ("m4" . 
> "/gnu/store/xam8sj9hdr7y0rgqv138xvlbxrqp348f-m4-1.4.19") ("kernel-headers" . 
> "/gnu/store/hpcf3359y90qb3c8c1x5syr0ivrj54bg-linux-libre-headers-5.15.49")))) 
> (define %outputs (list (cons "out" ((@ (guile) getenv) "out")))) (define 
> %output (assoc-ref %outputs "out")) (gnu-build #:source 
> "/gnu/store/gfw3m9f9jz1m36f1sz1vqnqvfrqsb2k1-binutils-2.41.tar.zst" #:system 
> "i686-linux" #:build "i686-unknown-linux-gnu" #:outputs %outputs #:inputs 
> %build-inputs #:search-paths (quote (("BASH_LOADABLES_PATH" ("lib/bash") ":" 
> directory #f) ("C_INCLUDE_PATH" ("include") ":" directory #f) 
> ("CPLUS_INCLUDE_PATH" ("include/c++" "include") ":" directory #f) 
> ("OBJC_INCLUDE_PATH" ("include") ":" directory #f) ("OBJCPLUS_INCLUDE_PATH" 
> ("include/c++" "include") ":" directory #f) ("LIBRARY_PATH" ("lib" "lib64") 
> ":" directory #f) ("GUIX_LOCPATH" ("lib/locale") ":" directory #f) ("TZDIR" 
> ("share/zoneinfo") #f directory #f))) #:phases %standard-phases #:locale 
> "C.UTF-8" #:separate-from-pid1? #t #:bootstrap-scripts %bootstrap-scripts 
> #:configure-flags (cons "--enable-64-bit-bfd" #<gexp (quote 
> ("LDFLAGS=-static-libgcc" "--enable-new-dtags" 
> "--with-lib-path=/no-ld-lib-path" "--enable-install-libbfd" 
> "--enable-deterministic-archives" "--enable-64-bit-bfd" 
> "--enable-compressed-debug-sections=all" "--enable-lto" 
> "--enable-separate-code" "--enable-threads")) gnu/packages/base.scm:661:28 
> a765d108>) #:make-flags (quote ("MAKEINFO=true")) #:out-of-source? #t 
> #:tests? #t #:test-target "check" #:parallel-build? #t #:parallel-tests? #t 
> #:patch-shebangs? #t #:license-file-regexp 
> "^(COPYING.|LICEN[CS]E.|[Ll]icen[cs]e.|Copy[Rr]ight(\\.(txt|md))?)$" 
> #:strip-binaries? #t #:validate-runpath? #t #:make-dynamic-linker-cache? #t 
> #:license-file-regexp 
> "^(COPYING.|LICEN[CS]E.|[Ll]icen[cs]e.|Copy[Rr]ight(\\.(txt|md))?)$" 
> #:strip-flags (quote ("--strip-unneeded" "--enable-deterministic-archives")) 
> #:strip-directories (quote ("lib" "lib64" "libexec" "bin" "sbin")))))
> 
> 
> Thoughts?

Do you have any modifications to e.g. the binutils package definition? It looks 
like the error is coming from using "cons" to append a configure flag; from the 
output above:

#:configure-flags (cons "--enable-64-bit-bfd" #<gexp (quote 
("LDFLAGS=-static-libgcc" "--enable-new-dtags" 
"--with-lib-path=/no-ld-lib-path" "--enable-install-libbfd" 
"--enable-deterministic-archives" "--enable-64-bit-bfd" 
"--enable-compressed-debug-sections=all" "--enable-lto" 
"--enable-separate-code" "--enable-threads")) gnu/packages/base.scm:661:28 
a765d108>)

I'd encountered a similar error in the past after more packages were migrated 
to use gexps because I hadn't yet learned of the gexp-aware helpers like 
"substitute-keyword-arguments". Basically the configure flags need to be 
extended using gexp operations instead of basic list operations like "cons". An 
example can be seen in the definition of "binutils-boot0" in 
gnu/packages/commencement.scm:

(substitute-keyword-arguments (package-arguments binutils)
  ((#:configure-flags cf)
   #~(append (list #$(string-append "--target="
                                    (boot-triplet))
                   "--disable-gprofng") ;requires Bison
             #$cf)))))

HTH,
Kaelyn

> 
> Cheers,