From unknown Sun Aug 10 00:25:08 2025 Content-Disposition: inline Content-Transfer-Encoding: quoted-printable MIME-Version: 1.0 X-Mailer: MIME-tools 5.509 (Entity 5.509) Content-Type: text/plain; charset=utf-8 From: bug#36487 <36487@debbugs.gnu.org> To: bug#36487 <36487@debbugs.gnu.org> Subject: Status: Evaluations do not complete since commit c30d117822a8ca26cd8c06c0a3974955bef68eac Reply-To: bug#36487 <36487@debbugs.gnu.org> Date: Sun, 10 Aug 2025 07:25:08 +0000 retitle 36487 Evaluations do not complete since commit c30d117822a8ca26cd8c= 06c0a3974955bef68eac reassign 36487 guix submitter 36487 Ludovic Court=C3=A8s severity 36487 serious thanks From debbugs-submit-bounces@debbugs.gnu.org Wed Jul 03 06:29:12 2019 Received: (at submit) by debbugs.gnu.org; 3 Jul 2019 10:29:12 +0000 Received: from localhost ([127.0.0.1]:48438 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1hicVc-0007N9-IO for submit@debbugs.gnu.org; Wed, 03 Jul 2019 06:29:10 -0400 Received: from lists.gnu.org ([209.51.188.17]:42288) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1hicVZ-0007Mi-2Y for submit@debbugs.gnu.org; Wed, 03 Jul 2019 06:29:01 -0400 Received: from eggs.gnu.org ([2001:470:142:3::10]:52513) by lists.gnu.org with esmtp (Exim 4.86_2) (envelope-from ) id 1hicVX-0006bs-BN for bug-Guix@gnu.org; Wed, 03 Jul 2019 06:29:00 -0400 X-Spam-Checker-Version: SpamAssassin 3.3.2 (2011-06-06) on eggs.gnu.org X-Spam-Level: X-Spam-Status: No, score=0.3 required=5.0 tests=ALL_TRUSTED,BAYES_50, URIBL_BLOCKED,URI_NOVOWEL autolearn=disabled version=3.3.2 Received: from fencepost.gnu.org ([2001:470:142:3::e]:38160) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1hicVW-0006e1-BB; Wed, 03 Jul 2019 06:28:58 -0400 Received: from [2a01:e0a:1d:7270:af76:b9b:ca24:c465] (port=35292 helo=ribbon) by fencepost.gnu.org with esmtpsa (TLS1.2:RSA_AES_256_CBC_SHA1:256) (Exim 4.82) (envelope-from ) id 1hicVT-0003oD-Mw; Wed, 03 Jul 2019 06:28:56 -0400 From: =?utf-8?Q?Ludovic_Court=C3=A8s?= To: bug-Guix@gnu.org Subject: Evaluations do not complete since commit c30d117822a8ca26cd8c06c0a3974955bef68eac X-URL: http://www.fdn.fr/~lcourtes/ X-Revolutionary-Date: 15 Messidor an 227 de la =?utf-8?Q?R=C3=A9volution?= X-PGP-Key-ID: 0x090B11993D9AEBB5 X-PGP-Key: http://www.fdn.fr/~lcourtes/ludovic.asc X-PGP-Fingerprint: 3CE4 6455 8A84 FDC6 9DB4 0CFB 090B 1199 3D9A EBB5 X-OS: x86_64-pc-linux-gnu Date: Wed, 03 Jul 2019 12:28:53 +0200 Message-ID: <87r2772yze.fsf@gnu.org> User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/26.2 (gnu/linux) MIME-Version: 1.0 Content-Type: text/plain; charset=utf-8 Content-Transfer-Encoding: quoted-printable X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic] X-Spam-Score: -1.8 (-) X-Debbugs-Envelope-To: submit Cc: Christopher Baines X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: debbugs-submit-bounces@debbugs.gnu.org Sender: "Debbugs-submit" X-Spam-Score: -2.8 (--) Hello, Chris reported that evaluations =E2=80=9Chang=E2=80=9D since commit c30d117822a8ca26cd8c06c0a3974955bef68eac, as can be seen at: https://prototype-guix-data-service.cbaines.net/branch/master as well as: https://berlin.guixsd.org/jobset/guix-master (ca. eval. 6171) The log at shows that it hangs while computing i686 derivations: --8<---------------cut here---------------start------------->8--- [=E2=80=A6] debug: Starting getting inferior derivations heap size: 1579.0 MiB debug: Starting getting derivations for ((x86_64-linux . x86_64-linux)) debug: Finished getting derivations for ((x86_64-linux . x86_64-linux)), to= ok 252 seconds heap size: 1579.0 MiB debug: Starting getting derivations for ((i686-linux . i686-linux)) --8<---------------cut here---------------end--------------->8--- If I attach to the =E2=80=98guix repl -t machine=E2=80=99 process started b= y the Cuirass evaluation process, I see this: --8<---------------cut here---------------start------------->8--- #0 0x00007fc5248d5fb8 in _dl_update_slotinfo (req_modid=3D1) at ../elf/dl-= tls.c:623 #1 0x00007fc5248d620c in update_get_addr (ti=3D0x7fc5248ab240) at ../elf/d= l-tls.c:799 #2 0x00007fc5248da838 in __tls_get_addr () at ../sysdeps/x86_64/tls_get_ad= dr.S:55 #3 0x00007fc5247ddbe0 in scm_equal_p () from /gnu/store/r658y3cgpnf99nxjxq= gjiaizx20ac4k0-guile-2.2.4/lib/libguile-2.2.so.1 #4 0x00007fc5247cda18 in array_compare () from /gnu/store/r658y3cgpnf99nxj= xqgjiaizx20ac4k0-guile-2.2.4/lib/libguile-2.2.so.1 #5 0x00007fc5247cd9c7 in array_compare () from /gnu/store/r658y3cgpnf99nxj= xqgjiaizx20ac4k0-guile-2.2.4/lib/libguile-2.2.so.1 #6 0x00007fc5247ce675 in scm_array_equal_p () from /gnu/store/r658y3cgpnf9= 9nxjxqgjiaizx20ac4k0-guile-2.2.4/lib/libguile-2.2.so.1 #7 0x00007fc52484891b in scm_i_struct_equalp () from /gnu/store/r658y3cgpn= f99nxjxqgjiaizx20ac4k0-guile-2.2.4/lib/libguile-2.2.so.1 #8 0x00007fc5247ddc82 in scm_equal_p () from /gnu/store/r658y3cgpnf99nxjxq= gjiaizx20ac4k0-guile-2.2.4/lib/libguile-2.2.so.1 #9 0x00007fc52484891b in scm_i_struct_equalp () from /gnu/store/r658y3cgpn= f99nxjxqgjiaizx20ac4k0-guile-2.2.4/lib/libguile-2.2.so.1 #10 0x00007fc52484891b in scm_i_struct_equalp () from /gnu/store/r658y3cgpn= f99nxjxqgjiaizx20ac4k0-guile-2.2.4/lib/libguile-2.2.so.1 #11 0x00007fc5247ddc82 in scm_equal_p () from /gnu/store/r658y3cgpnf99nxjxq= gjiaizx20ac4k0-guile-2.2.4/lib/libguile-2.2.so.1 =E2=80=A6 #101 0x00007fc5247ddc82 in scm_equal_p () from /gnu/store/r658y3cgpnf99nxjx= qgjiaizx20ac4k0-guile-2.2.4/lib/libguile-2.2.so.1 #102 0x00007fc52484891b in scm_i_struct_equalp () from /gnu/store/r658y3cgp= nf99nxjxqgjiaizx20ac4k0-guile-2.2.4/lib/libguile-2.2.so.1 #103 0x00007fc5247cbb38 in scm_sloppy_assoc () from /gnu/store/r658y3cgpnf9= 9nxjxqgjiaizx20ac4k0-guile-2.2.4/lib/libguile-2.2.so.1 #104 0x00007fc5247f3a92 in scm_hash_fn_ref () from /gnu/store/r658y3cgpnf99= nxjxqgjiaizx20ac4k0-guile-2.2.4/lib/libguile-2.2.so.1 #105 0x00007fc524859715 in vm_regular_engine () from /gnu/store/r658y3cgpnf= 99nxjxqgjiaizx20ac4k0-guile-2.2.4/lib/libguile-2.2.so.1 #106 0x00007fc52485cd6a in scm_call_n () from /gnu/store/r658y3cgpnf99nxjxq= gjiaizx20ac4k0-guile-2.2.4/lib/libguile-2.2.so.1 #107 0x00007fc5247e0da7 in scm_primitive_eval () from /gnu/store/r658y3cgpn= f99nxjxqgjiaizx20ac4k0-guile-2.2.4/lib/libguile-2.2.so.1 --8<---------------cut here---------------end--------------->8--- and with debugging symbols: --8<---------------cut here---------------start------------->8--- #3 0x00007fc5247ddc23 in scm_equal_p (x=3Dx@entry=3D"/gnu/store/djh3drjx3h= nxlx1bsdnixdm3xjbg5v2c-guile-bootstrap-2.0/bin/guile",=20 y=3Dy@entry=3D"/gnu/store/djh3drjx3hnxlx1bsdnixdm3xjbg5v2c-guile-bootst= rap-2.0/bin/guile") at eq.c:290 #4 0x00007fc52484891b in scm_i_struct_equalp (s1=3D"#>= " =3D {...}, s2=3D"#>" =3D {...}) at struct.c:693 #5 0x00007fc52484891b in scm_i_struct_equalp (s1=3D"#>" =3D {...}, s2=3D"#>" =3D {...}) at struct= .c:693 #6 0x00007fc5247ddc82 in scm_equal_p ( x=3D(# # (("out" . # "/gnu/store/jc5q4i55hrilibrmacs38skk3cpg2zyb-glibc-b= ootstrap-0" #f #f #f 3ade740>)) (# # (("out" . # "/gnu/store/nbi0mzk1dw37nnna= hw9akn3bwzwi4gdk-module-import-compiled" #f #f #f 3ae6e00>)) (# # (("out" . #= "/gnu/store/djh3drjx3hnxlx1bsdnixdm3xjbg5v2c-guile-bootstrap-2.0" #f #f #f= 3af1b40>)) (# # (("out" . #<= struct "/gnu/store/dgncc5wmw8prxq09y71hqjc6g7rxqvvb-gui= le-2.0.9.tar.xz" sha256 #vu8(183 87 205 70 191 19 236 172 131 251 142 149 9= 5 181 0 150 172 45 23 187 97 12 168 235 129 111 41 48 42 0 168 70) #f 3af10= c0>)) () ("/gnu/store/7f1alh9qj2h0wwy2220npgnmw6pbrkwx-mirrors" "/gnu/store= /vwyxp1dq4lb97n6b20w5cqxasy2dai79-content-addressed-mirrors") "i686-linux" = "builtin:download" () (("content-addressed-mirrors" . "/gnu/store/vwyxp1dq4= lb97n6b20w5cqxasy2dai79-content-addressed-mirrors") ("impureEnvVars" . "htt= p_proxy https_proxy LC_ALL LC_MESSAGES LANG COLUMNS") ("mirrors" . "/gnu/st= ore/7f1alh9qj2h0wwy2220npgnmw6pbrkwx-mirrors") ("out" . "/gnu/store/dgncc5w= mw8prxq09y71hqjc6g7rxqvvb-guile-2.0.9.tar.xz") ("preferLocalBuild" . "1") (= "url" . "(\"https://alpha.gnu.org/gnu/guix/bootstrap/i686-linux/20131110/gu= ile-2.0.9.tar.xz\" \"http://alpha.gnu.org/gnu/guix/bootstrap/i686-linux/201= 31110/guile-2.0.9.tar.xz\" \"ftp://alpha.gnu.org/gnu/guix/bootstrap/i686-li= nux/20131110/guile-2.0.9.tar.xz\" \"http://www.fdn.fr/~lcourtes/software/gu= ix/packages/i686-linux/20131110/guile-2.0.9.tar.xz\" \"http://flashner.co.i= l/guix/bootstrap/i686-linux/20131110/guile-2.0.9.tar.xz\")")) "/gnu/store/j= agg4l53ar1m4hsgqlpisw9i4rq2whzd-guile-2.0.9.tar.xz.drv" 3af14e0> ("out") 3a= f1780>) ("/gnu/store/d32948vi9bs5mmbnvlczqcgwwdqvygiw-build-bootstrap-guile= .sh" "/gnu/store/mzfkrxd4w8vqrmyrx169wj8wyw7r8i37-bash") "i686-linux" "/gnu= /store/mzfkrxd4w8 [=E2=80=A6] --8<---------------cut here---------------end--------------->8--- So this process is busy comparing deep structures, probably as a consequence of 5cf4b26d52bcea382d98fb4becce89be9ee37b55. Indeed, the load on berlin is at above 60 currently, with all these evaluations processes consuming CPU=E2=80=A6 To be continued=E2=80=A6 Ludo=E2=80=99. From debbugs-submit-bounces@debbugs.gnu.org Wed Jul 03 06:36:53 2019 Received: (at control) by debbugs.gnu.org; 3 Jul 2019 10:36:53 +0000 Received: from localhost ([127.0.0.1]:48443 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1hicdA-0007Zz-TQ for submit@debbugs.gnu.org; Wed, 03 Jul 2019 06:36:53 -0400 Received: from eggs.gnu.org ([209.51.188.92]:42361) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1hicd9-0007Zk-B4 for control@debbugs.gnu.org; Wed, 03 Jul 2019 06:36:51 -0400 Received: from fencepost.gnu.org ([2001:470:142:3::e]:38241) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1hicd4-0007H9-60 for control@debbugs.gnu.org; Wed, 03 Jul 2019 06:36:46 -0400 Received: from [2a01:e0a:1d:7270:af76:b9b:ca24:c465] (port=35494 helo=ribbon) by fencepost.gnu.org with esmtpsa (TLS1.2:RSA_AES_256_CBC_SHA1:256) (Exim 4.82) (envelope-from ) id 1hicd3-0006dr-6O for control@debbugs.gnu.org; Wed, 03 Jul 2019 06:36:45 -0400 Date: Wed, 03 Jul 2019 12:36:43 +0200 Message-Id: <87pnmr2ymc.fsf@gnu.org> To: control@debbugs.gnu.org From: =?utf-8?Q?Ludovic_Court=C3=A8s?= Subject: control message for bug #36487 MIME-version: 1.0 Content-type: text/plain; charset=utf-8 Content-Transfer-Encoding: 8bit X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic] X-Spam-Score: -2.3 (--) X-Debbugs-Envelope-To: control X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: debbugs-submit-bounces@debbugs.gnu.org Sender: "Debbugs-submit" X-Spam-Score: -3.3 (---) severity 36487 serious quit From debbugs-submit-bounces@debbugs.gnu.org Wed Jul 03 13:01:19 2019 Received: (at 36487) by debbugs.gnu.org; 3 Jul 2019 17:01:19 +0000 Received: from localhost ([127.0.0.1]:49952 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1hiidC-0004NT-NC for submit@debbugs.gnu.org; Wed, 03 Jul 2019 13:01:19 -0400 Received: from eggs.gnu.org ([209.51.188.92]:58632) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1hiidA-0004NF-Mo for 36487@debbugs.gnu.org; Wed, 03 Jul 2019 13:01:17 -0400 Received: from fencepost.gnu.org ([2001:470:142:3::e]:44627) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1hiid5-0003Eg-9r; Wed, 03 Jul 2019 13:01:11 -0400 Received: from [2a01:e0a:1d:7270:af76:b9b:ca24:c465] (port=36178 helo=ribbon) by fencepost.gnu.org with esmtpsa (TLS1.2:RSA_AES_256_CBC_SHA1:256) (Exim 4.82) (envelope-from ) id 1hiid4-0000FI-S3; Wed, 03 Jul 2019 13:01:11 -0400 From: =?utf-8?Q?Ludovic_Court=C3=A8s?= To: 36487@debbugs.gnu.org, Christopher Baines Subject: Re: bug#36487: Evaluations do not complete since commit c30d117822a8ca26cd8c06c0a3974955bef68eac References: <87r2772yze.fsf@gnu.org> Date: Wed, 03 Jul 2019 19:01:06 +0200 In-Reply-To: <87r2772yze.fsf@gnu.org> ("Ludovic \=\?utf-8\?Q\?Court\=C3\=A8s\=22'\?\= \=\?utf-8\?Q\?s\?\= message of "Wed, 03 Jul 2019 12:28:53 +0200") Message-ID: <875zoj2gtp.fsf@gnu.org> User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/26.2 (gnu/linux) MIME-Version: 1.0 Content-Type: multipart/mixed; boundary="=-=-=" X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic] X-Spam-Score: -1.8 (-) X-Debbugs-Envelope-To: 36487 X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: debbugs-submit-bounces@debbugs.gnu.org Sender: "Debbugs-submit" X-Spam-Score: -2.8 (--) --=-=-= Content-Type: text/plain; charset=utf-8 Content-Transfer-Encoding: quoted-printable Ludovic Court=C3=A8s skribis: > #104 0x00007fc5247f3a92 in scm_hash_fn_ref () from /gnu/store/r658y3cgpnf= 99nxjxqgjiaizx20ac4k0-guile-2.2.4/lib/libguile-2.2.so.1 > #105 0x00007fc524859715 in vm_regular_engine () from /gnu/store/r658y3cgp= nf99nxjxqgjiaizx20ac4k0-guile-2.2.4/lib/libguile-2.2.so.1 > #106 0x00007fc52485cd6a in scm_call_n () from /gnu/store/r658y3cgpnf99nxj= xqgjiaizx20ac4k0-guile-2.2.4/lib/libguile-2.2.so.1 > #107 0x00007fc5247e0da7 in scm_primitive_eval () from /gnu/store/r658y3cg= pnf99nxjxqgjiaizx20ac4k0-guile-2.2.4/lib/libguile-2.2.so.1 > > > and with debugging symbols: > > #3 0x00007fc5247ddc23 in scm_equal_p (x=3Dx@entry=3D"/gnu/store/djh3drjx= 3hnxlx1bsdnixdm3xjbg5v2c-guile-bootstrap-2.0/bin/guile",=20 > y=3Dy@entry=3D"/gnu/store/djh3drjx3hnxlx1bsdnixdm3xjbg5v2c-guile-boot= strap-2.0/bin/guile") at eq.c:290 > #4 0x00007fc52484891b in scm_i_struct_equalp (s1=3D"#>" =3D {...}, s2=3D"#>" =3D {...}) at struct.c:693 > #5 0x00007fc52484891b in scm_i_struct_equalp (s1=3D"#>" =3D {...}, s2=3D"#>" =3D {...}) at stru= ct.c:693 > #6 0x00007fc5247ddc82 in scm_equal_p ( > x=3D(# # (("out" . # "/gnu/store/jc5q4i55hrilibrmacs38skk3cpg2zyb-glibc= -bootstrap-0" #f #f #f 3ade740>)) (# # (("out" . # "/gnu/store/nbi0mzk1dw37nn= nahw9akn3bwzwi4gdk-module-import-compiled" #f #f #f 3ae6e00>)) (# # (("out" . # "/gnu/store/djh3drjx3hnxlx1bsdnixdm3xjbg5v2c-guile-bootstrap-2.0" #f #f = #f 3af1b40>)) (# # (("out" . = # "/gnu/store/dgncc5wmw8prxq09y71hqjc6g7rxqvvb-g= uile-2.0.9.tar.xz" sha256 #vu8(183 87 205 70 191 19 236 172 131 251 142 149= 95 181 0 150 172 45 23 187 97 12 168 235 129 111 41 48 42 0 168 70) #f 3af= 10c0>)) () ("/gnu/store/7f1alh9qj2h0wwy2220npgnmw6pbrkwx-mirrors" "/gnu/sto= re/vwyxp1dq4lb97n6b20w5cqxasy2dai79-content-addressed-mirrors") "i686-linux= " "builtin:download" () (("content-addressed-mirrors" . "/gnu/store/vwyxp1d= q4lb97n6b20w5cqxasy2dai79-content-addressed-mirrors") ("impureEnvVars" . "h= ttp_proxy https_proxy LC_ALL LC_MESSAGES LANG COLUMNS") ("mirrors" . "/gnu/= store/7f1alh9qj2h0wwy2220npgnmw6pbrkwx-mirrors") ("out" . "/gnu/store/dgncc= 5wmw8prxq09y71hqjc6g7rxqvvb-guile-2.0.9.tar.xz") ("preferLocalBuild" . "1")= ("url" . "(\"https://alpha.gnu.org/gnu/guix/bootstrap/i686-linux/20131110/= guile-2.0.9.tar.xz\" \"http://alpha.gnu.org/gnu/guix/bootstrap/i686-linux/2= 0131110/guile-2.0.9.tar.xz\" \"ftp://alpha.gnu.org/gnu/guix/bootstrap/i686-= linux/20131110/guile-2.0.9.tar.xz\" \"http://www.fdn.fr/~lcourtes/software/= guix/packages/i686-linux/20131110/guile-2.0.9.tar.xz\" \"http://flashner.co= .il/guix/bootstrap/i686-linux/20131110/guile-2.0.9.tar.xz\")")) "/gnu/store= /jagg4l53ar1m4hsgqlpisw9i4rq2whzd-guile-2.0.9.tar.xz.drv" 3af14e0> ("out") = 3af1780>) ("/gnu/store/d32948vi9bs5mmbnvlczqcgwwdqvygiw-build-bootstrap-gui= le.sh" "/gnu/store/mzfkrxd4w8vqrmyrx169wj8wyw7r8i37-bash") "i686-linux" "/g= nu/store/mzfkrxd4w8 [=E2=80=A6] > > So this process is busy comparing deep structures, probably as a > consequence of 5cf4b26d52bcea382d98fb4becce89be9ee37b55. With some debugging, I found that the pathological behavior comes from the memoization hash table of =E2=80=98derivation->bytevector=E2=80=99, spe= cifically after =E2=80=98invalidate-derivation-caches!=E2=80=99 has been called. Namely, after =E2=80=98invalidate-derivation-caches!=E2=80=99 has been call= ed, that hash table has 24K buckets, including 72 buckets of size 6 or more. One bucket has 18 entries, which are all alike: # /gnu/store/=E2=80=A6-module-import-compiled 94283c0> The =E2=80=98equal?=E2=80=99 calls come from those buckets, and each of the= m involves traversing the whole tree. I=E2=80=99m looking for a workaround. Ludo=E2=80=99. PS: Below is some debugging code. --=-=-= Content-Type: text/plain Content-Disposition: inline (use-modules (system foreign) (ice-9 match)) ;; typedef struct { ;; 0 scm_t_weak_entry **buckets; /* the data */ ;; 8 scm_i_pthread_mutex_t lock; /* the lock */ ;; 48 scm_t_weak_table_kind kind; /* what kind of table it is */ ;; 56 unsigned long n_buckets; /* total number of buckets. */ ;; 64 unsigned long n_items; /* number of items in table */ ;; 72 unsigned long lower; /* when to shrink */ ;; 80 unsigned long upper; /* when to grow */ ;; 88 int size_index; /* index into hashtable_size */ ;; 92 int min_size_index; /* minimum size_index */ ;; 96 GC_word last_gc_no; ;; } scm_t_weak_table; (define (weak-table-data table) "Return an alist describing TABLE." (unless (or (weak-key-hash-table? table) (weak-value-hash-table? table)) (error "wrong type argument" table)) (let* ((address (object-address table)) (ptr (dereference-pointer (make-pointer (+ address 8))))) (match (parse-c-struct (make-pointer (+ (pointer-address ptr) 48)) (list int unsigned-long unsigned-long unsigned-long unsigned-long int int unsigned-long)) ((kind buckets items lower upper size-index min-size-index last-gc-no) `((kind . ,kind) (items . ,items) (buckets . ,buckets) (lower . ,lower) (upper . ,upper) (size-index . ,size-index) (min-size-index . ,min-size-index) (last-gc-no . ,last-gc-no)))))) ;; typedef struct scm_t_hashtable { ;; unsigned long n_items; /* number of items in table */ ;; unsigned long lower; /* when to shrink */ ;; unsigned long upper; /* when to grow */ ;; int size_index; /* index into hashtable_size */ ;; int min_size_index; /* minimum size_index */ ;; scm_t_hash_fn hash_fn; /* for rehashing after a GC. */ ;; } scm_t_hashtable; (define (hash-table-data table) (unless (hash-table? table) (error "wrong type argument" table)) (let* ((address (object-address table)) (ptr (dereference-pointer (make-pointer (+ address (* 2 (sizeof '*))))))) (match (parse-c-struct ptr (list unsigned-long unsigned-long unsigned-long int int)) ((items lower upper size-index min-size-index) `((items . ,items) (lower . ,lower) (upper . ,upper) (size-index . ,size-index) (min-size-index . ,min-size-index)))))) (define (hash-table-buckets table) (unless (hash-table? table) (error "wrong type argument" table)) (let* ((address (object-address table)) (ptr (dereference-pointer (make-pointer (+ address (* 1 (sizeof '*))))))) (pointer->scm ptr))) (define (hash-table-bucket-sizes table) (let ((buckets (hash-table-buckets table))) (let loop ((index 0) (result '())) (if (< index (vector-length buckets)) (loop (+ 1 index) (cons (length (vector-ref buckets index)) result)) (reverse result))))) --=-=-=-- From debbugs-submit-bounces@debbugs.gnu.org Wed Jul 03 14:10:47 2019 Received: (at 36487) by debbugs.gnu.org; 3 Jul 2019 18:10:47 +0000 Received: from localhost ([127.0.0.1]:49982 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1hijiR-00061w-3M for submit@debbugs.gnu.org; Wed, 03 Jul 2019 14:10:47 -0400 Received: from eggs.gnu.org ([209.51.188.92]:44898) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1hijiP-00061h-9c for 36487@debbugs.gnu.org; Wed, 03 Jul 2019 14:10:45 -0400 Received: from fencepost.gnu.org ([2001:470:142:3::e]:45328) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1hijiJ-00026y-Pg; Wed, 03 Jul 2019 14:10:39 -0400 Received: from [2a01:e0a:1d:7270:af76:b9b:ca24:c465] (port=36208 helo=ribbon) by fencepost.gnu.org with esmtpsa (TLS1.2:RSA_AES_256_CBC_SHA1:256) (Exim 4.82) (envelope-from ) id 1hijiJ-0001y2-5z; Wed, 03 Jul 2019 14:10:39 -0400 From: =?utf-8?Q?Ludovic_Court=C3=A8s?= To: 36487@debbugs.gnu.org Subject: Re: bug#36487: Evaluations do not complete since commit c30d117822a8ca26cd8c06c0a3974955bef68eac References: <87r2772yze.fsf@gnu.org> <875zoj2gtp.fsf@gnu.org> Date: Wed, 03 Jul 2019 20:10:37 +0200 In-Reply-To: <875zoj2gtp.fsf@gnu.org> ("Ludovic \=\?utf-8\?Q\?Court\=C3\=A8s\=22'\?\= \=\?utf-8\?Q\?s\?\= message of "Wed, 03 Jul 2019 19:01:06 +0200") Message-ID: <87o92b0z1e.fsf@gnu.org> User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/26.2 (gnu/linux) MIME-Version: 1.0 Content-Type: text/plain; charset=utf-8 Content-Transfer-Encoding: quoted-printable X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic] X-Spam-Score: -2.3 (--) X-Debbugs-Envelope-To: 36487 Cc: Christopher Baines X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: debbugs-submit-bounces@debbugs.gnu.org Sender: "Debbugs-submit" X-Spam-Score: -3.3 (---) I pushed a workaround as e79281be105b16153c375af5506db31fd1e32698, though more work is still needed to fully understand what=E2=80=99s happeni= ng. Note that you can test things like this: --8<---------------cut here---------------start------------->8--- $ ./pre-inst-env guile GNU Guile 2.2.5 Copyright (C) 1995-2019 Free Software Foundation, Inc. Guile comes with ABSOLUTELY NO WARRANTY; for details type `,show w'. This program is free software, and you are welcome to redistribute it under certain conditions; type `,show c' for details. Enter `,help' for help. scheme@(guile-user)> ,use(guix store) scheme@(guile-user)> (use-modules (gnu ci) (ice-9 match)) scheme@(guile-user)> (define store (open-connection)) scheme@(guile-user)> (define jobs (hydra-jobs store '((systems "x86_64-lin= ux" "i686-linux")))) evaluating for 'x86_64-linux' (heap size: 35.0 MiB)... random seed for tests: 1562154761 evaluating for 'i686-linux' (heap size: 467.0 MiB)... --8<---------------cut here---------------end--------------->8--- Ludo=E2=80=99. From debbugs-submit-bounces@debbugs.gnu.org Sun Sep 06 03:10:43 2020 Received: (at control) by debbugs.gnu.org; 6 Sep 2020 07:10:43 +0000 Received: from localhost ([127.0.0.1]:44658 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1kEop1-0006mz-HZ for submit@debbugs.gnu.org; Sun, 06 Sep 2020 03:10:43 -0400 Received: from eggs.gnu.org ([209.51.188.92]:60374) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1kEop0-0006mn-03 for control@debbugs.gnu.org; Sun, 06 Sep 2020 03:10:42 -0400 Received: from fencepost.gnu.org ([2001:470:142:3::e]:47421) by eggs.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1kEoou-0007GQ-QY for control@debbugs.gnu.org; Sun, 06 Sep 2020 03:10:36 -0400 Received: from [2a01:e0a:19b:d9a0:9d9d:97cc:d92a:8ac0] (port=35154 helo=cervin) by fencepost.gnu.org with esmtpsa (TLS1.2:RSA_AES_256_CBC_SHA1:256) (Exim 4.82) (envelope-from ) id 1kEoou-0008NO-6o for control@debbugs.gnu.org; Sun, 06 Sep 2020 03:10:36 -0400 Date: Sun, 06 Sep 2020 09:10:33 +0200 Message-Id: <87a6y3xtw6.fsf@cervin.i-did-not-set--mail-host-address--so-tickle-me> To: control@debbugs.gnu.org From: Mathieu Othacehe Subject: control message for bug #36487 X-Spam-Score: -1.9 (-) X-Debbugs-Envelope-To: control X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: debbugs-submit-bounces@debbugs.gnu.org Sender: "Debbugs-submit" X-Spam-Score: -2.9 (--) close 36487 quit From unknown Sun Aug 10 00:25:08 2025 Received: (at fakecontrol) by fakecontrolmessage; To: internal_control@debbugs.gnu.org From: Debbugs Internal Request Subject: Internal Control Message-Id: bug archived. Date: Sun, 04 Oct 2020 11:24:10 +0000 User-Agent: Fakemail v42.6.9 # This is a fake control message. # # The action: # bug archived. thanks # This fakemail brought to you by your local debbugs # administrator