From unknown Mon Jun 23 04:14:43 2025 X-Loop: help-debbugs@gnu.org Subject: bug#34531: Guix profile fails on Overdrive 1000 Resent-From: Andreas Enge Original-Sender: "Debbugs-submit" Resent-CC: bug-guix@gnu.org Resent-Date: Mon, 18 Feb 2019 20:07:01 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: report 34531 X-GNU-PR-Package: guix X-GNU-PR-Keywords: To: 34531@debbugs.gnu.org X-Debbugs-Original-To: bug-guix@gnu.org Received: via spool by submit@debbugs.gnu.org id=B.155052036917401 (code B ref -1); Mon, 18 Feb 2019 20:07:01 +0000 Received: (at submit) by debbugs.gnu.org; 18 Feb 2019 20:06:09 +0000 Received: from localhost ([127.0.0.1]:53227 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1gvpB3-0004Wa-CR for submit@debbugs.gnu.org; Mon, 18 Feb 2019 15:06:09 -0500 Received: from eggs.gnu.org ([209.51.188.92]:50341) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1gvpB1-0004WG-JH for submit@debbugs.gnu.org; Mon, 18 Feb 2019 15:06:08 -0500 Received: from lists.gnu.org ([209.51.188.17]:38363) by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_256_CBC_SHA1:32) (Exim 4.71) (envelope-from ) id 1gvpAw-0002T8-GF for submit@debbugs.gnu.org; Mon, 18 Feb 2019 15:06:02 -0500 Received: from eggs.gnu.org ([209.51.188.92]:36483) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1gvpAv-0007qz-0d for bug-guix@gnu.org; Mon, 18 Feb 2019 15:06:02 -0500 X-Spam-Checker-Version: SpamAssassin 3.3.2 (2011-06-06) on eggs.gnu.org X-Spam-Level: X-Spam-Status: No, score=0.8 required=5.0 tests=BAYES_50,RCVD_IN_DNSWL_NONE, URIBL_BLOCKED autolearn=disabled version=3.3.2 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1gvpAs-0002Pv-Ci for bug-guix@gnu.org; Mon, 18 Feb 2019 15:06:00 -0500 Received: from hera.aquilenet.fr ([185.233.100.1]:37788) by eggs.gnu.org with esmtps (TLS1.0:DHE_RSA_AES_256_CBC_SHA1:32) (Exim 4.71) (envelope-from ) id 1gvpAr-0002LX-JS for bug-guix@gnu.org; Mon, 18 Feb 2019 15:05:58 -0500 Received: from localhost (localhost [127.0.0.1]) by hera.aquilenet.fr (Postfix) with ESMTP id DB25711144; Mon, 18 Feb 2019 21:05:54 +0100 (CET) X-Virus-Scanned: Debian amavisd-new at aquilenet.fr Received: from hera.aquilenet.fr ([127.0.0.1]) by localhost (hera.aquilenet.fr [127.0.0.1]) (amavisd-new, port 10024) with ESMTP id fXusoUchU5Eq; Mon, 18 Feb 2019 21:05:54 +0100 (CET) Received: from jurong (unknown [IPv6:2001:910:103f::2af]) by hera.aquilenet.fr (Postfix) with ESMTPSA id DB4231110A; Mon, 18 Feb 2019 21:05:53 +0100 (CET) Date: Mon, 18 Feb 2019 21:05:52 +0100 From: Andreas Enge Message-ID: <20190218200552.GB1881@jurong> MIME-Version: 1.0 Content-Type: text/plain; charset=us-ascii Content-Disposition: inline User-Agent: Mutt/1.11.2 (2019-01-07) X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic] X-Received-From: 185.233.100.1 X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6.x X-Spam-Score: 0.7 (/) 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: -0.3 (/) Hello, on a newly installed Overdrive 1000 machine with 8 GB of memory, I am trying guix pull -n This results in Updating channel 'guix' from Git repository at 'https://git.savannah.gnu.org/git/guix.git'... Building from this channel: guix https://git.savannah.gnu.org/git/guix.git d0d207c The following derivations will be built: /gnu/store/qvljgqnsynw113h1062nws9i2zfcz15y-compute-guix-derivation.drv /gnu/store/rj824ibc8nhhl1j2h25sgw4lyxkxjggc-gdb-8.2.drv ... /gnu/store/w1jw283cdf6n03qnccsrvxgzy41z0hps-guile-gcrypt-0.1.0.drv building /gnu/store/wy37294j2rb6fg5fgpybki28vq60jz94-python-minimal-3.6.5.drv... starting phase `set-SOURCE-DATE-EPOCH' ... That a build of something starts although the "-n" flag is specified seems to be a first bug. Then, during the test phase, the build is killed since the machine runs out of memory. I also tried to pass "--cores=1" to "guix build", but this parameter is not honoured: "top" shows that all four cores are running. This might be a second bug. In any case, it becomes impossible to upgrade with the usual mechanism, which is a rather serious bug. My guix version: $ guix --version guix (GNU Guix) 0.15.0-8.71a78ba There should be a number of possible solutions: - Try to not depend on python for such basic operations (preferable; where does this dependency come from anyway?) - Disable the tests in a bootstrapping python that is used here. - Disable only tests requiring a lot of memory. - Update python to a newer version. What do you think we should try? Andreas PS: I am still not convinced that the system is in a coherent state, so it would be interesting if someone could confirm this bug. For instance, I observe the following: $ guix package -i hello -n guix package: warning: Your Guix installation is 9 days old. guix package: warning: Consider running 'guix pull' followed by 'guix package -u' to get up-to-date packages and security updates. The following package would be installed: hello 2.10 /gnu/store/5hzc1q803ksynz19sr8ymvgzf4v7anzk-hello-2.10 The following derivations would be built: /gnu/store/1krpkl0axqyn2lpxp3ick3s0p2z5qrnv-profile.drv /gnu/store/gfxnqasw81kxjjvfmv5i54rbvlpkd8n1-mkfontdir-1.0.7.tar.bz2.drv /gnu/store/n0fgxl55ni7pmw03p8aqaamqvj31ym0l-libfontenc-1.1.3.tar.bz2.drv /gnu/store/4c1jfinnpjrxnx7grpwmwh3s1b64b8bc-libfontenc-1.1.3.drv /gnu/store/x38kid3sf3zw15rlwl375kp0ng1iz8m3-mkfontscale-1.1.3.tar.bz2.drv /gnu/store/9fb2w29gyfq6hsw064l89vb29jd0jry4-mkfontscale-1.1.3.drv /gnu/store/iwi0648clfzpp084qic303glv9cp9qwy-module-import-compiled.drv /gnu/store/lz4psj250m4xh4mpvkd2qchbs9vb9f19-mkfontdir-1.0.7.drv /gnu/store/w11j7chynk58lzk40agd37ii32rc7d6c-fonts-dir.drv /gnu/store/rj824ibc8nhhl1j2h25sgw4lyxkxjggc-gdb-8.2.drv /gnu/store/7g3ybwsd664941qz7jp2c3rcxaxm2nij-valgrind-3.13.0.drv /gnu/store/swx5jipn1id1qfw60hh1f7icxfflfx6s-scons-python2-3.0.1.drv /gnu/store/q98m948gmibnccjjdbw4s80vkn5ywmza-boost-1.66.0.drv /gnu/store/i1a2f33p08brilpkdn35rm5jgng2bnrn-swig-3.0.12.drv /gnu/store/m8y9k0zqkq6sa0lv9714ql9f4m36pmrh-serf-1.3.9.drv /gnu/store/sazsmami6651dkgj51ij53x0bx9hl46x-lz4-1.8.1.2.drv /gnu/store/3g8plb0fvnblmb7ldr4ikmlpv44k0xzp-libxslt-1.1.32.drv /gnu/store/4nms2l8g8n770harl3f9qzizp0amyqvz-xcb-proto-1.13.drv /gnu/store/wy37294j2rb6fg5fgpybki28vq60jz94-python-minimal-3.6.5.drv /gnu/store/zyq4z95r0afywwn9y6283irikgx72885-python-minimal-wrapper-3.6.5.drv /gnu/store/68bycryid94b46kw9kp1mlmgc0s3y8k6-libxrender-0.9.10.drv /gnu/store/wgxbfymwcscqmsqn5cbv7sskd9racsr9-libxft-2.3.2.drv /gnu/store/7jl0aja7msxhnm39x7vbz0r7lxfrk0xh-python-3.6.5.drv /gnu/store/xmhsaqhlp6fmxny50vs3if8jlv0cclbi-python-wrapper-3.6.5.drv /gnu/store/jbdy9za2xfxqg65c27lwic1psnz2kikg-ghostscript-9.23.drv /gnu/store/g9i8l4dnp7a6pr1rz4ly2apyp7cxcmz7-openldap-2.4.46.drv /gnu/store/jvj8p7qc1y1f15yd34ahysdpkl2120kn-groff-1.22.3.drv /gnu/store/220nl6licli726kdrvzw8k3j6qak5cq5-libx11-1.6.5.drv /gnu/store/gnijgdfa363n5jc2qk9wn54x12787yvl-curl-7.59.0.drv /gnu/store/i3bvnpnjhj6y8d2kzksw6f6gpfbadwl0-libxext-1.3.3.drv /gnu/store/jf7dxdv6dsrkr75b68whz7nnyss485js-tk-8.6.8.drv /gnu/store/jga9yslz6zafqchv4mr5hg7106s0lhsx-libxcb-1.13.drv /gnu/store/lkwynhkq6a4a242i17qbxcx5khkng3wc-asciidoc-8.6.10.drv /gnu/store/slj73h4y23gdwm6znclijsxi3cggdd57-xmlto-0.0.28.drv /gnu/store/wn577xbf7fc70kcczmrcn03b0615mlpl-python2-2.7.14.drv /gnu/store/x2xbfpl32ni1lbq5r515qqh45qsyalri-subversion-1.10.2.drv /gnu/store/h9v84xaab30a6vqg7ni4g74fwslzz1f2-git-2.19.2.drv /gnu/store/jrk6szd0b8glb69iqs8kwsr74d47ck78-guile-gdbm-ffi-20120209.fa1d5b6-checkout.drv /gnu/store/6zgzgmmqa5ghqljwslmsh7xcmz3rckcy-guile-gdbm-ffi-20120209.tar.xz.drv /gnu/store/g0103wbwhzgv716xn7x2pyzhp0xmypbm-module-import.drv /gnu/store/nhy3343z8q23f20im1jm8cr0dvax8m3n-module-import-compiled.drv /gnu/store/81jxzs3h1ryr1jmnzlazqn2i1qswxpxn-module-import-compiled.drv /gnu/store/8va28xxwi4qidaq5gha55sxwwr2hwsbi-guile-gdbm-ffi-20120209.fa1d5b6.drv /gnu/store/h64z34a0g2jy57fbfrmdrykfjqsm8ny4-module-import.drv /gnu/store/cmavl4ahvx5yi1klmn1dmjc004njyi5h-ca-certificate-bundle.drv /gnu/store/73vrp31a5fg5zgwyb4808dk7g5idq0n0-bash-static-4.4.19.drv /gnu/store/rybkx8wn2czlbyhqf2hrxa4qjmrm5hkn-glibc-2.27.tar.xz.drv /gnu/store/2ww5cyacdml0wqmpmpryyamvay1ryqfv-glibc-2.27.drv /gnu/store/9mf0p34cm53g3l8li2fikmy4ns1f4jfm-linux-libre-headers-4.14.26.drv /gnu/store/hwc4xr8jx4g4im96rsm5h3fbmr3b5gfv-gzip-1.9.drv /gnu/store/vjc17j34rl0cvnbj547gk1hn1kxx4jdh-module-import-compiled.drv /gnu/store/0mppv29wf1wf02hbrsi1i9y3rxj4wg99-info-dir.drv /gnu/store/7vs1h0b02fzzf02bnmk23lw2sibfhnjy-glibc-utf8-locales-2.27.drv /gnu/store/v1sz6x6z0nliqqzhvn5956gyq9qsw9k3-manual-database.drv /gnu/store/zci2ggar92r1zfbfx5rb9klpzjlr6qg0-module-import-compiled.drv This is an awful lot of unrelated packages required to build hello! From unknown Mon Jun 23 04:14:43 2025 X-Loop: help-debbugs@gnu.org Subject: bug#34531: Guix profile fails on Overdrive 1000 Resent-From: Marius Bakke Original-Sender: "Debbugs-submit" Resent-CC: bug-guix@gnu.org Resent-Date: Mon, 18 Feb 2019 20:50:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 34531 X-GNU-PR-Package: guix X-GNU-PR-Keywords: To: Andreas Enge , 34531@debbugs.gnu.org Received: via spool by 34531-submit@debbugs.gnu.org id=B34531.155052296224341 (code B ref 34531); Mon, 18 Feb 2019 20:50:02 +0000 Received: (at 34531) by debbugs.gnu.org; 18 Feb 2019 20:49:22 +0000 Received: from localhost ([127.0.0.1]:53253 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1gvpqs-0006KW-9T for submit@debbugs.gnu.org; Mon, 18 Feb 2019 15:49:22 -0500 Received: from out2-smtp.messagingengine.com ([66.111.4.26]:60297) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1gvpqo-0006K4-LT for 34531@debbugs.gnu.org; Mon, 18 Feb 2019 15:49:19 -0500 Received: from compute5.internal (compute5.nyi.internal [10.202.2.45]) by mailout.nyi.internal (Postfix) with ESMTP id 34D922269F; Mon, 18 Feb 2019 15:49:13 -0500 (EST) Received: from mailfrontend2 ([10.202.2.163]) by compute5.internal (MEProxy); Mon, 18 Feb 2019 15:49:13 -0500 DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=fastmail.com; h= from:to:subject:in-reply-to:references:date:message-id :mime-version:content-type; s=fm2; bh=2OGaOku/ZC/cEwtrvK0rgXFHCr cqLeYoTl8PXuQG+cA=; b=feSMABLLyq8YP8lT0S8z8OlsmIhPZxWVHBoPmFyG3V UfdNtqLMbCc39DUKTz3Fqr7A8Ys6NSZzQvBFnb/Zp4F+Ok8wF2ECMBcCYBCA6pZV BgU33UwgOYhdfzPwx99N9Fu83imiNfF5uVOK/OrbAnN179HNDHwKfNrm3Ck153CB FCdxdXQSrg89ww27enX0QwjCfrNXWHf/J4mhDCg7oZxZWhphGEgiMNbi1lP/+wsJ KuYhVzODoVMxN9lqavLDE0/FJhFKYBVuY8UDtzKfDY57FagnmLUARr32wd4l1FZY PZpoIMf0+n3lsobjWyJOqNxiQt27uc1cDnWbbw68U/kQ== DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d= messagingengine.com; h=content-type:date:from:in-reply-to :message-id:mime-version:references:subject:to:x-me-proxy :x-me-proxy:x-me-sender:x-me-sender:x-sasl-enc; s=fm2; bh=2OGaOk u/ZC/cEwtrvK0rgXFHCrcqLeYoTl8PXuQG+cA=; b=ULN0rOTe4i3/rCWVyH6sKM lI1e0gvzXtabl4eThowleC8jHUBBDHYvOBuzRtEu/qDjXaVAcs2kN3Yj3fEIC1UE DfA2Flj7EjvPWw2NeAHqHxhCCGc8xdHuBU89qDEmJo4m6BwjpwHIuVsFaQhWCJ06 Lu9lza/PZlemnsmRctAB371Q0B0Cq31MNByWhHLGJITxb+nTVC3PpZCaoEdQW6ES bVIsjtmHvTaEvJA8bl6nfFf3Jh2LRg5Co9KUukEp4Zzs/wWxE66kM2PN9AhyJaiN aDqsifadUI/MFb/tKPuINcIYIRWo6CtDNd2XkVqD0rW7igHpFaFTFI9R9G54QyTw == X-ME-Sender: X-ME-Proxy-Cause: gggruggvucftvghtrhhoucdtuddrgedutddrtddugdduuddtucdltddurdegtdelrddttd dmucetufdoteggodetrfdotffvucfrrhhofhhilhgvmecuhfgrshhtofgrihhlpdfquhht necuuegrihhlohhuthemuceftddtnecusecvtfgvtghiphhivghnthhsucdlqddutddtmd enucfjughrpefhvffujghffgffkfggtgesghdtreertdertdenucfhrhhomhepofgrrhhi uhhsuceurghkkhgvuceomhgsrghkkhgvsehfrghsthhmrghilhdrtghomheqnecuffhomh grihhnpehgnhhurdhorhhgnecukfhppeeivddrudeirddvvdeirddugedtnecurfgrrhgr mhepmhgrihhlfhhrohhmpehmsggrkhhkvgesfhgrshhtmhgrihhlrdgtohhmnecuvehluh hsthgvrhfuihiivgeptd X-ME-Proxy: Received: from localhost (140.226.16.62.customer.cdi.no [62.16.226.140]) by mail.messagingengine.com (Postfix) with ESMTPA id 654621026E; Mon, 18 Feb 2019 15:49:12 -0500 (EST) From: Marius Bakke In-Reply-To: <20190218200552.GB1881@jurong> References: <20190218200552.GB1881@jurong> User-Agent: Notmuch/0.28.2 (https://notmuchmail.org) Emacs/26.1 (x86_64-pc-linux-gnu) Date: Mon, 18 Feb 2019 21:49:10 +0100 Message-ID: <87mumsom9l.fsf@fastmail.com> MIME-Version: 1.0 Content-Type: multipart/signed; boundary="=-=-="; micalg=pgp-sha512; protocol="application/pgp-signature" X-Spam-Score: -0.7 (/) 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: -1.7 (-) --=-=-= Content-Type: text/plain Content-Transfer-Encoding: quoted-printable Andreas Enge writes: > Hello, > > on a newly installed Overdrive 1000 machine with 8 GB of memory, I am try= ing > guix pull -n > > This results in > Updating channel 'guix' from Git repository at 'https://git.savannah.gnu.= org/git/guix.git'... > Building from this channel: > guix https://git.savannah.gnu.org/git/guix.git d0d207c > The following derivations will be built: > /gnu/store/qvljgqnsynw113h1062nws9i2zfcz15y-compute-guix-derivation.drv > /gnu/store/rj824ibc8nhhl1j2h25sgw4lyxkxjggc-gdb-8.2.drv > ... > /gnu/store/w1jw283cdf6n03qnccsrvxgzy41z0hps-guile-gcrypt-0.1.0.drv > building /gnu/store/wy37294j2rb6fg5fgpybki28vq60jz94-python-minimal-3.6.5= .drv... > starting phase `set-SOURCE-DATE-EPOCH' > ... > > That a build of something starts although the "-n" flag is specified seems > to be a first bug. > > Then, during the test phase, the build is killed since the machine runs o= ut > of memory. I also tried to pass "--cores=3D1" to "guix build", but this > parameter is not honoured: "top" shows that all four cores are running. > This might be a second bug. > > In any case, it becomes impossible to upgrade with the usual mechanism, > which is a rather serious bug. > > My guix version: > $ guix --version > guix (GNU Guix) 0.15.0-8.71a78ba The Python contained within this Guix snapshot has a known bug that makes it leak memory on newer kernels. The Guix commit that works around it is 589aca1c183ef1dfdef54d40fdd6a258bbcd39d0. One thing you could try is bootstrap a Guix checkout through the usual mechanisms (./bootstrap; ./configure; etc), using packages from the host system if necessary. From=20there you should be able to "./pre-inst-env guix pull". A dirtier workaround is to delete "/tmp/guix-build-python-minimal-3.6.5.drv-0/Lib/test/test_socket.py" at some point during the build process, but you may have to do that a couple of times. Finally, installing 0.16.0 "from scratch" should also work. HTH! --=-=-= Content-Type: application/pgp-signature; name="signature.asc" -----BEGIN PGP SIGNATURE----- iQEzBAEBCgAdFiEEu7At3yzq9qgNHeZDoqBt8qM6VPoFAlxrGkYACgkQoqBt8qM6 VPpGXAgAyjE4PBegBmz7nZ9oqPkeRt7daBLQZzghxUcT6y3DiP9M9Qax4Tlc8dBo SzuOm7jvtPMjt7diLZfWLbj/IS8HoDwNKmiqUw4RZRovvVV6j6WKc5u6Q9UGdakX To9PoRgR6cmvOV+vb+cQm4xVPNouA6svw5PpZ3c+v67ii3iIxodtHb9jU6ACt9/j kwN4IWOvYAw+ua9dL/Tbl6Hl/eP0+cAOwwnWNDlPsGCDODCmQaq++T72+E+d3odW 1Q7py0vNl6zs3SLDVjsmAf0JCcAyjnuayubIWNn9BvpxwPVWgw+5Bd4s9kTBKX75 c2IirUdAnaY/32xCr1RSrmR7HJmQVw== =faAR -----END PGP SIGNATURE----- --=-=-=-- From unknown Mon Jun 23 04:14:43 2025 X-Loop: help-debbugs@gnu.org Subject: bug#34531: Guix profile fails on Overdrive 1000 Resent-From: Andreas Enge Original-Sender: "Debbugs-submit" Resent-CC: bug-guix@gnu.org Resent-Date: Tue, 19 Feb 2019 08:28:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 34531 X-GNU-PR-Package: guix X-GNU-PR-Keywords: To: Marius Bakke Cc: 34531@debbugs.gnu.org Received: via spool by 34531-submit@debbugs.gnu.org id=B34531.15505648541326 (code B ref 34531); Tue, 19 Feb 2019 08:28:02 +0000 Received: (at 34531) by debbugs.gnu.org; 19 Feb 2019 08:27:34 +0000 Received: from localhost ([127.0.0.1]:53816 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1gw0kY-0000LK-Fy for submit@debbugs.gnu.org; Tue, 19 Feb 2019 03:27:34 -0500 Received: from hera.aquilenet.fr ([185.233.100.1]:43570) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1gw0kW-0000LB-Fw for 34531@debbugs.gnu.org; Tue, 19 Feb 2019 03:27:33 -0500 Received: from localhost (localhost [127.0.0.1]) by hera.aquilenet.fr (Postfix) with ESMTP id D0C762318; Tue, 19 Feb 2019 09:27:30 +0100 (CET) X-Virus-Scanned: Debian amavisd-new at aquilenet.fr Received: from hera.aquilenet.fr ([127.0.0.1]) by localhost (hera.aquilenet.fr [127.0.0.1]) (amavisd-new, port 10024) with ESMTP id q4HWniaPPEPz; Tue, 19 Feb 2019 09:27:30 +0100 (CET) Received: from jurong (unknown [IPv6:2001:910:103f::2af]) by hera.aquilenet.fr (Postfix) with ESMTPSA id 1B58021ED; Tue, 19 Feb 2019 09:27:30 +0100 (CET) Date: Tue, 19 Feb 2019 09:27:28 +0100 From: Andreas Enge Message-ID: <20190219082728.GA5650@jurong> References: <20190218200552.GB1881@jurong> <87mumsom9l.fsf@fastmail.com> MIME-Version: 1.0 Content-Type: text/plain; charset=us-ascii Content-Disposition: inline In-Reply-To: <87mumsom9l.fsf@fastmail.com> User-Agent: Mutt/1.11.2 (2019-01-07) X-Spam-Score: 0.7 (/) 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: -0.3 (/) Hello Marius, thanks a lot for your quick and helpful reply! On Mon, Feb 18, 2019 at 09:49:10PM +0100, Marius Bakke wrote: > The Python contained within this Guix snapshot has a known bug that > makes it leak memory on newer kernels. The Guix commit that works > around it is 589aca1c183ef1dfdef54d40fdd6a258bbcd39d0. okay, so the main problem is fixed then. > One thing you could try is bootstrap a Guix checkout through the usual > mechanisms (./bootstrap; ./configure; etc), using packages from the host > system if necessary. The host system is Guix, so this is complicated... But I realise that there is also a guix-0.16.0 lying around, and with this I get beyond the python point. Before closing the bug, I would still like to ask whether there is a way of getting around the need for python. And why "guix pull -n" builds such a large number of packages, while one would expect it to just print a number of packages to be built. But maybe this is also solved in a later version already. Andreas From unknown Mon Jun 23 04:14:43 2025 X-Loop: help-debbugs@gnu.org Subject: bug#34531: Guix profile fails on Overdrive 1000 Resent-From: Ricardo Wurmus Original-Sender: "Debbugs-submit" Resent-CC: bug-guix@gnu.org Resent-Date: Tue, 19 Feb 2019 13:24:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 34531 X-GNU-PR-Package: guix X-GNU-PR-Keywords: To: Andreas Enge Cc: 34531@debbugs.gnu.org, Marius Bakke Received: via spool by 34531-submit@debbugs.gnu.org id=B34531.155058262320520 (code B ref 34531); Tue, 19 Feb 2019 13:24:02 +0000 Received: (at 34531) by debbugs.gnu.org; 19 Feb 2019 13:23:43 +0000 Received: from localhost ([127.0.0.1]:54001 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1gw5N9-0005Ku-1O for submit@debbugs.gnu.org; Tue, 19 Feb 2019 08:23:43 -0500 Received: from sender-of-o51.zoho.com ([135.84.80.216]:21010) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1gw5N6-0005Kj-P7 for 34531@debbugs.gnu.org; Tue, 19 Feb 2019 08:23:41 -0500 ARC-Seal: i=1; a=rsa-sha256; t=1550582609; cv=none; d=zoho.com; s=zohoarc; b=S67DbJ2eRjuMO49a6S3XitZsZgzEYtPKnPQTG/q3Io5cyon115Zw+XWcJJYhr60nPnVM2TfqZwsOwmFaAOWvBGx9Aj3Bm8JIKO2Y6mNxPviPy6RX0qG42aOap4TOhGs087LMUmG+pif/PodGDrt1gepZJvdWg1Uy9s7dNdoC5rs= ARC-Message-Signature: i=1; a=rsa-sha256; c=relaxed/relaxed; d=zoho.com; s=zohoarc; t=1550582609; h=Content-Type:Content-Transfer-Encoding:Cc:Date:From:In-Reply-To:MIME-Version:Message-ID:References:Subject:To:ARC-Authentication-Results; bh=6MBFZXzuwlxi2hgWYeSQET4xamjbjgqO/eUzTTrSPfk=; b=a5RTXn1keTekH2KVyfWSBVGdn6p/JrACi03e2+gC3gTPYvOf28135Va8kjzPTW+dEr39FijJTjc3wf7a/MnW4pFwhPJfJCKBkUYOZ4kc92aucK+/d3kO03V9TCffrYNCdtyGbXbNAPuL4IWkvHeFpMGQV/cIOmcIt7fSNr1Lbh0= ARC-Authentication-Results: i=1; mx.zoho.com; dkim=pass header.i=elephly.net; spf=pass smtp.mailfrom=rekado@elephly.net; dmarc=pass header.from= header.from= DKIM-Signature: v=1; a=rsa-sha256; q=dns/txt; c=relaxed/relaxed; t=1550582609; s=zoho; d=elephly.net; i=rekado@elephly.net; h=References:From:To:Cc:Subject:Message-ID:In-reply-to:Date:MIME-Version:Content-Type:Content-Transfer-Encoding; l=800; bh=6MBFZXzuwlxi2hgWYeSQET4xamjbjgqO/eUzTTrSPfk=; b=HTQZlkuMoF50w9IKAA+NwmeG0G6nky1hO61vDMzULYNzxb28QE+EodQ3C2ceV+D3 Dm9zC5v3Loldeca0D7GI7lC+NC9WnqPLf4gU3cJVYOKoruDO+QItN3VHyhstzUHsH1+ x3WoJa/DtC77LElsQmwNJ5jMdApIqhjYbeCzWJrw= Received: from localhost (141.80.238.36 [141.80.238.36]) by mx.zohomail.com with SMTPS id 155058260819211.693340447604896; Tue, 19 Feb 2019 05:23:28 -0800 (PST) References: <20190218200552.GB1881@jurong> <87mumsom9l.fsf@fastmail.com> <20190219082728.GA5650@jurong> User-agent: mu4e 1.0; emacs 26.1 From: Ricardo Wurmus Message-ID: <87lg2bvrne.fsf@elephly.net> In-reply-to: <20190219082728.GA5650@jurong> X-URL: https://elephly.net X-PGP-Key: https://elephly.net/rekado.pubkey X-PGP-Fingerprint: BCA6 89B6 3655 3801 C3C6 2150 197A 5888 235F ACAC Date: Tue, 19 Feb 2019 14:23:23 +0100 MIME-Version: 1.0 Content-Type: text/plain; charset=utf-8 Content-Transfer-Encoding: quoted-printable X-ZohoMailClient: External X-Spam-Score: 0.0 (/) 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: -1.0 (-) Andreas Enge writes: > Before closing the bug, I would still like to ask whether there is a way > of getting around the need for python. Guix pull needs =E2=80=9Cguile-git=E2=80=9D, and =E2=80=9Cguile-git=E2=80= =9D needs =E2=80=9Clibgit2=E2=80=9D, which needs =E2=80=9Cpython-wrapper=E2=80=9D. To remove the need for Python in = =E2=80=9Cguix pull=E2=80=9D we would need to build libgit2 without Python. I don=E2=80=99t know if anyone= has investigated whether this can be done. > And why "guix pull -n" builds > such a large number of packages, while one would expect it to just print > a number of packages to be built. This is likely due to grafts. When you do =E2=80=9Cguix pull --no-grafts -= n=E2=80=9D the behaviour is as expected. -- Ricardo From unknown Mon Jun 23 04:14:43 2025 X-Loop: help-debbugs@gnu.org Subject: bug#34531: Guix profile fails on Overdrive 1000 Resent-From: Danny Milosavljevic Original-Sender: "Debbugs-submit" Resent-CC: bug-guix@gnu.org Resent-Date: Tue, 19 Feb 2019 15:21:01 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 34531 X-GNU-PR-Package: guix X-GNU-PR-Keywords: To: Ricardo Wurmus , Andreas Enge Cc: 34531@debbugs.gnu.org Received: via spool by 34531-submit@debbugs.gnu.org id=B34531.1550589607595 (code B ref 34531); Tue, 19 Feb 2019 15:21:01 +0000 Received: (at 34531) by debbugs.gnu.org; 19 Feb 2019 15:20:07 +0000 Received: from localhost ([127.0.0.1]:55377 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1gw7Bm-00009W-Mz for submit@debbugs.gnu.org; Tue, 19 Feb 2019 10:20:07 -0500 Received: from dd26836.kasserver.com ([85.13.145.193]:46456) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1gw7Bk-00009J-0d for 34531@debbugs.gnu.org; Tue, 19 Feb 2019 10:20:04 -0500 Received: from localhost (178.113.229.202.wireless.dyn.drei.com [178.113.229.202]) by dd26836.kasserver.com (Postfix) with ESMTPSA id DA35333613F5; Tue, 19 Feb 2019 16:20:01 +0100 (CET) Date: Tue, 19 Feb 2019 16:19:54 +0100 From: Danny Milosavljevic Message-ID: <20190219161954.47234638@scratchpost.org> In-Reply-To: <87lg2bvrne.fsf@elephly.net> References: <20190218200552.GB1881@jurong> <87mumsom9l.fsf@fastmail.com> <20190219082728.GA5650@jurong> <87lg2bvrne.fsf@elephly.net> X-Mailer: Claws Mail 3.17.3 (GTK+ 2.24.32; x86_64-unknown-linux-gnu) MIME-Version: 1.0 Content-Type: multipart/signed; micalg=pgp-sha256; boundary="Sig_/EkfpcRIj/WOhGbXEwKXaWa1"; protocol="application/pgp-signature" X-Spam-Score: -0.7 (/) 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: -1.7 (-) --Sig_/EkfpcRIj/WOhGbXEwKXaWa1 Content-Type: text/plain; charset=utf-8 Content-Transfer-Encoding: quoted-printable Hi Ricardo, Hi Andreas, On Tue, 19 Feb 2019 14:23:23 +0100 Ricardo Wurmus wrote: > Andreas Enge writes: >=20 > > Before closing the bug, I would still like to ask whether there is a way > > of getting around the need for python. =20 >=20 > Guix pull needs =E2=80=9Cguile-git=E2=80=9D, and =E2=80=9Cguile-git=E2=80= =9D needs =E2=80=9Clibgit2=E2=80=9D, which > needs =E2=80=9Cpython-wrapper=E2=80=9D. To remove the need for Python in= =E2=80=9Cguix pull=E2=80=9D we > would need to build libgit2 without Python. I don=E2=80=99t know if anyo= ne has > investigated whether this can be done. I have read it now--in the interest of simplicity and bootstrappability. Python is only required to generate some libgit2 tests. It would be easy to port the one Python program "generate.py" to some other language. "generate.py" is from clar, which appears to be https://github.com/vmg/clar= . If someone were to replace it, that would be the correct place to contribute it. Python is listed as a regular input in libgit2. I think it should be a native-input instead. The dependency graph of libgit2 is very small after removing Python. The languages it still depends on (possibly indirectly) are: * Perl 5.28.0 * Guile 2.0.14 * bash 4.4.23 So writing the generate.py in one of those languages would not make the dependency graph bigger than necessary. generate.py uses regular expressions, simple file I/O, string templating and that's pretty much it. In any case, the first simplification would be just to move Python from regular input to native-input. --Sig_/EkfpcRIj/WOhGbXEwKXaWa1 Content-Type: application/pgp-signature Content-Description: OpenPGP digital signature -----BEGIN PGP SIGNATURE----- iQEzBAEBCAAdFiEEds7GsXJ0tGXALbPZ5xo1VCwwuqUFAlxsHpoACgkQ5xo1VCww uqU5bwf/ZVdTP3KBqntQfeoImWzsRk8v0M3Z7YO3tBKl2gbPqxgsNZoswcukZRCe T6Q1GVOAaZY+3/BdkrpCj5VC3tUgGvu/OV4BFGx/gnlx6RRzmYEUYpB7yhU2FdBO cY7+/TwjSR+eXjKEyPF9Rjo//oglzMJ2vGuhHvD935R5V3/B36L9C3aXwR+OQeYc 3CBKhuqBWxVpk9unrwMNYGF81pH3pAQCcaQillgBhzWBSy2s2VdQoMn0TNAH5kQA gc0ibM4+JVZemiXVaA/lmDv4boOniYdRj7BSRZYxPHz+iBAOxsTEX1DjJs/FbEOi pbDoxXKiH8SHCvMhyPxxd0yfC23yzA== =OiQs -----END PGP SIGNATURE----- --Sig_/EkfpcRIj/WOhGbXEwKXaWa1-- From unknown Mon Jun 23 04:14:43 2025 X-Loop: help-debbugs@gnu.org Subject: bug#34531: Guix profile fails on Overdrive 1000 Resent-From: Andreas Enge Original-Sender: "Debbugs-submit" Resent-CC: bug-guix@gnu.org Resent-Date: Tue, 19 Feb 2019 15:36:01 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 34531 X-GNU-PR-Package: guix X-GNU-PR-Keywords: To: Ricardo Wurmus Cc: 34531@debbugs.gnu.org, Marius Bakke Received: via spool by 34531-submit@debbugs.gnu.org id=B34531.15505905609927 (code B ref 34531); Tue, 19 Feb 2019 15:36:01 +0000 Received: (at 34531) by debbugs.gnu.org; 19 Feb 2019 15:36:00 +0000 Received: from localhost ([127.0.0.1]:55416 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1gw7RA-0002a2-1h for submit@debbugs.gnu.org; Tue, 19 Feb 2019 10:36:00 -0500 Received: from hera.aquilenet.fr ([185.233.100.1]:48736) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1gw7R7-0002Zt-Ns for 34531@debbugs.gnu.org; Tue, 19 Feb 2019 10:35:58 -0500 Received: from localhost (localhost [127.0.0.1]) by hera.aquilenet.fr (Postfix) with ESMTP id 4385E27E1; Tue, 19 Feb 2019 16:35:56 +0100 (CET) X-Virus-Scanned: Debian amavisd-new at aquilenet.fr Received: from hera.aquilenet.fr ([127.0.0.1]) by localhost (hera.aquilenet.fr [127.0.0.1]) (amavisd-new, port 10024) with ESMTP id a9OYduV--4Gr; Tue, 19 Feb 2019 16:35:55 +0100 (CET) Received: from jurong (unknown [IPv6:2001:660:6102:310:95e8:7a4a:6603:70ca]) by hera.aquilenet.fr (Postfix) with ESMTPSA id 4C2C327DA; Tue, 19 Feb 2019 16:35:55 +0100 (CET) Date: Tue, 19 Feb 2019 16:35:53 +0100 From: Andreas Enge Message-ID: <20190219153553.GA4950@jurong> References: <20190218200552.GB1881@jurong> <87mumsom9l.fsf@fastmail.com> <20190219082728.GA5650@jurong> <87lg2bvrne.fsf@elephly.net> MIME-Version: 1.0 Content-Type: text/plain; charset=utf-8 Content-Disposition: inline Content-Transfer-Encoding: 8bit In-Reply-To: <87lg2bvrne.fsf@elephly.net> User-Agent: Mutt/1.11.2 (2019-01-07) X-Spam-Score: 0.7 (/) 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: -0.3 (/) On Tue, Feb 19, 2019 at 02:23:23PM +0100, Ricardo Wurmus wrote: > Guix pull needs “guile-git”, and “guile-git” needs “libgit2”, which > needs “python-wrapper”. To remove the need for Python in “guix pull” we > would need to build libgit2 without Python. I don’t know if anyone has > investigated whether this can be done. I tried to simply drop python-wrapper from inputs. Actually it is not referenced by the final output, so it should be in native-inputs. And here is what happens: -- Could NOT find PythonInterp (missing: PYTHON_EXECUTABLE) CMake Error at tests/CMakeLists.txt:4 (MESSAGE): Could not find a python interpeter, which is needed to build the tests. Make sure python is available, or pass -DBUILD_CLAR=OFF to skip building the tests So we could create a separate package for internal guix use without running the tests, which would save us from compiling and especially testing python. Although this is not our usual style - but on the other hand, "guix pull" is more or less the first command that we recommend to our users, and it would be nice if it ran fast without requiring (many) additional packages. Ironically, libgit2 advertises itself as needing "Zero Dependencies" on its web site... What do you think? Andreas From unknown Mon Jun 23 04:14:43 2025 X-Loop: help-debbugs@gnu.org Subject: bug#34531: Guix profile fails on Overdrive 1000 Resent-From: Danny Milosavljevic Original-Sender: "Debbugs-submit" Resent-CC: bug-guix@gnu.org Resent-Date: Tue, 19 Feb 2019 15:41:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 34531 X-GNU-PR-Package: guix X-GNU-PR-Keywords: To: Andreas Enge Cc: Ricardo Wurmus , 34531@debbugs.gnu.org Received: via spool by 34531-submit@debbugs.gnu.org id=B34531.155059085010341 (code B ref 34531); Tue, 19 Feb 2019 15:41:02 +0000 Received: (at 34531) by debbugs.gnu.org; 19 Feb 2019 15:40:50 +0000 Received: from localhost ([127.0.0.1]:55420 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1gw7Vp-0002gi-N4 for submit@debbugs.gnu.org; Tue, 19 Feb 2019 10:40:49 -0500 Received: from dd26836.kasserver.com ([85.13.145.193]:48102) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1gw7Vn-0002gZ-UL for 34531@debbugs.gnu.org; Tue, 19 Feb 2019 10:40:48 -0500 Received: from localhost (178.113.229.202.wireless.dyn.drei.com [178.113.229.202]) by dd26836.kasserver.com (Postfix) with ESMTPSA id 45EE8336146A; Tue, 19 Feb 2019 16:40:46 +0100 (CET) Date: Tue, 19 Feb 2019 16:40:42 +0100 From: Danny Milosavljevic Message-ID: <20190219164042.593a6990@scratchpost.org> In-Reply-To: <20190219153553.GA4950@jurong> References: <20190218200552.GB1881@jurong> <87mumsom9l.fsf@fastmail.com> <20190219082728.GA5650@jurong> <87lg2bvrne.fsf@elephly.net> <20190219153553.GA4950@jurong> X-Mailer: Claws Mail 3.17.3 (GTK+ 2.24.32; x86_64-unknown-linux-gnu) MIME-Version: 1.0 Content-Type: multipart/signed; micalg=pgp-sha256; boundary="Sig_/9EV7ypJU+Sh=UazrZOlM+cB"; protocol="application/pgp-signature" X-Spam-Score: -0.7 (/) 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: -1.7 (-) --Sig_/9EV7ypJU+Sh=UazrZOlM+cB Content-Type: text/plain; charset=US-ASCII Content-Transfer-Encoding: quoted-printable Hi Andreas, On Tue, 19 Feb 2019 16:35:53 +0100 Andreas Enge wrote: > I tried to simply drop python-wrapper from inputs. Actually it is not > referenced by the final output, so it should be in native-inputs. And > here is what happens: >=20 > -- Could NOT find PythonInterp (missing: PYTHON_EXECUTABLE) > CMake Error at tests/CMakeLists.txt:4 (MESSAGE): > Could not find a python interpeter, which is needed to build the tests. > Make sure python is available, or pass -DBUILD_CLAR=3DOFF to skip build= ing > the tests diff --git a/gnu/packages/version-control.scm b/gnu/packages/version-contro= l.scm index b8e967bf6..7452f17b8 100644 --- a/gnu/packages/version-control.scm +++ b/gnu/packages/version-control.scm @@ -545,7 +545,8 @@ everything from small to very large projects with speed= and efficiency.") (build-system cmake-build-system) (outputs '("out" "debug")) (arguments - `(#:configure-flags '("-DUSE_SHA1DC=3DON") ; SHA-1 collision detection + `(#:configure-flags '("-DUSE_SHA1DC=3DON" ; SHA-1 collision detection + "-DBUILD_CLAR=3DOFF") #:phases (modify-phases %standard-phases (add-after 'unpack 'fix-hardcoded-paths @@ -558,11 +559,13 @@ everything from small to very large projects with spe= ed and efficiency.") #t)) ;; Run checks more verbosely. (replace 'check - (lambda _ (invoke "./libgit2_clar" "-v" "-Q")))))) + (const #t) + )))) (inputs `(("libssh2" ,libssh2) ("http-parser" ,http-parser) - ("python" ,python-wrapper))) +; ("python" ,python-wrapper) +)) (native-inputs `(("pkg-config" ,pkg-config))) (propagated-inputs > So we could create a separate package for internal guix use without runni= ng > the tests, which would save us from compiling and especially testing pyth= on. Please, let's just replace the test generator in this case. It's ridiculous to complicate Guix that much for a 250 line test generator, most of which is templates. If necessary, I can do it, although a person who knows Perl or Guile better can probably do it much faster. > Although this is not our usual style - but on the other hand, "guix pull" > is more or less the first command that we recommend to our users, and > it would be nice if it ran fast without requiring (many) additional packa= ges. >=20 > Ironically, libgit2 advertises itself as needing "Zero Dependencies" on i= ts > web site... >=20 > What do you think? Just replace the one script and do run the tests, without depending on Pyth= on. --Sig_/9EV7ypJU+Sh=UazrZOlM+cB Content-Type: application/pgp-signature Content-Description: OpenPGP digital signature -----BEGIN PGP SIGNATURE----- iQEzBAEBCAAdFiEEds7GsXJ0tGXALbPZ5xo1VCwwuqUFAlxsI3oACgkQ5xo1VCww uqUvggf/XeLw6unBrgyS1sT+T1ap1V5J2eWyL2S4BLDxeUEDeT/iuuMN55SshJ7O XN0U+UTIQQ/R7BEYY8KeUIorLJFAfcKBFoIUdNmzaSPqU7fgb5uR3S10Rt1c2Ndd dLe3gSBRE08qaAdIlZRmyi+25m2khw9QDeV93dYv8rDjA3AYiWYxbJkEw5LdNi0r D7Q4gLNm4QDmaEW9VirzayLmXiEYVQjoKGEsE3nR/ilnilgJmcsJnIRanoAbMgZU kkE/CUXkkXqB5a7iOTUdOdl30rJn8Gcc2tDib8qgUXexitPHbImZ4anEvoLLYg/Y 2y2Jp7WRPuxOv8is8VxD0xSSjWNM1Q== =yeEl -----END PGP SIGNATURE----- --Sig_/9EV7ypJU+Sh=UazrZOlM+cB-- From unknown Mon Jun 23 04:14:43 2025 X-Loop: help-debbugs@gnu.org Subject: bug#34531: Guix profile fails on Overdrive 1000 Resent-From: Danny Milosavljevic Original-Sender: "Debbugs-submit" Resent-CC: bug-guix@gnu.org Resent-Date: Wed, 20 Feb 2019 10:52:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 34531 X-GNU-PR-Package: guix X-GNU-PR-Keywords: To: Ricardo Wurmus , Andreas Enge Cc: 34531@debbugs.gnu.org Received: via spool by 34531-submit@debbugs.gnu.org id=B34531.15506599087380 (code B ref 34531); Wed, 20 Feb 2019 10:52:02 +0000 Received: (at 34531) by debbugs.gnu.org; 20 Feb 2019 10:51:48 +0000 Received: from localhost ([127.0.0.1]:57212 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1gwPTf-0001ux-Le for submit@debbugs.gnu.org; Wed, 20 Feb 2019 05:51:48 -0500 Received: from dd26836.kasserver.com ([85.13.145.193]:56830) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1gwPTb-0001ul-7o for 34531@debbugs.gnu.org; Wed, 20 Feb 2019 05:51:45 -0500 Received: from localhost (178.113.229.202.wireless.dyn.drei.com [178.113.229.202]) by dd26836.kasserver.com (Postfix) with ESMTPSA id D354E33606BF; Wed, 20 Feb 2019 11:51:40 +0100 (CET) Date: Wed, 20 Feb 2019 11:51:36 +0100 From: Danny Milosavljevic Message-ID: <20190220115136.422bdf5b@scratchpost.org> In-Reply-To: <20190219161954.47234638@scratchpost.org> References: <20190218200552.GB1881@jurong> <87mumsom9l.fsf@fastmail.com> <20190219082728.GA5650@jurong> <87lg2bvrne.fsf@elephly.net> <20190219161954.47234638@scratchpost.org> X-Mailer: Claws Mail 3.17.3 (GTK+ 2.24.32; x86_64-unknown-linux-gnu) MIME-Version: 1.0 Content-Type: multipart/signed; micalg=pgp-sha256; boundary="Sig_/btOQbXvVawzbJasWJ5M7dL="; protocol="application/pgp-signature" X-Spam-Score: -0.7 (/) 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: -1.7 (-) --Sig_/btOQbXvVawzbJasWJ5M7dL= Content-Type: multipart/mixed; boundary="MP_/4hdFII990=3eWC1wdxRqwSO" --MP_/4hdFII990=3eWC1wdxRqwSO Content-Type: text/plain; charset=US-ASCII Content-Transfer-Encoding: quoted-printable Content-Disposition: inline I've started on implementing a replacement test generator, see attachment. Usage is exactly the same as the original generate.py. However, it hangs somewhere and I can't find how to step through a guile pr= ogram, even in emacs. Help? --MP_/4hdFII990=3eWC1wdxRqwSO Content-Type: text/x-scheme Content-Transfer-Encoding: quoted-printable Content-Disposition: attachment; filename=generate.scm ;; -*- geiser-scheme-implementation: guile -*- ;; Implementation: Danny Milosavljevic ;; Based on: Implementation in Python by Vicent Marti. ;; License: ISC, like the original generate.py in clar. (use-modules (ice-9 ftw)) (use-modules (ice-9 regex)) (use-modules (ice-9 getopt-long)) (use-modules (ice-9 rdelim)) (use-modules (ice-9 match)) (use-modules (ice-9 textual-ports)) (use-modules (srfi srfi-1)) (define (render-callback cb) (if (> (length cb) 0) (string-append " { \"" (assoc-ref cb "short-name") "\", &" (assoc-ref cb "symbol") " }") " { NULL, NULL }")) (define (replace needle replacement haystack) "Replace all occurences of NEEDLE in HAYSTACK by REPLACEMENT. NEEDLE is a regular expression." (regexp-substitute/global #f needle haystack 'pre replacement 'post)) (define (skip-comments text) (replace (string-append "//.*?$|" "/[*].*?[*]/|" "'([.]|[^'])*'|" "\"([.]|[^\"])*") "" text)) (define (maybe-only items) (match items ((a) a) (_ #f))) (define (Module name path excludes) (let* ((clean-name (replace "_" "::" name)) (enabled (not (any (lambda (exclude) (string-prefix? exclude clean-name)) excludes)))) (define (parse contents) (define (cons-match match prev) (cons `(("declaration" ,(match:substring match 1)) ("symbol" ,(match:substring match 2)) ("short-name" ,(match:substring match 3))) prev)) (let* ((contents (skip-comments contents)) (entries (fold-matches (string-append "^(void\\s+(test_" name "__(\\w+))\\s*\(\\s*void= \\s*\\))\\s*\\{") contents '() cons-match)) (callbacks (filter (lambda (entry) (match (assoc-ref entry "short-name") (("initialize" value) #f) (("cleanup" value) #f) (a #t))) entries))) (if (> (length callbacks) 0) '(("name" name) ("enabled" (if enabled "1" "0")) ("clean-name" clean-name) ("initialize" (maybe-only (filter-map (lambda (entry) (match (assoc-ref ent= ry "short-name") (("initialize" value= ) value) ((_ value) #f))) entries))) ("cleanup" (maybe-only (filter-map (lambda (entry) (match (assoc-ref entry = "short-name") (("cleanup" value) valu= e) ((_ value) #f))) entries))) ("callbacks" callbacks)) #f))) (define (refresh path) (and (file-exists? path) (parse (get-string-all path)))) (refresh path))) (define (generate-TestSuite path output excludes) (define (load) (define enter? (const #t)) (define (leaf file stat result) (let* ((module-root (string-drop file (string-length path))) (module-root (filter-map (match-lambda ("" #f) (a a)) (string-split module-root #\/)))) (define (make-module path) (let* ((name (string-join (append module-root (list (string-d= rop-right (basename path) (string-length ".c")))) "_")) (name (replace "-" "_" name))) (Module name path excludes))) (write file) (write module-root) (newline) (if (string-suffix? ".c" file) (let ((module (make-module file))) (if module (cons module result) result)) result))) (define (down dir stat result) result) (define (up file state result) result) (define skip (const #f)) (define error (const #f)) ; FIXME (write "fold") (newline) (file-system-fold enter? leaf down up skip error '() path)) (define (CallbacksTemplate module) (string-append "static const struct clar_func _clar_cb_" module-name = "[] =3D {\n" (string-join (map render-callback (assoc-ref module "c= allbacks")) ",\n") "\n};\n")) (define (DeclarationTemplate module) (string-append (string-join (map (lambda (cb) (string-append "extern" (assoc-ref cb "decl= aration") ";")) (assoc-ref module "callbacks")) "\n") "\n" (if (assoc-ref module "initialize") (string-append "extern " (assoc-ref (assoc-ref mod= ule "initialize") "declaration") ";\n") "") (if (assoc-ref module "cleanup") (string-append "extern " (assoc-ref (assoc-ref mod= ule "cleanup") "declaration") ";\n") ""))) (define (InfoTemplate module) (string-append " { \"" (assoc-ref module "clean-name") "\",\" " (render-callback (assoc-ref module "initialize")) ", " (render-callback (assoc-ref module "cleanup")) ", _clar_cb_" (assoc-ref module "name") ", " (length (assoc-ref module "callbacks")) ", " (assoc-ref module "enabled") " }")) (define (write data) (define (name< module-a module-b) (stringstring (suite-count))) (display-x ";\n") (display-x "static const size_t _clar_callback_count =3D ") (display-x (number->string (callback-count))) (display-x ";\n") (display (string-append "Written `clar.suite` (" callback-count " tes= ts in " suite-count " suites")) #t) (call-with-output-file (string-append output "/clar.suite") write)) ;;; main (define (main) (define option-spec '((force (single-char #\f) (value #f)) (exclude (single-char #\x) (value #t)) (output (single-char #\o) (value #t)) (help (single-char #\h) (value #f)))) (define options (getopt-long (command-line) option-spec #:stop-at-first-n= on-option #t)) (define args (reverse (option-ref options '() '()))) (when (> (length args) 1) (display "More than one path given\n") (exit 1)) (if (< (length args) 1) (set! args '("."))) (let* ((path (car args)) (output (option-ref options 'output path)) (excluded (filter-map (match-lambda (('exclude . value) value) (_ #f)) options))) (generate-TestSuite path output excluded))) (main) --MP_/4hdFII990=3eWC1wdxRqwSO-- --Sig_/btOQbXvVawzbJasWJ5M7dL= Content-Type: application/pgp-signature Content-Description: OpenPGP digital signature -----BEGIN PGP SIGNATURE----- iQEzBAEBCAAdFiEEds7GsXJ0tGXALbPZ5xo1VCwwuqUFAlxtMTgACgkQ5xo1VCww uqX2bwgAgOH8T5Kvv/kuMQf+NJJKNq+SBKydQ3plUsCwRIb9Pecvo1B30OdfDSmz YcMYYXANlFuqt45GcRiSO223/Vh2/a1Qu8GHNvM2/ycvzX/+IMAX7wh2SFpJs+pk 9IgaHU1Guxq8OSHzDN8suQXsfZByOY2Wmd+9bggxVw13RkBS/+iXy+mT5h99HG6i 6BKI430Y73pRi02UKFu/7Y253NKLVqgdHyuzwVqC5xViZUda0S/7YZ+wmZhF9iM3 lxkBKWr1dmdUEznsSz57udLU+HHVspT5jT7LCfKtJRQSsdigeHWhDt4m3njInoRh YeijMGIAZzYpw2of0UY+F0BZfJ5C8A== =/4nE -----END PGP SIGNATURE----- --Sig_/btOQbXvVawzbJasWJ5M7dL=-- From unknown Mon Jun 23 04:14:43 2025 X-Loop: help-debbugs@gnu.org Subject: bug#34531: Guix profile fails on Overdrive 1000 Resent-From: Ricardo Wurmus Original-Sender: "Debbugs-submit" Resent-CC: bug-guix@gnu.org Resent-Date: Wed, 20 Feb 2019 11:47:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 34531 X-GNU-PR-Package: guix X-GNU-PR-Keywords: To: Danny Milosavljevic Cc: 34531@debbugs.gnu.org, Andreas Enge Received: via spool by 34531-submit@debbugs.gnu.org id=B34531.155066320912759 (code B ref 34531); Wed, 20 Feb 2019 11:47:02 +0000 Received: (at 34531) by debbugs.gnu.org; 20 Feb 2019 11:46:49 +0000 Received: from localhost ([127.0.0.1]:57225 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1gwQKv-0003Ji-5b for submit@debbugs.gnu.org; Wed, 20 Feb 2019 06:46:49 -0500 Received: from sender-of-o51.zoho.com ([135.84.80.216]:21110) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1gwQKr-0003JW-8f for 34531@debbugs.gnu.org; Wed, 20 Feb 2019 06:46:46 -0500 ARC-Seal: i=1; a=rsa-sha256; t=1550663195; cv=none; d=zoho.com; s=zohoarc; b=CdYVL2BJpt0ohoL9CYsP7pDgbLs5WeDEwdr57zJ1/v2pSDqN4rInyzfwclkLFYB/3Ju7RrYo44722v6DaVoBX80VLKh/jtGkxY7/As4kOTqqP62cCrR8XDtPVc/EiVRNYPScYme7sM0NFNSdyXl3s6csYsfD3DqcGzSgagBUVCw= ARC-Message-Signature: i=1; a=rsa-sha256; c=relaxed/relaxed; d=zoho.com; s=zohoarc; t=1550663195; h=Content-Type:Cc:Date:From:In-Reply-To:MIME-Version:Message-ID:References:Subject:To:ARC-Authentication-Results; bh=E7RNl2otIUZ99U7NP4k3SUJylHN1dlYkAycdsojbOSE=; b=nSrQxHvm288wWt0ANZ2EQJUmjnDBfTVMa0vsQfr67zrYJJ9dRugTeZ9DSla74bUZ6KA7mihjICAJ6Eb9b2d5rnTMyTqwUHRtjZ24F5qlxKtiPMl9YRVpTwN62DrrpVvzUlf5cDJrPOdIxETHHoVBapenRUQKYPOalS9Ud/BX8fk= ARC-Authentication-Results: i=1; mx.zoho.com; dkim=pass header.i=elephly.net; spf=pass smtp.mailfrom=rekado@elephly.net; dmarc=pass header.from= header.from= DKIM-Signature: v=1; a=rsa-sha256; q=dns/txt; c=relaxed/relaxed; t=1550663195; s=zoho; d=elephly.net; i=rekado@elephly.net; h=References:From:To:Cc:Subject:In-reply-to:Date:Message-ID:MIME-Version:Content-Type; l=298; bh=E7RNl2otIUZ99U7NP4k3SUJylHN1dlYkAycdsojbOSE=; b=MuDExasNBwjXMlMF41g0R+wNKd0AYrL9wQ7HgSn2mcwL573iwtoLVQm1b9hCK8kY pQFN+1YJDa4suJaZf1dD2b+Zd2TTAMvx6jlojwzGnhyX4WU9XpZ60Kw9cdcaLriH+XX JLxRNjOI/uko7UMoZ0umwyVYtCE+JitAHPjlMid4= Received: from localhost (141.80.247.231 [141.80.247.231]) by mx.zohomail.com with SMTPS id 1550663194555505.8199128931095; Wed, 20 Feb 2019 03:46:34 -0800 (PST) References: <20190218200552.GB1881@jurong> <87mumsom9l.fsf@fastmail.com> <20190219082728.GA5650@jurong> <87lg2bvrne.fsf@elephly.net> <20190219161954.47234638@scratchpost.org> <20190220115136.422bdf5b@scratchpost.org> User-agent: mu4e 1.0; emacs 26.1 From: Ricardo Wurmus In-reply-to: <20190220115136.422bdf5b@scratchpost.org> X-URL: https://elephly.net X-PGP-Key: https://elephly.net/rekado.pubkey X-PGP-Fingerprint: BCA6 89B6 3655 3801 C3C6 2150 197A 5888 235F ACAC Date: Wed, 20 Feb 2019 12:46:30 +0100 Message-ID: <87va1eu1gp.fsf@elephly.net> MIME-Version: 1.0 Content-Type: text/plain X-ZohoMailClient: External X-Spam-Score: 0.0 (/) 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: -1.0 (-) Danny Milosavljevic writes: > I've started on implementing a replacement test generator, see attachment. Excellent! > Usage is exactly the same as the original generate.py. Can you show us how to use it? What files does a proper test require? -- Ricardo From unknown Mon Jun 23 04:14:43 2025 X-Loop: help-debbugs@gnu.org Subject: bug#34531: Guix profile fails on Overdrive 1000 Resent-From: Danny Milosavljevic Original-Sender: "Debbugs-submit" Resent-CC: bug-guix@gnu.org Resent-Date: Wed, 20 Feb 2019 13:27:01 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 34531 X-GNU-PR-Package: guix X-GNU-PR-Keywords: To: Ricardo Wurmus Cc: 34531@debbugs.gnu.org, Andreas Enge Received: via spool by 34531-submit@debbugs.gnu.org id=B34531.155066920729782 (code B ref 34531); Wed, 20 Feb 2019 13:27:01 +0000 Received: (at 34531) by debbugs.gnu.org; 20 Feb 2019 13:26:47 +0000 Received: from localhost ([127.0.0.1]:57260 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1gwRtf-0007kI-Fp for submit@debbugs.gnu.org; Wed, 20 Feb 2019 08:26:47 -0500 Received: from dd26836.kasserver.com ([85.13.145.193]:41394) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1gwRtd-0007k8-Om for 34531@debbugs.gnu.org; Wed, 20 Feb 2019 08:26:46 -0500 Received: from localhost (178.113.229.202.wireless.dyn.drei.com [178.113.229.202]) by dd26836.kasserver.com (Postfix) with ESMTPSA id 70DF23363697; Wed, 20 Feb 2019 14:26:42 +0100 (CET) Date: Wed, 20 Feb 2019 14:26:34 +0100 From: Danny Milosavljevic Message-ID: <20190220142634.56868dba@scratchpost.org> In-Reply-To: <87va1eu1gp.fsf@elephly.net> References: <20190218200552.GB1881@jurong> <87mumsom9l.fsf@fastmail.com> <20190219082728.GA5650@jurong> <87lg2bvrne.fsf@elephly.net> <20190219161954.47234638@scratchpost.org> <20190220115136.422bdf5b@scratchpost.org> <87va1eu1gp.fsf@elephly.net> X-Mailer: Claws Mail 3.17.3 (GTK+ 2.24.32; x86_64-unknown-linux-gnu) MIME-Version: 1.0 Content-Type: multipart/signed; micalg=pgp-sha256; boundary="Sig_/itIB7lrN+=B0jfCSa=lFgC6"; protocol="application/pgp-signature" X-Spam-Score: -0.7 (/) 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: -1.7 (-) --Sig_/itIB7lrN+=B0jfCSa=lFgC6 Content-Type: text/plain; charset=US-ASCII Content-Transfer-Encoding: quoted-printable Hi Ricardo, unpack libgit2-0.27.7, then invoke guile generate.scm -o /tmp -f -x online -x stress -x perf . in there. Reference: ./tests/CMakeLists.txt: COMMAND ${PYTHON_EXECUTABLE} generate.py -o "${CMAK= E_CURRENT_BINARY_DIR}" -f -xonline -xstress -xperf . (in libgit2) --Sig_/itIB7lrN+=B0jfCSa=lFgC6 Content-Type: application/pgp-signature Content-Description: OpenPGP digital signature -----BEGIN PGP SIGNATURE----- iQEzBAEBCAAdFiEEds7GsXJ0tGXALbPZ5xo1VCwwuqUFAlxtVYoACgkQ5xo1VCww uqUh5gf/f2cbfgCQYXuAfy+IdOSFX/pLR2L6JGg1qOnwsrRUve98kTzwbHDiPnqa sYiaGemBu+0krTmDMHCQ5ILvKvSIWhTggmGbxwzsB8En6QDA/eLXGuFKFd9BeWQY eyPvkbQV0K03uLW60LHZI4FCMt+O+BvQs9pMC6VYBlN/ExpYE2SPc6yw9I7JHcUT Sz57bAn4KlojHg9vlZpoJHCfMPj7/icm6fQsxnxgBHhmQaQnykOuqGuHePZf34Xb usLv0YpSPKkaCQoBLMAGYfO8Nvgx1eNKukBmB/kkK4M2JMGXW5cze/VoM1YmirW4 6gjWfTDDPlqGXIgQfWVg0fTp+POEsg== =x9tW -----END PGP SIGNATURE----- --Sig_/itIB7lrN+=B0jfCSa=lFgC6-- From unknown Mon Jun 23 04:14:43 2025 X-Loop: help-debbugs@gnu.org Subject: bug#34531: Guix profile fails on Overdrive 1000 Resent-From: Danny Milosavljevic Original-Sender: "Debbugs-submit" Resent-CC: bug-guix@gnu.org Resent-Date: Wed, 20 Feb 2019 13:29:01 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 34531 X-GNU-PR-Package: guix X-GNU-PR-Keywords: To: Ricardo Wurmus Cc: 34531@debbugs.gnu.org, Andreas Enge Received: via spool by 34531-submit@debbugs.gnu.org id=B34531.155066929729935 (code B ref 34531); Wed, 20 Feb 2019 13:29:01 +0000 Received: (at 34531) by debbugs.gnu.org; 20 Feb 2019 13:28:17 +0000 Received: from localhost ([127.0.0.1]:57265 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1gwRv5-0007mi-Td for submit@debbugs.gnu.org; Wed, 20 Feb 2019 08:28:17 -0500 Received: from dd26836.kasserver.com ([85.13.145.193]:41506) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1gwRv4-0007ma-Eb for 34531@debbugs.gnu.org; Wed, 20 Feb 2019 08:28:14 -0500 Received: from localhost (178.113.229.202.wireless.dyn.drei.com [178.113.229.202]) by dd26836.kasserver.com (Postfix) with ESMTPSA id 41B023360862; Wed, 20 Feb 2019 14:28:13 +0100 (CET) Date: Wed, 20 Feb 2019 14:28:11 +0100 From: Danny Milosavljevic Message-ID: <20190220142811.6add03bf@scratchpost.org> In-Reply-To: <87va1eu1gp.fsf@elephly.net> References: <20190218200552.GB1881@jurong> <87mumsom9l.fsf@fastmail.com> <20190219082728.GA5650@jurong> <87lg2bvrne.fsf@elephly.net> <20190219161954.47234638@scratchpost.org> <20190220115136.422bdf5b@scratchpost.org> <87va1eu1gp.fsf@elephly.net> X-Mailer: Claws Mail 3.17.3 (GTK+ 2.24.32; x86_64-unknown-linux-gnu) MIME-Version: 1.0 Content-Type: multipart/signed; micalg=pgp-sha256; boundary="Sig_/qNk62TBSjxHCd3LX8rLEM0G"; protocol="application/pgp-signature" X-Spam-Score: -0.7 (/) 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: -1.7 (-) --Sig_/qNk62TBSjxHCd3LX8rLEM0G Content-Type: text/plain; charset=US-ASCII Content-Transfer-Encoding: quoted-printable > What files does a proper test require? generate.scm scans the files with the glob "*.c" for functions test_... and refers all of those in a new file "clar.suite" in the directory specified by "-o". --Sig_/qNk62TBSjxHCd3LX8rLEM0G Content-Type: application/pgp-signature Content-Description: OpenPGP digital signature -----BEGIN PGP SIGNATURE----- iQEzBAEBCAAdFiEEds7GsXJ0tGXALbPZ5xo1VCwwuqUFAlxtVesACgkQ5xo1VCww uqX4oAf7BiXK4olMgf/LmI56XN/W57NCc8rYQTvq/roA4i5zCymOvDk66LnRY2gf yePbsrJIm/GzP0Mp9QbxrxE+rl4aIB7Cd4dY2v7K8Zf7wp+HV6xJNLcyLovMJ1dB /nFAe3cgXcU8qI9C3aoDXDboCDzqfinK6gy84O9G/oHPvqVtZOunLThU9cLFPyfc OWlXyE7ubp/Zxu5jr9b/iB1U2+LuCGo4IFnegexGU3gt7DmDcFVk4VlTE6WQAuUa N59uSHgjm/TtGD0KKjx0vKIzjTdC3xYSaZKlZk/Bi5riClMXZeA3czl+P/ZL5GmS yjVH3tkPkJLMLqJG0KBC30XHnnUodQ== =e1vb -----END PGP SIGNATURE----- --Sig_/qNk62TBSjxHCd3LX8rLEM0G-- From unknown Mon Jun 23 04:14:43 2025 X-Loop: help-debbugs@gnu.org Subject: bug#34531: Guix profile fails on Overdrive 1000 Resent-From: Ricardo Wurmus Original-Sender: "Debbugs-submit" Resent-CC: bug-guix@gnu.org Resent-Date: Wed, 20 Feb 2019 15:58:01 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 34531 X-GNU-PR-Package: guix X-GNU-PR-Keywords: To: Danny Milosavljevic Cc: 34531@debbugs.gnu.org, Andreas Enge Received: via spool by 34531-submit@debbugs.gnu.org id=B34531.155067822112117 (code B ref 34531); Wed, 20 Feb 2019 15:58:01 +0000 Received: (at 34531) by debbugs.gnu.org; 20 Feb 2019 15:57:01 +0000 Received: from localhost ([127.0.0.1]:58325 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1gwUF2-00039G-PE for submit@debbugs.gnu.org; Wed, 20 Feb 2019 10:57:01 -0500 Received: from sender-of-o51.zoho.com ([135.84.80.216]:21086) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1gwUEx-000395-F5 for 34531@debbugs.gnu.org; Wed, 20 Feb 2019 10:56:56 -0500 ARC-Seal: i=1; a=rsa-sha256; t=1550678199; cv=none; d=zoho.com; s=zohoarc; b=nzHmJBuwEYgPfYdsioazBpPohSkPIBft+KIziIzvH4VmmALNamJdRwUJKGI31uKnoFuTvDPV3ofxvV6YGrWh5DHbGA+Ld8Rr/d7Mdfofc1fV/BhU0KjnXixOpMbeYzVHI2txClvI5vzU27TCdRy/GquHJljMSVqVqXYuujQaUlc= ARC-Message-Signature: i=1; a=rsa-sha256; c=relaxed/relaxed; d=zoho.com; s=zohoarc; t=1550678199; h=Content-Type:Cc:Date:From:In-Reply-To:MIME-Version:Message-ID:References:Subject:To:ARC-Authentication-Results; bh=3ncvZllXQl5hTtUC8XWkOrXQPuPItTTm/RSgQmvZo4I=; b=X7thKVxqXF4KF2TmiEA1cZG8Z3UeaWTxeW5C5qlzTB1imcPJIGAIl7Ya6uXeaCdaOBbEpIfAbTgyzyEdAvef9BXShsPhi4LNibsywjlHjoOa9Xdwiax7c7aeNIl9mMayw48ZNmvoClqtGdIAAQRUjT4LEBC0EYOWsWJ8e0oytj4= ARC-Authentication-Results: i=1; mx.zoho.com; dkim=pass header.i=elephly.net; spf=pass smtp.mailfrom=rekado@elephly.net; dmarc=pass header.from= header.from= DKIM-Signature: v=1; a=rsa-sha256; q=dns/txt; c=relaxed/relaxed; t=1550678199; s=zoho; d=elephly.net; i=rekado@elephly.net; h=References:From:To:Cc:Subject:In-reply-to:Date:Message-ID:MIME-Version:Content-Type; l=13597; bh=3ncvZllXQl5hTtUC8XWkOrXQPuPItTTm/RSgQmvZo4I=; b=beIry9c32ksrSFj/Z4hVw9eNhJLTblEyK3m9LdJGdZ0MO/6DAH/59RE5vS0aJ5aF DcWZ7GF1ueaa6+XaOQfR2tjUGvFGtoqmCXMStK8YDG65k3LnW8upzu1XejZr4YvUog+ lKUU65ZAUfVHWZdOmHBbaHWH+M2OrqjOHXBy9rJE= Received: from localhost (141.80.247.231 [141.80.247.231]) by mx.zohomail.com with SMTPS id 1550678198987763.1154217677966; Wed, 20 Feb 2019 07:56:38 -0800 (PST) References: <20190218200552.GB1881@jurong> <87mumsom9l.fsf@fastmail.com> <20190219082728.GA5650@jurong> <87lg2bvrne.fsf@elephly.net> <20190219161954.47234638@scratchpost.org> <20190220115136.422bdf5b@scratchpost.org> <87va1eu1gp.fsf@elephly.net> <20190220142634.56868dba@scratchpost.org> User-agent: mu4e 1.0; emacs 26.1 From: Ricardo Wurmus In-reply-to: <20190220142634.56868dba@scratchpost.org> X-URL: https://elephly.net X-PGP-Key: https://elephly.net/rekado.pubkey X-PGP-Fingerprint: BCA6 89B6 3655 3801 C3C6 2150 197A 5888 235F ACAC Date: Wed, 20 Feb 2019 16:56:35 +0100 Message-ID: <87k1hutpvw.fsf@elephly.net> MIME-Version: 1.0 Content-Type: multipart/mixed; boundary="=-=-=" X-Zoho-Virus-Status: 1 X-ZohoMailClient: External X-Spam-Score: 0.0 (/) 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: -1.0 (-) --=-=-= Content-Type: text/plain; charset=utf-8 Content-Transfer-Encoding: quoted-printable Hi Danny, > unpack libgit2-0.27.7, then invoke > > guile generate.scm -o /tmp -f -x online -x stress -x perf . > > in there. Thanks for the instructions. One of the problems is that you use and also overwrite =E2=80=9Cwrite=E2=80= =9D, which is a core Scheme procedure. I renamed it to =E2=80=9CWrite=E2=80=9D = and modified the invocation to (call-with-output-file (string-append output "/clar.suite") Write) which leads to this error: --8<---------------cut here---------------start------------->8--- =E2=80=A6 In ice-9/ftw.scm: 482:39 4 (loop _ _ #(64768 139272 16877 51 1000 1000 0 4096 1550677456 = 0 1550677457 4096 8 directory 493 818358318 0 1550677457) _ _) In ice-9/eval.scm: 293:34 3 (_ #(#(#(#(#(# "." ("perf" "str= ess" "online")) "./tests/clar_libgit2_timer.c" #(64768 132360 33188 1 1000 = 1000 0 =E2=80=A6) =E2=80=A6) =E2=80=A6) =E2=80=A6) =E2=80=A6)) 191:35 2 (_ #(#(# #>) "./tests/clar_libgit2_timer.c")) In ice-9/rdelim.scm: 160:18 1 (read-string _) In unknown file: 0 (read-char "./tests/clar_libgit2_timer.c") ERROR: In procedure read-char: In procedure read-char: Wrong type argument in position 1 (expecting open i= nput port): "./tests/clar_libgit2_timer.c" --8<---------------cut here---------------end--------------->8--- Simple mistake: you called =E2=80=9Cget-string-all=E2=80=9D on a string (st= ored in =E2=80=9Cpath=E2=80=9D), but you need to use (call-with-input-file path get= -string-all) instead. Next error is about a bad regex (forgot one escape character); and a type error follows that. The fixed version is attached. -- Ricardo --=-=-= Content-Type: application/octet-stream Content-Disposition: attachment; filename=generate.scm Content-Transfer-Encoding: base64 OzsgLSotIGdlaXNlci1zY2hlbWUtaW1wbGVtZW50YXRpb246IGd1aWxlIC0qLQoKOzsgSW1wbGVt ZW50YXRpb246IERhbm55IE1pbG9zYXZsamV2aWMgPGRhbm55bUBzY3JhdGNocG9zdC5vcmc+Cjs7 IEJhc2VkIG9uOiBJbXBsZW1lbnRhdGlvbiBpbiBQeXRob24gYnkgVmljZW50IE1hcnRpLgo7OyBM aWNlbnNlOiBJU0MsIGxpa2UgdGhlIG9yaWdpbmFsIGdlbmVyYXRlLnB5IGluIGNsYXIuCih1c2Ut bW9kdWxlcyAoaWNlLTkgZnR3KSkKKHVzZS1tb2R1bGVzIChpY2UtOSByZWdleCkpCih1c2UtbW9k dWxlcyAoaWNlLTkgZ2V0b3B0LWxvbmcpKQoodXNlLW1vZHVsZXMgKGljZS05IHJkZWxpbSkpCih1 c2UtbW9kdWxlcyAoaWNlLTkgbWF0Y2gpKQoodXNlLW1vZHVsZXMgKGljZS05IHRleHR1YWwtcG9y dHMpKQoodXNlLW1vZHVsZXMgKHNyZmkgc3JmaS0xKSkKCihkZWZpbmUgKHJlbmRlci1jYWxsYmFj ayBjYikKICAoaWYgKD4gKGxlbmd0aCBjYikgMCkKICAgICAgKHN0cmluZy1hcHBlbmQgIiAgICB7 IFwiIiAoYXNzb2MtcmVmIGNiICJzaG9ydC1uYW1lIikgIlwiLCAmIgogICAgICAgICAgICAgICAg ICAgICAoYXNzb2MtcmVmIGNiICJzeW1ib2wiKSAiIH0iKQogICAgICAiICAgIHsgTlVMTCwgTlVM TCB9IikpCgooZGVmaW5lIChyZXBsYWNlIG5lZWRsZSByZXBsYWNlbWVudCBoYXlzdGFjaykKICAi UmVwbGFjZSBhbGwgb2NjdXJlbmNlcyBvZiBORUVETEUgaW4gSEFZU1RBQ0sgYnkgUkVQTEFDRU1F TlQuCk5FRURMRSBpcyBhIHJlZ3VsYXIgZXhwcmVzc2lvbi4iCiAgKHJlZ2V4cC1zdWJzdGl0dXRl L2dsb2JhbCAjZiBuZWVkbGUgaGF5c3RhY2sgJ3ByZSByZXBsYWNlbWVudCAncG9zdCkpCgooZGVm aW5lIChza2lwLWNvbW1lbnRzIHRleHQpCiAgKHJlcGxhY2UgKHN0cmluZy1hcHBlbmQgIi8vLio/ JHwiCiAgICAgICAgICAgICAgICAgICAgICAgICAgIi9bKl0uKj9bKl0vfCIKICAgICAgICAgICAg ICAgICAgICAgICAgICAiJyhbLl18W14nXSkqJ3wiCiAgICAgICAgICAgICAgICAgICAgICAgICAg IlwiKFsuXXxbXlwiXSkqIikKICAgICAgICAgICAiIiB0ZXh0KSkKCihkZWZpbmUgKG1heWJlLW9u bHkgaXRlbXMpCiAgKG1hdGNoIGl0ZW1zCiAgICgoYSkgYSkKICAgKF8gI2YpKSkKCihkZWZpbmUg KE1vZHVsZSBuYW1lIHBhdGggZXhjbHVkZXMpCiAgKGxldCogKChjbGVhbi1uYW1lIChyZXBsYWNl ICJfIiAiOjoiIG5hbWUpKQogICAgICAgICAoZW5hYmxlZCAobm90IChhbnkgKGxhbWJkYSAoZXhj bHVkZSkKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgKHN0cmluZy1wcmVmaXg/IGV4Y2x1 ZGUgY2xlYW4tbmFtZSkpCiAgICAgICAgICAgICAgICAgICAgICAgICAgICBleGNsdWRlcykpKSkK ICAgIChkZWZpbmUgKHBhcnNlIGNvbnRlbnRzKQogICAgICAoZGVmaW5lIChjb25zLW1hdGNoIG1h dGNoIHByZXYpCiAgICAgICAgKGNvbnMKICAgICAgICAgYCgoImRlY2xhcmF0aW9uIiAsKG1hdGNo OnN1YnN0cmluZyBtYXRjaCAxKSkKICAgICAgICAgICAoInN5bWJvbCIgLChtYXRjaDpzdWJzdHJp bmcgbWF0Y2ggMikpCiAgICAgICAgICAgKCJzaG9ydC1uYW1lIiAsKG1hdGNoOnN1YnN0cmluZyBt YXRjaCAzKSkpCiAgICAgICAgIHByZXYpKQogICAgICAobGV0KiAoKGNvbnRlbnRzIChza2lwLWNv bW1lbnRzIGNvbnRlbnRzKSkKICAgICAgICAgICAgIChlbnRyaWVzIChmb2xkLW1hdGNoZXMgKHN0 cmluZy1hcHBlbmQgIl4odm9pZFxccysodGVzdF8iCiAgICAgICAgICAgICAgICAgICAgICAgICAg ICAgICAgICAgICAgICAgICAgICAgICAgIG5hbWUKICAgICAgICAgICAgICAgICAgICAgICAgICAg ICAgICAgICAgICAgICAgICAgICAgICAgIl9fKFxcdyspKVxccypcXChcXHMqdm9pZFxccypcXCkp XFxzKlxceyIpCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIGNvbnRlbnRzCiAg ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICcoKQogICAgICAgICAgICAgICAgICAg ICAgICAgICAgICAgICAgICBjb25zLW1hdGNoKSkKICAgICAgICAgICAgIChjYWxsYmFja3MgKGZp bHRlciAobGFtYmRhIChlbnRyeSkKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAo bWF0Y2ggKGFzc29jLXJlZiBlbnRyeSAic2hvcnQtbmFtZSIpCiAgICAgICAgICAgICAgICAgICAg ICAgICAgICAgICAgICAgICgoImluaXRpYWxpemUiIHZhbHVlKSAjZikKICAgICAgICAgICAgICAg ICAgICAgICAgICAgICAgICAgICAgKCgiY2xlYW51cCIgdmFsdWUpICNmKQogICAgICAgICAgICAg ICAgICAgICAgICAgICAgICAgICAgICAoYSAjdCkpKQogICAgICAgICAgICAgICAgICAgICAgICAg ICAgICAgICBlbnRyaWVzKSkpCiAgICAgICAgKGlmICg+IChsZW5ndGggY2FsbGJhY2tzKSAwKQog ICAgICAgICAgICAnKCgibmFtZSIgbmFtZSkKICAgICAgICAgICAgICAoImVuYWJsZWQiIChpZiBl bmFibGVkICIxIiAiMCIpKQogICAgICAgICAgICAgICgiY2xlYW4tbmFtZSIgY2xlYW4tbmFtZSkK ICAgICAgICAgICAgICAoImluaXRpYWxpemUiIChtYXliZS1vbmx5IChmaWx0ZXItbWFwIChsYW1i ZGEgKGVudHJ5KQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg ICAgICAgICAobWF0Y2ggKGFzc29jLXJlZiBlbnRyeSAic2hvcnQtbmFtZSIpCiAgICAgICAgICAg ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAoKCJpbml0aWFsaXpl IiB2YWx1ZSkgdmFsdWUpCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg ICAgICAgICAgICAgICAoKF8gdmFsdWUpICNmKSkpCiAgICAgICAgICAgICAgICAgICAgICAgICAg ICAgICAgICAgICAgICAgICAgICAgICAgICBlbnRyaWVzKSkpCiAgICAgICAgICAgICAgKCJjbGVh bnVwIiAobWF5YmUtb25seSAoZmlsdGVyLW1hcCAobGFtYmRhIChlbnRyeSkKICAgICAgICAgICAg ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgKG1hdGNoIChhc3NvYy1yZWYg ZW50cnkgInNob3J0LW5hbWUiKQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg ICAgICAgICAgICAgICAgKCgiY2xlYW51cCIgdmFsdWUpIHZhbHVlKQogICAgICAgICAgICAgICAg ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgKChfIHZhbHVlKSAjZikpKQogICAg ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgZW50cmllcykpKQog ICAgICAgICAgICAgICgiY2FsbGJhY2tzIiBjYWxsYmFja3MpKQogICAgICAgICAgICAjZikpKQoK ICAgIChkZWZpbmUgKHJlZnJlc2ggcGF0aCkKICAgICAgKGFuZCAoZmlsZS1leGlzdHM/IHBhdGgp CiAgICAgICAgICAgKHBhcnNlIChjYWxsLXdpdGgtaW5wdXQtZmlsZSBwYXRoIGdldC1zdHJpbmct YWxsKSkpKQogICAgKHJlZnJlc2ggcGF0aCkpKQoKKGRlZmluZSAoZ2VuZXJhdGUtVGVzdFN1aXRl IHBhdGggb3V0cHV0IGV4Y2x1ZGVzKQogICAgKGRlZmluZSAobG9hZCkKICAgICAgICAoZGVmaW5l IGVudGVyPyAoY29uc3QgI3QpKQogICAgICAgIChkZWZpbmUgKGxlYWYgZmlsZSBzdGF0IHJlc3Vs dCkKICAgICAgICAgIChsZXQqICgobW9kdWxlLXJvb3QgKHN0cmluZy1kcm9wIGZpbGUgKHN0cmlu Zy1sZW5ndGggcGF0aCkpKQogICAgICAgICAgICAgICAgIChtb2R1bGUtcm9vdCAoZmlsdGVyLW1h cCAobWF0Y2gtbGFtYmRhCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg ICAoIiIgI2YpCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAoYSBh KSkKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgKHN0cmluZy1zcGxp dCBtb2R1bGUtcm9vdCAjXC8pKSkpCiAgICAgICAgICAgIChkZWZpbmUgKG1ha2UtbW9kdWxlIHBh dGgpCiAgICAgICAgICAgICAgKGxldCogKChuYW1lIChzdHJpbmctam9pbiAoYXBwZW5kIG1vZHVs ZS1yb290IChsaXN0IChzdHJpbmctZHJvcC1yaWdodCAoYmFzZW5hbWUgcGF0aCkgKHN0cmluZy1s ZW5ndGggIi5jIikpKSkgIl8iKSkKICAgICAgICAgICAgICAgICAgICAgKG5hbWUgKHJlcGxhY2Ug Ii0iICJfIiBuYW1lKSkpCiAgICAgICAgICAgICAgICAoTW9kdWxlIG5hbWUgcGF0aCBleGNsdWRl cykpKQogICAgICAgICAgICAod3JpdGUgZmlsZSkKICAgICAgICAgICAgKHdyaXRlIG1vZHVsZS1y b290KQogICAgICAgICAgICAobmV3bGluZSkKICAgICAgICAgICAgKGlmIChzdHJpbmctc3VmZml4 PyAiLmMiIGZpbGUpCiAgICAgICAgICAgICAgICAobGV0ICgobW9kdWxlIChtYWtlLW1vZHVsZSBm aWxlKSkpCiAgICAgICAgICAgICAgICAgIChpZiBtb2R1bGUKICAgICAgICAgICAgICAgICAgICAg IChjb25zIG1vZHVsZSByZXN1bHQpCiAgICAgICAgICAgICAgICAgICAgICByZXN1bHQpKQogICAg ICAgICAgICAgICAgcmVzdWx0KSkpCiAgICAgICAgKGRlZmluZSAoZG93biBkaXIgc3RhdCByZXN1 bHQpCiAgICAgICAgICByZXN1bHQpCiAgICAgICAgKGRlZmluZSAodXAgZmlsZSBzdGF0ZSByZXN1 bHQpCiAgICAgICAgICByZXN1bHQpCiAgICAgICAgKGRlZmluZSBza2lwIChjb25zdCAjZikpCiAg ICAgICAgKGRlZmluZSBlcnJvciAoY29uc3QgI2YpKSA7IEZJWE1FCiAgICAgICAgKHdyaXRlICJm b2xkIikKICAgICAgICAobmV3bGluZSkKICAgICAgICAoZmlsZS1zeXN0ZW0tZm9sZCBlbnRlcj8g bGVhZiBkb3duIHVwIHNraXAgZXJyb3IgJygpIHBhdGgpKQoKICAgIChkZWZpbmUgKENhbGxiYWNr c1RlbXBsYXRlIG1vZHVsZSkKICAgICAgKHN0cmluZy1hcHBlbmQgInN0YXRpYyBjb25zdCBzdHJ1 Y3QgY2xhcl9mdW5jIF9jbGFyX2NiXyIgbW9kdWxlLW5hbWUgIltdID0ge1xuIgogICAgICAgICAg ICAgICAgICAgICAoc3RyaW5nLWpvaW4gKG1hcCByZW5kZXItY2FsbGJhY2sgKGFzc29jLXJlZiBt b2R1bGUgImNhbGxiYWNrcyIpKSAiLFxuIikKICAgICAgICAgICAgICAgICAgICAgIlxufTtcbiIp KQoKICAgIChkZWZpbmUgKERlY2xhcmF0aW9uVGVtcGxhdGUgbW9kdWxlKQogICAgICAoc3RyaW5n LWFwcGVuZCAoc3RyaW5nLWpvaW4gKG1hcCAobGFtYmRhIChjYikKICAgICAgICAgICAgICAgICAg ICAgICAgICAgICAgICAgICAgICAgICAoc3RyaW5nLWFwcGVuZCAiZXh0ZXJuIgogICAgICAgICAg ICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgIChhc3NvYy1yZWYg Y2IgImRlY2xhcmF0aW9uIikKICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg ICAgICAgICAgICAgICAgICAiOyIpKQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAg ICAgICAoYXNzb2MtcmVmIG1vZHVsZSAiY2FsbGJhY2tzIikpCiAgICAgICAgICAgICAgICAgICAg ICAgICAgICAgICAgICAiXG4iKQogICAgICAgICAgICAgICAgICAgICAiXG4iCiAgICAgICAgICAg ICAgICAgICAgIChpZiAoYXNzb2MtcmVmIG1vZHVsZSAiaW5pdGlhbGl6ZSIpCiAgICAgICAgICAg ICAgICAgICAgICAgICAoc3RyaW5nLWFwcGVuZCAiZXh0ZXJuICIgKGFzc29jLXJlZiAoYXNzb2Mt cmVmIG1vZHVsZSAiaW5pdGlhbGl6ZSIpICJkZWNsYXJhdGlvbiIpICI7XG4iKQogICAgICAgICAg ICAgICAgICAgICAgICAgIiIpCiAgICAgICAgICAgICAgICAgICAgIChpZiAoYXNzb2MtcmVmIG1v ZHVsZSAiY2xlYW51cCIpCiAgICAgICAgICAgICAgICAgICAgICAgICAoc3RyaW5nLWFwcGVuZCAi ZXh0ZXJuICIgKGFzc29jLXJlZiAoYXNzb2MtcmVmIG1vZHVsZSAiY2xlYW51cCIpICJkZWNsYXJh dGlvbiIpICI7XG4iKQogICAgICAgICAgICAgICAgICAgICAgICAgIiIpKSkKCiAgICAoZGVmaW5l IChJbmZvVGVtcGxhdGUgbW9kdWxlKQogICAgICAoc3RyaW5nLWFwcGVuZCAiCiAgICB7CiAgICAg ICAgXCIiIChhc3NvYy1yZWYgbW9kdWxlICJjbGVhbi1uYW1lIikgIlwiLFwiCiAgICAgICAgIiAo cmVuZGVyLWNhbGxiYWNrIChhc3NvYy1yZWYgbW9kdWxlICJpbml0aWFsaXplIikpICIsCiAgICAg ICAgIiAocmVuZGVyLWNhbGxiYWNrIChhc3NvYy1yZWYgbW9kdWxlICJjbGVhbnVwIikpICIsCiAg ICAgICAgICAgIF9jbGFyX2NiXyIgKGFzc29jLXJlZiBtb2R1bGUgIm5hbWUiKSAiLCAiCiAgICAg ICAgICAgIChsZW5ndGggKGFzc29jLXJlZiBtb2R1bGUgImNhbGxiYWNrcyIpKQogICAgICAgICAg ICAiLCAiIChhc3NvYy1yZWYgbW9kdWxlICJlbmFibGVkIikgIgogICAgfSIpKQoKICAgIChkZWZp bmUgKFdyaXRlIGRhdGEpCiAgICAgIChkZWZpbmUgKG5hbWU8IG1vZHVsZS1hIG1vZHVsZS1iKQog ICAgICAgIChzdHJpbmc8PyAoYXNzb2MtcmVmIG1vZHVsZS1hICJuYW1lIikKICAgICAgICAgICAg ICAgICAgKGFzc29jLXJlZiBtb2R1bGUtYiAibmFtZSIpKSkKICAgICAgKGRlZmluZSBtb2R1bGVz IChzb3J0IChsb2FkKSBuYW1lPCkpCgogICAgICAoZGVmaW5lIChzdWl0ZS1jb3VudCkKICAgICAg ICAobGVuZ3RoIG1vZHVsZXMpKQoKICAgICAgKGRlZmluZSAoY2FsbGJhY2stY291bnQpCiAgICAg ICAgKGZvbGQgKyAwIChtYXAgKGxhbWJkYSAoZW50cnkpCiAgICAgICAgICAgICAgICAgICAgICAg ICAoYXNzb2MtcmVmIGVudHJ5ICJjYWxsYmFja3MiKSkKICAgICAgICAgICAgICAgICAgICAgICAg IG1vZHVsZXMpKSkKCiAgICAgIChkZWZpbmUgKGRpc3BsYXkteCB2YWx1ZSkKICAgICAgICAoZGlz cGxheSB2YWx1ZSBkYXRhKSkKCiAgICAgIChmb3ItZWFjaCAoY29tcG9zZSBkaXNwbGF5LXggRGVj bGFyYXRpb25UZW1wbGF0ZSkgbW9kdWxlcykKICAgICAgKGZvci1lYWNoIChjb21wb3NlIGRpc3Bs YXkteCBDYWxsYmFja3NUZW1wbGF0ZSkgbW9kdWxlcykKCiAgICAgIChkaXNwbGF5LXggInN0YXRp YyBzdHJ1Y3QgY2xhcl9zdWl0ZSBfY2xhcl9zdWl0ZXNbXSA9IHsiKQogICAgICAoZGlzcGxheS14 IChzdHJpbmctam9pbiAobWFwIEluZm9UZW1wbGF0ZSBtb2R1bGVzKSAiLCIpKQogICAgICAoZGlz cGxheS14ICJcbn07XG4iKQoKICAgICAgKGxldCAoKHN1aXRlLWNvdW50LXN0ciAobnVtYmVyLT5z dHJpbmcgKHN1aXRlLWNvdW50KSkpCiAgICAgICAgICAgIChjYWxsYmFjay1jb3VudC1zdHIgKG51 bWJlci0+c3RyaW5nIChjYWxsYmFjay1jb3VudCkpKSkKICAgICAgICAoZGlzcGxheS14ICJzdGF0 aWMgY29uc3Qgc2l6ZV90IF9jbGFyX3N1aXRlX2NvdW50ID0gIikKICAgICAgICAoZGlzcGxheS14 IHN1aXRlLWNvdW50LXN0cikKICAgICAgICAoZGlzcGxheS14ICI7XG4iKQoKICAgICAgICAoZGlz cGxheS14ICJzdGF0aWMgY29uc3Qgc2l6ZV90IF9jbGFyX2NhbGxiYWNrX2NvdW50ID0gIikKICAg ICAgICAoZGlzcGxheS14IGNhbGxiYWNrLWNvdW50LXN0cikKICAgICAgICAoZGlzcGxheS14ICI7 XG4iKQoKICAgICAgICAoZGlzcGxheSAoc3RyaW5nLWFwcGVuZCAiV3JpdHRlbiBgY2xhci5zdWl0 ZWAgKCIgY2FsbGJhY2stY291bnQtc3RyICIgdGVzdHMgaW4gIiBzdWl0ZS1jb3VudC1zdHIgIiBz dWl0ZXMpIikpCiAgICAgICAgKG5ld2xpbmUpKQogICAgICAjdCkKCiAgICAoY2FsbC13aXRoLW91 dHB1dC1maWxlIChzdHJpbmctYXBwZW5kIG91dHB1dCAiL2NsYXIuc3VpdGUiKSBXcml0ZSkpCgo7 OzsgbWFpbgoKKGRlZmluZSAobWFpbikKICAoZGVmaW5lIG9wdGlvbi1zcGVjCiAgICAnKChmb3Jj ZSAoc2luZ2xlLWNoYXIgI1xmKSAodmFsdWUgI2YpKQogICAgICAoZXhjbHVkZSAoc2luZ2xlLWNo YXIgI1x4KSAodmFsdWUgI3QpKQogICAgICAob3V0cHV0IChzaW5nbGUtY2hhciAjXG8pICh2YWx1 ZSAjdCkpCiAgICAgIChoZWxwICAoc2luZ2xlLWNoYXIgI1xoKSAodmFsdWUgI2YpKSkpCgogIChk ZWZpbmUgb3B0aW9ucyAoZ2V0b3B0LWxvbmcgKGNvbW1hbmQtbGluZSkgb3B0aW9uLXNwZWMgIzpz dG9wLWF0LWZpcnN0LW5vbi1vcHRpb24gI3QpKQogIChkZWZpbmUgYXJncyAocmV2ZXJzZSAob3B0 aW9uLXJlZiBvcHRpb25zICcoKSAnKCkpKSkKICAod2hlbiAoPiAobGVuZ3RoIGFyZ3MpIDEpCiAg ICAoZGlzcGxheSAiTW9yZSB0aGFuIG9uZSBwYXRoIGdpdmVuXG4iKQogICAgKGV4aXQgMSkpCgog IChpZiAoPCAobGVuZ3RoIGFyZ3MpIDEpCiAgICAgIChzZXQhIGFyZ3MgJygiLiIpKSkKCiAgKGxl dCogKChwYXRoIChjYXIgYXJncykpCiAgICAgICAgIChvdXRwdXQgKG9wdGlvbi1yZWYgb3B0aW9u cyAnb3V0cHV0IHBhdGgpKQogICAgICAgICAoZXhjbHVkZWQgKGZpbHRlci1tYXAgKG1hdGNoLWxh bWJkYQogICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICgoJ2V4Y2x1ZGUgLiB2YWx1ZSkg dmFsdWUpCiAgICAgICAgICAgICAgICAgICAgICAgICAgICAgICAgKF8gI2YpKQogICAgICAgICAg ICAgICAgICAgICAgICAgICAgICAgb3B0aW9ucykpKQogICAgKGdlbmVyYXRlLVRlc3RTdWl0ZSBw YXRoIG91dHB1dCBleGNsdWRlZCkpKQoKKG1haW4pCg== --=-=-=-- From unknown Mon Jun 23 04:14:43 2025 X-Loop: help-debbugs@gnu.org Subject: bug#34531: Guix profile fails on Overdrive 1000 Resent-From: Danny Milosavljevic Original-Sender: "Debbugs-submit" Resent-CC: bug-guix@gnu.org Resent-Date: Wed, 20 Feb 2019 16:27:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 34531 X-GNU-PR-Package: guix X-GNU-PR-Keywords: To: Ricardo Wurmus Cc: 34531@debbugs.gnu.org, Andreas Enge Received: via spool by 34531-submit@debbugs.gnu.org id=B34531.155067997122881 (code B ref 34531); Wed, 20 Feb 2019 16:27:02 +0000 Received: (at 34531) by debbugs.gnu.org; 20 Feb 2019 16:26:11 +0000 Received: from localhost ([127.0.0.1]:58364 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1gwUhH-0005wy-HI for submit@debbugs.gnu.org; Wed, 20 Feb 2019 11:26:11 -0500 Received: from dd26836.kasserver.com ([85.13.145.193]:57380) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1gwUhG-0005wq-55 for 34531@debbugs.gnu.org; Wed, 20 Feb 2019 11:26:10 -0500 Received: from localhost (178.113.229.202.wireless.dyn.drei.com [178.113.229.202]) by dd26836.kasserver.com (Postfix) with ESMTPSA id 77964336038A; Wed, 20 Feb 2019 17:26:08 +0100 (CET) Date: Wed, 20 Feb 2019 17:26:03 +0100 From: Danny Milosavljevic Message-ID: <20190220172603.1a675f61@scratchpost.org> In-Reply-To: <87k1hutpvw.fsf@elephly.net> References: <20190218200552.GB1881@jurong> <87mumsom9l.fsf@fastmail.com> <20190219082728.GA5650@jurong> <87lg2bvrne.fsf@elephly.net> <20190219161954.47234638@scratchpost.org> <20190220115136.422bdf5b@scratchpost.org> <87va1eu1gp.fsf@elephly.net> <20190220142634.56868dba@scratchpost.org> <87k1hutpvw.fsf@elephly.net> X-Mailer: Claws Mail 3.17.3 (GTK+ 2.24.32; x86_64-unknown-linux-gnu) MIME-Version: 1.0 Content-Type: multipart/signed; micalg=pgp-sha256; boundary="Sig_/vgysCInMRJ8N.vr_G971G2l"; protocol="application/pgp-signature" X-Spam-Score: -0.7 (/) 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: -1.7 (-) --Sig_/vgysCInMRJ8N.vr_G971G2l Content-Type: text/plain; charset=US-ASCII Content-Transfer-Encoding: quoted-printable Hi Ricardo, On Wed, 20 Feb 2019 16:56:35 +0100 Ricardo Wurmus wrote: > The fixed version is attached. Thanks a lot! It almost works, but it seems not to find the "test_" lines. I've reduced the problem to: scheme@(guile-user)> ,use (ice-9 regex) scheme@(guile-user)> (fold-matches "^void" "blah\nvoid\n" '() cons) $24 =3D () After reading the documentation, I've revised it to: scheme@(guile-user)> ,use (ice-9 regex) scheme@(guile-user)> (fold-matches "^void" "blah\nvoid\n" '() cons regexp/n= ewline) $25 =3D () Huh? --Sig_/vgysCInMRJ8N.vr_G971G2l Content-Type: application/pgp-signature Content-Description: OpenPGP digital signature -----BEGIN PGP SIGNATURE----- iQEzBAEBCAAdFiEEds7GsXJ0tGXALbPZ5xo1VCwwuqUFAlxtf5sACgkQ5xo1VCww uqVeYwf/aUVQE+sMF0Pb1ShOd7rqfxul1KJ9Df2UUSTwJ9PihshZHcDALpEQ3M72 mEOBwNH5iY4kqaKB0gWHoCU+InUEp5Ggd3+4rfBbJvxxjBsXNWmegcUe/Tf7pEf0 t9JVgDXymPSZpW3e09E8EMCRvRViIp2pWh4BxDMzfjCR6iyhzmronReVh1Vx1VWU tVZqnzAf0xHCwsUr1wMVLepLH6tM1hOrwRPAK/e3m18et2RGF0hPH2yU4C6jh2u0 oBtrleHB1sI29OsGffBSrWRURgXWbNurUknAcTWCEz111L+2TfQmQ/tnn1x1xnHh tpOG3lyIIlEDlGo2edJJ19msOAdu7g== =VnTa -----END PGP SIGNATURE----- --Sig_/vgysCInMRJ8N.vr_G971G2l-- From unknown Mon Jun 23 04:14:43 2025 X-Loop: help-debbugs@gnu.org Subject: bug#34531: Guix profile fails on Overdrive 1000 Resent-From: Ricardo Wurmus Original-Sender: "Debbugs-submit" Resent-CC: bug-guix@gnu.org Resent-Date: Wed, 20 Feb 2019 20:54:01 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 34531 X-GNU-PR-Package: guix X-GNU-PR-Keywords: To: Danny Milosavljevic Cc: 34531@debbugs.gnu.org, Andreas Enge Received: via spool by 34531-submit@debbugs.gnu.org id=B34531.155069604016253 (code B ref 34531); Wed, 20 Feb 2019 20:54:01 +0000 Received: (at 34531) by debbugs.gnu.org; 20 Feb 2019 20:54:00 +0000 Received: from localhost ([127.0.0.1]:58624 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1gwYsS-0004E5-Hp for submit@debbugs.gnu.org; Wed, 20 Feb 2019 15:54:00 -0500 Received: from sender-of-o51.zoho.com ([135.84.80.216]:21029) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1gwYsR-0004Du-9T for 34531@debbugs.gnu.org; Wed, 20 Feb 2019 15:53:59 -0500 ARC-Seal: i=1; a=rsa-sha256; t=1550696025; cv=none; d=zoho.com; s=zohoarc; b=O1BlYn8Krs2rB4djA55lBF8MWsxysreAJIlJew45i1fFtrlvF+6b/sanwxvNYhk8j/lc5TcILOF1fw1ArBJnFXzaK+nWVZseuGiWVRBH0EA++s3JAUdChD+h/dznZv1RlFnI/8fX9kz9d/alloLxYvh4a5ranr/To6xoW84CMvY= ARC-Message-Signature: i=1; a=rsa-sha256; c=relaxed/relaxed; d=zoho.com; s=zohoarc; t=1550696025; h=Content-Type:Cc:Date:From:In-Reply-To:MIME-Version:Message-ID:References:Subject:To:ARC-Authentication-Results; bh=x0XDBU/ZidMb5+eGEqD6jaI/d2eov4pH4l9o1aGbjW0=; b=OxBE7AFx87+jfSLiEBNGwWlqI9QllXh7B3xvjP7sl6WVvAOddaZdM6j5zNda15mi1hoxWoiPG4uoeEfikIzis/Aw2kdZGMRf/6nqtkEwtxpo/FwyuTyANFW3lk16ZFpSjSDM+osDGcgmx0NZ5U3xzy9dWYTX7LemWnjUKz1k2BM= ARC-Authentication-Results: i=1; mx.zoho.com; dkim=pass header.i=elephly.net; spf=pass smtp.mailfrom=rekado@elephly.net; dmarc=pass header.from= header.from= DKIM-Signature: v=1; a=rsa-sha256; q=dns/txt; c=relaxed/relaxed; t=1550696025; s=zoho; d=elephly.net; i=rekado@elephly.net; h=References:From:To:Cc:Subject:In-reply-to:Date:Message-ID:MIME-Version:Content-Type; l=695; bh=x0XDBU/ZidMb5+eGEqD6jaI/d2eov4pH4l9o1aGbjW0=; b=EeNV1ThxZLjvhkZPzQu0oIYCMoyDMEmmOmPy3nQe3vh2AVZKsTfOlpkp7Lkn10/A KUiiHQimmAHAISbzCQlnIF0iQs15vTJYZwDeYFesLNtHPA4ki1At6jViGbxDkeR8scV 2etjqDklvIP+GULqtJ+82eXMAJztvLDJbmS0wFx8= Received: from localhost (p54AD468B.dip0.t-ipconnect.de [84.173.70.139]) by mx.zohomail.com with SMTPS id 1550696023370172.388255449638; Wed, 20 Feb 2019 12:53:43 -0800 (PST) References: <20190218200552.GB1881@jurong> <87mumsom9l.fsf@fastmail.com> <20190219082728.GA5650@jurong> <87lg2bvrne.fsf@elephly.net> <20190219161954.47234638@scratchpost.org> <20190220115136.422bdf5b@scratchpost.org> <87va1eu1gp.fsf@elephly.net> <20190220142634.56868dba@scratchpost.org> <87k1hutpvw.fsf@elephly.net> <20190220172603.1a675f61@scratchpost.org> User-agent: mu4e 1.0; emacs 26.1 From: Ricardo Wurmus In-reply-to: <20190220172603.1a675f61@scratchpost.org> X-URL: https://elephly.net X-PGP-Key: https://elephly.net/rekado.pubkey X-PGP-Fingerprint: BCA6 89B6 3655 3801 C3C6 2150 197A 5888 235F ACAC Date: Wed, 20 Feb 2019 21:53:39 +0100 Message-ID: <87a7iq5gh8.fsf@elephly.net> MIME-Version: 1.0 Content-Type: text/plain X-ZohoMailClient: External X-Spam-Score: 0.0 (/) 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: -1.0 (-) Danny Milosavljevic writes: > It almost works, but it seems not to find the "test_" lines. > > I've reduced the problem to: > > scheme@(guile-user)> ,use (ice-9 regex) > scheme@(guile-user)> (fold-matches "^void" "blah\nvoid\n" '() cons) > $24 = () > > After reading the documentation, I've revised it to: > > scheme@(guile-user)> ,use (ice-9 regex) > scheme@(guile-user)> (fold-matches "^void" "blah\nvoid\n" '() cons regexp/newline) > $25 = () Try this instead: (fold-matches (make-regexp "^void" regexp/newline) "blah\nvoid\n" '() cons) Or rather (list-matches (make-regexp "^void" regexp/newline) "blah\nvoid\n") -- Ricardo From unknown Mon Jun 23 04:14:43 2025 X-Loop: help-debbugs@gnu.org Subject: bug#34531: Guix profile fails on Overdrive 1000 Resent-From: Danny Milosavljevic Original-Sender: "Debbugs-submit" Resent-CC: bug-guix@gnu.org Resent-Date: Wed, 20 Feb 2019 22:10:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 34531 X-GNU-PR-Package: guix X-GNU-PR-Keywords: To: 34531@debbugs.gnu.org Cc: Ricardo Wurmus , Andreas Enge Received: via spool by 34531-submit@debbugs.gnu.org id=B34531.15507005497023 (code B ref 34531); Wed, 20 Feb 2019 22:10:02 +0000 Received: (at 34531) by debbugs.gnu.org; 20 Feb 2019 22:09:09 +0000 Received: from localhost ([127.0.0.1]:58704 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1gwa3B-0001pD-53 for submit@debbugs.gnu.org; Wed, 20 Feb 2019 17:09:09 -0500 Received: from dd26836.kasserver.com ([85.13.145.193]:55910) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1gwa38-0001ow-N8 for 34531@debbugs.gnu.org; Wed, 20 Feb 2019 17:09:07 -0500 Received: from localhost (178.113.229.202.wireless.dyn.drei.com [178.113.229.202]) by dd26836.kasserver.com (Postfix) with ESMTPSA id 0C65C3360675; Wed, 20 Feb 2019 23:09:03 +0100 (CET) Date: Wed, 20 Feb 2019 23:08:57 +0100 From: Danny Milosavljevic Message-ID: <20190220230857.2282d9b1@scratchpost.org> In-Reply-To: <87a7iq5gh8.fsf@elephly.net> References: <20190218200552.GB1881@jurong> <87mumsom9l.fsf@fastmail.com> <20190219082728.GA5650@jurong> <87lg2bvrne.fsf@elephly.net> <20190219161954.47234638@scratchpost.org> <20190220115136.422bdf5b@scratchpost.org> <87va1eu1gp.fsf@elephly.net> <20190220142634.56868dba@scratchpost.org> <87k1hutpvw.fsf@elephly.net> <20190220172603.1a675f61@scratchpost.org> <87a7iq5gh8.fsf@elephly.net> X-Mailer: Claws Mail 3.17.3 (GTK+ 2.24.32; x86_64-unknown-linux-gnu) MIME-Version: 1.0 Content-Type: multipart/signed; micalg=pgp-sha256; boundary="Sig_/lR._XZIHMBGvr_bjxHS5M=g"; protocol="application/pgp-signature" X-Spam-Score: -0.7 (/) 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: -1.7 (-) --Sig_/lR._XZIHMBGvr_bjxHS5M=g Content-Type: multipart/mixed; boundary="MP_/VP48/+qdshZALJq3nKstA.L" --MP_/VP48/+qdshZALJq3nKstA.L Content-Type: text/plain; charset=US-ASCII Content-Transfer-Encoding: quoted-printable Content-Disposition: inline First somewhat working version attached... It finds 1387 tests in 328 suites. The original finds 2611 tests in 349 suites. That's because skip-comments is somehow broken. An example where it has an error very early is tests/core/futils.c : (use-modules (ice-9 ftw)) (use-modules (ice-9 regex)) (use-modules (ice-9 getopt-long)) (use-modules (ice-9 rdelim)) (use-modules (ice-9 match)) (use-modules (ice-9 textual-ports)) (use-modules (srfi srfi-1)) (define fname "test/core/futils.c") (define s (call-with-input-file fname get-string-all)) (define (replace needle replacement haystack) "Replace all occurences of NEEDLE in HAYSTACK by REPLACEMENT. NEEDLE is a regular expression." (regexp-substitute/global #f needle haystack 'pre replacement 'post)) (define (skip-comments text) (replace (string-append "//[^\n]*?|" "/[*].*?[*]/|" "'([.]|[^'])*?'|" "\"([.]|[^\"])*?\"") "" text)) (write (skip-comments s)) ; very short, for some reason --MP_/VP48/+qdshZALJq3nKstA.L Content-Type: text/x-scheme Content-Transfer-Encoding: quoted-printable Content-Disposition: attachment; filename=generate.scm ;; -*- geiser-scheme-implementation: guile -*- ;;; Implementation: Danny Milosavljevic ;;; Based on: Implementation in Python by Vicent Marti. ;;; License: ISC, like the original generate.py in clar. (use-modules (ice-9 ftw)) (use-modules (ice-9 regex)) (use-modules (ice-9 getopt-long)) (use-modules (ice-9 rdelim)) (use-modules (ice-9 match)) (use-modules (ice-9 textual-ports)) (use-modules (srfi srfi-1)) (define (render-callback cb) (if cb (string-append " { \"" (assoc-ref cb "short-name") "\", &" (assoc-ref cb "symbol") " }") " { NULL, NULL }")) (define (rxegexp-substitute/global flags port regexp string . items) ;; If `port' is #f, send output to a string. (if (not port) (call-with-output-string (lambda (p) (apply regexp-substitute/global flags p regexp string items))) ;; Walk the set of non-overlapping, maximal matches. (let next-match ((matches (list-matches regexp string flags)) (start 0)) (if (null? matches) (display (substring string start) port) (let ((m (car matches))) ;; Process all of the items for this match. Don't use ;; for-each, because we need to make sure 'post at the ;; end of the item list is a tail call. (let next-item ((items items)) (define (do-item item) (cond ((string? item) (display item port)) ((integer? item) (display (match:substring m item) por= t)) ((procedure? item) (display (item m) port)) ((eq? item 'pre) (display (substring string start (match:start m)) port)) ((eq? item 'post) (next-match (cdr matches) (match:end m))) (else (error 'wrong-type-arg item)))) (if (pair? items) (if (null? (cdr items)) (do-item (car items)) ; This is a tail call. (begin (do-item (car items)) ; This is not. (next-item (cdr items))))))))))) (define (replace needle replacement haystack) "Replace all occurences of NEEDLE in HAYSTACK by REPLACEMENT. NEEDLE is a regular expression." (regexp-substitute/global #f needle haystack 'pre replacement 'post)) (define (skip-comments text) (replace (string-append "//[^\n]*?|" "/[*].*?[*]/|" "'([.]|[^'])*?'|" "\"([.]|[^\"])*?\"") "" text)) (define (maybe-only items) (match items ((a) a) (_ #f))) (define (Module name path excludes) (write name) (write path) (newline) (let* ((clean-name (replace "_" "::" name)) (enabled (not (any (lambda (exclude) (string-prefix? exclude clean-name)) excludes)))) (define (parse contents) (define (cons-match match prev) (cons `(("declaration" . ,(match:substring match 1)) ("symbol" . ,(match:substring match 2)) ("short-name" . ,(match:substring match 3))) prev)) (let* ((contents (skip-comments contents)) (entries (fold-matches (make-regexp (string-append "^(void\\s+(test_" name "__(\\w+))\\s*\\(\\s*vo= id\\s*\\))\\s*\\{") regexp/newline) contents '() cons-match)) (callbacks (filter (lambda (entry) (match (assoc-ref entry "short-name") ("initialize" #f) ("cleanup" #f) (_ #t))) entries))) (write callbacks) (newline) (if (> (length callbacks) 0) `(("name" . ,name) ("enabled" . ,(if enabled "1" "0")) ("clean-name" . ,clean-name) ("initialize" . ,(maybe-only (filter-map (lambda (entry) (match (assoc-ref ent= ry "short-name") ("initialize" entry) (_ #f))) entries))) ("cleanup" . ,(maybe-only (filter-map (lambda (entry) (match (assoc-ref entry = "short-name") ("cleanup" entry) (_ #f))) entries))) ("callbacks" . ,callbacks)) #f))) (define (refresh path) (and (file-exists? path) (parse (call-with-input-file path get-string-all)))) (refresh path))) (define (generate-TestSuite path output excludes) (define (load) (define enter? (const #t)) (define (leaf file stat result) (let* ((module-root (string-drop (dirname file) (string-length path))) (module-root (filter-map (match-lambda ("" #f) (a a)) (string-split module-root #\/)))) (define (make-module path) (let* ((name (string-join (append module-root (list (string-d= rop-right (basename path) (string-length ".c")))) "_")) (name (replace "-" "_" name))) (Module name path excludes))) (if (string-suffix? ".c" file) (let ((module (make-module file))) (if module (cons module result) result)) result))) (define (down dir stat result) result) (define (up file state result) result) (define skip (const #f)) (define error (const #f)) ; FIXME (file-system-fold enter? leaf down up skip error '() path)) (define (CallbacksTemplate module) (string-append "static const struct clar_func _clar_cb_" (assoc-ref module "name") "[] =3D {\n" (string-join (map render-callback (assoc-ref module "callbacks")) ",\n") "\n};\n")) (define (DeclarationTemplate module) (string-append (string-join (map (lambda (cb) (string-append "extern " (assoc-ref cb "decl= aration") ";")) (assoc-ref module "callbacks")) "\n") "\n" (if (assoc-ref module "initialize") (string-append "extern " (assoc-ref (assoc-ref mod= ule "initialize") "declaration") ";\n") "") (if (assoc-ref module "cleanup") (string-append "extern " (assoc-ref (assoc-ref mod= ule "cleanup") "declaration") ";\n") ""))) (define (InfoTemplate module) (string-append " { \"" (assoc-ref module "clean-name") "\", " (render-callback (assoc-ref module "initialize")) ", " (render-callback (assoc-ref module "cleanup")) ", _clar_cb_" (assoc-ref module "name") ", " (number->string (length (assoc-ref module "callbacks"))) ", " (assoc-ref module "enabled") " }")) (define (Write data) (define (name< module-a module-b) (stringstring (suite-count))) (callback-count-str (number->string (callback-count)))) (display-x "static const size_t _clar_suite_count =3D ") (display-x suite-count-str) (display-x ";\n") (display-x "static const size_t _clar_callback_count =3D ") (display-x callback-count-str) (display-x ";\n") (display (string-append "Written `clar.suite` (" callback-count-str " tests in " suite-count-str " suites)")) (newline)) #t) (call-with-output-file (string-append output "/clar.suite") Write)) ;;; main (define (main) (define option-spec '((force (single-char #\f) (value #f)) (exclude (single-char #\x) (value #t)) (output (single-char #\o) (value #t)) (help (single-char #\h) (value #f)))) (define options (getopt-long (command-line) option-spec #:stop-at-first-n= on-option #t)) (define args (reverse (option-ref options '() '()))) (when (> (length args) 1) (display "More than one path given\n") (exit 1)) (if (< (length args) 1) (set! args '("."))) (let* ((path (car args)) (output (option-ref options 'output path)) (excluded (filter-map (match-lambda (('exclude . value) value) (_ #f)) options))) (generate-TestSuite path output excluded))) (main) --MP_/VP48/+qdshZALJq3nKstA.L-- --Sig_/lR._XZIHMBGvr_bjxHS5M=g Content-Type: application/pgp-signature Content-Description: OpenPGP digital signature -----BEGIN PGP SIGNATURE----- iQEzBAEBCAAdFiEEds7GsXJ0tGXALbPZ5xo1VCwwuqUFAlxtz/kACgkQ5xo1VCww uqU1swf+Nx7zNqgtixg3I8YGIHyHJ0Ve1sUMOgoSDgQu/cyAZkVyeWefozSTen5P 3DS4IoYTbjg4FnZkqtX5udW80H6iyoxA82AxkXN9CT9nEXMDlLjwvxZzY8pUxIUp KO5VCSAsNuj9LTfu/RC2gtGdzuw+h2QTejlhEYu7eiBtA8eih3WYu975ZtjdZyaO J6xwmzpQauB6VlUmgn7TmUTm3jKkR2KlKGa5v26pZfb6eYQKv6sJSXt5FZkElfOz +AU4KnTlqKuu03TmBtoUyBRQ0tL0GCwJHP5fbuW/Dq/PNoGE3WPViEgf4K6hGjuJ bXDtpJm3e+l74rCco1FkR9W6iQr20A== =1MH8 -----END PGP SIGNATURE----- --Sig_/lR._XZIHMBGvr_bjxHS5M=g-- From unknown Mon Jun 23 04:14:43 2025 X-Loop: help-debbugs@gnu.org Subject: bug#34531: Guix profile fails on Overdrive 1000 Resent-From: Danny Milosavljevic Original-Sender: "Debbugs-submit" Resent-CC: bug-guix@gnu.org Resent-Date: Wed, 20 Feb 2019 22:29:01 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 34531 X-GNU-PR-Package: guix X-GNU-PR-Keywords: To: 34531@debbugs.gnu.org Cc: Ricardo Wurmus , Andreas Enge Received: via spool by 34531-submit@debbugs.gnu.org id=B34531.15507017318825 (code B ref 34531); Wed, 20 Feb 2019 22:29:01 +0000 Received: (at 34531) by debbugs.gnu.org; 20 Feb 2019 22:28:51 +0000 Received: from localhost ([127.0.0.1]:58722 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1gwaMF-0002IH-9t for submit@debbugs.gnu.org; Wed, 20 Feb 2019 17:28:51 -0500 Received: from dd26836.kasserver.com ([85.13.145.193]:57548) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1gwaMC-0002I7-EF for 34531@debbugs.gnu.org; Wed, 20 Feb 2019 17:28:49 -0500 Received: from localhost (178.113.229.202.wireless.dyn.drei.com [178.113.229.202]) by dd26836.kasserver.com (Postfix) with ESMTPSA id 8C0DC3360675; Wed, 20 Feb 2019 23:28:46 +0100 (CET) Date: Wed, 20 Feb 2019 23:28:33 +0100 From: Danny Milosavljevic Message-ID: <20190220232833.3a437681@scratchpost.org> In-Reply-To: <20190220230857.2282d9b1@scratchpost.org> References: <20190218200552.GB1881@jurong> <87mumsom9l.fsf@fastmail.com> <20190219082728.GA5650@jurong> <87lg2bvrne.fsf@elephly.net> <20190219161954.47234638@scratchpost.org> <20190220115136.422bdf5b@scratchpost.org> <87va1eu1gp.fsf@elephly.net> <20190220142634.56868dba@scratchpost.org> <87k1hutpvw.fsf@elephly.net> <20190220172603.1a675f61@scratchpost.org> <87a7iq5gh8.fsf@elephly.net> <20190220230857.2282d9b1@scratchpost.org> X-Mailer: Claws Mail 3.17.3 (GTK+ 2.24.32; x86_64-unknown-linux-gnu) MIME-Version: 1.0 Content-Type: multipart/signed; micalg=pgp-sha256; boundary="Sig_/Vj/+qrZqGNc4yo.3Y.OPOS3"; protocol="application/pgp-signature" X-Spam-Score: -0.7 (/) 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: -1.7 (-) --Sig_/Vj/+qrZqGNc4yo.3Y.OPOS3 Content-Type: multipart/mixed; boundary="MP_/0hZv1g5rsG.x8jU_xHGoo+m" --MP_/0hZv1g5rsG.x8jU_xHGoo+m Content-Type: text/plain; charset=US-ASCII Content-Transfer-Encoding: quoted-printable Content-Disposition: inline On Wed, 20 Feb 2019 23:08:57 +0100 Danny Milosavljevic wrote: > First somewhat working version attached... >=20 > It finds 1387 tests in 328 suites. >=20 > The original finds 2611 tests in 349 suites. >=20 > That's because skip-comments is somehow broken. Another example is tests/repo/pathspec.c where the vast majority of the fil= e is missing. In any case, leaving the call of skip-comments off, it finds 2611 tests in = 349 suites (see attachment). So either we find the problem in skip-comments, or we leave it off. In bot= h cases, this can be used in order to generate the test metadata for libgit= 2 now. --MP_/0hZv1g5rsG.x8jU_xHGoo+m Content-Type: text/x-scheme Content-Transfer-Encoding: quoted-printable Content-Disposition: attachment; filename=generate.scm ;; -*- geiser-scheme-implementation: guile -*- ;;; Implementation: Danny Milosavljevic ;;; Based on: Implementation in Python by Vicent Marti. ;;; License: ISC, like the original generate.py in clar. (use-modules (ice-9 ftw)) (use-modules (ice-9 regex)) (use-modules (ice-9 getopt-long)) (use-modules (ice-9 rdelim)) (use-modules (ice-9 match)) (use-modules (ice-9 textual-ports)) (use-modules (srfi srfi-1)) (define (render-callback cb) (if cb (string-append " { \"" (assoc-ref cb "short-name") "\", &" (assoc-ref cb "symbol") " }") " { NULL, NULL }")) (define (rxegexp-substitute/global flags port regexp string . items) ;; If `port' is #f, send output to a string. (if (not port) (call-with-output-string (lambda (p) (apply regexp-substitute/global flags p regexp string items))) ;; Walk the set of non-overlapping, maximal matches. (let next-match ((matches (list-matches regexp string flags)) (start 0)) (if (null? matches) (display (substring string start) port) (let ((m (car matches))) ;; Process all of the items for this match. Don't use ;; for-each, because we need to make sure 'post at the ;; end of the item list is a tail call. (let next-item ((items items)) (define (do-item item) (cond ((string? item) (display item port)) ((integer? item) (display (match:substring m item) por= t)) ((procedure? item) (display (item m) port)) ((eq? item 'pre) (display (substring string start (match:start m)) port)) ((eq? item 'post) (next-match (cdr matches) (match:end m))) (else (error 'wrong-type-arg item)))) (if (pair? items) (if (null? (cdr items)) (do-item (car items)) ; This is a tail call. (begin (do-item (car items)) ; This is not. (next-item (cdr items))))))))))) (define (replace needle replacement haystack) "Replace all occurences of NEEDLE in HAYSTACK by REPLACEMENT. NEEDLE is a regular expression." (regexp-substitute/global #f needle haystack 'pre replacement 'post)) (define (skip-comments text) (replace (string-append "//[^\n]*?|" "/[*].*?[*]/|" "'([.]|[^'])*?'|" "\"([.]|[^\"])*?\"") "" text)) (define (maybe-only items) (match items ((a) a) (_ #f))) (define (Module name path excludes) (write name) (write path) (newline) (let* ((clean-name (replace "_" "::" name)) (enabled (not (any (lambda (exclude) (string-prefix? exclude clean-name)) excludes)))) (define (parse contents) (define (cons-match match prev) (cons `(("declaration" . ,(match:substring match 1)) ("symbol" . ,(match:substring match 2)) ("short-name" . ,(match:substring match 3))) prev)) (let* ((contents2 (skip-comments contents)) (entries (fold-matches (make-regexp (string-append "^(void\\s+(test_" name "__(\\w+))\\s*\\(\\s*vo= id\\s*\\))\\s*\\{") regexp/newline) contents '() cons-match)) (callbacks (filter (lambda (entry) (match (assoc-ref entry "short-name") ("initialize" #f) ("cleanup" #f) (_ #t))) entries))) (write callbacks) (newline) (if (> (length callbacks) 0) `(("name" . ,name) ("enabled" . ,(if enabled "1" "0")) ("clean-name" . ,clean-name) ("initialize" . ,(maybe-only (filter-map (lambda (entry) (match (assoc-ref ent= ry "short-name") ("initialize" entry) (_ #f))) entries))) ("cleanup" . ,(maybe-only (filter-map (lambda (entry) (match (assoc-ref entry = "short-name") ("cleanup" entry) (_ #f))) entries))) ("callbacks" . ,callbacks)) #f))) (define (refresh path) (and (file-exists? path) (parse (call-with-input-file path get-string-all)))) (refresh path))) (define (generate-TestSuite path output excludes) (define (load) (define enter? (const #t)) (define (leaf file stat result) (let* ((module-root (string-drop (dirname file) (string-length path))) (module-root (filter-map (match-lambda ("" #f) (a a)) (string-split module-root #\/)))) (define (make-module path) (let* ((name (string-join (append module-root (list (string-d= rop-right (basename path) (string-length ".c")))) "_")) (name (replace "-" "_" name))) (Module name path excludes))) (if (string-suffix? ".c" file) (let ((module (make-module file))) (if module (cons module result) result)) result))) (define (down dir stat result) result) (define (up file state result) result) (define skip (const #f)) (define error (const #f)) ; FIXME (file-system-fold enter? leaf down up skip error '() path)) (define (CallbacksTemplate module) (string-append "static const struct clar_func _clar_cb_" (assoc-ref module "name") "[] =3D {\n" (string-join (map render-callback (assoc-ref module "callbacks")) ",\n") "\n};\n")) (define (DeclarationTemplate module) (string-append (string-join (map (lambda (cb) (string-append "extern " (assoc-ref cb "decl= aration") ";")) (assoc-ref module "callbacks")) "\n") "\n" (if (assoc-ref module "initialize") (string-append "extern " (assoc-ref (assoc-ref mod= ule "initialize") "declaration") ";\n") "") (if (assoc-ref module "cleanup") (string-append "extern " (assoc-ref (assoc-ref mod= ule "cleanup") "declaration") ";\n") ""))) (define (InfoTemplate module) (string-append " { \"" (assoc-ref module "clean-name") "\", " (render-callback (assoc-ref module "initialize")) ", " (render-callback (assoc-ref module "cleanup")) ", _clar_cb_" (assoc-ref module "name") ", " (number->string (length (assoc-ref module "callbacks"))) ", " (assoc-ref module "enabled") " }")) (define (Write data) (define (name< module-a module-b) (stringstring (suite-count))) (callback-count-str (number->string (callback-count)))) (display-x "static const size_t _clar_suite_count =3D ") (display-x suite-count-str) (display-x ";\n") (display-x "static const size_t _clar_callback_count =3D ") (display-x callback-count-str) (display-x ";\n") (display (string-append "Written `clar.suite` (" callback-count-str " tests in " suite-count-str " suites)")) (newline)) #t) (call-with-output-file (string-append output "/clar.suite") Write)) ;;; main (define (main) (define option-spec '((force (single-char #\f) (value #f)) (exclude (single-char #\x) (value #t)) (output (single-char #\o) (value #t)) (help (single-char #\h) (value #f)))) (define options (getopt-long (command-line) option-spec #:stop-at-first-n= on-option #t)) (define args (reverse (option-ref options '() '()))) (when (> (length args) 1) (display "More than one path given\n") (exit 1)) (if (< (length args) 1) (set! args '("."))) (let* ((path (car args)) (output (option-ref options 'output path)) (excluded (filter-map (match-lambda (('exclude . value) value) (_ #f)) options))) (generate-TestSuite path output excluded))) (main) --MP_/0hZv1g5rsG.x8jU_xHGoo+m-- --Sig_/Vj/+qrZqGNc4yo.3Y.OPOS3 Content-Type: application/pgp-signature Content-Description: OpenPGP digital signature -----BEGIN PGP SIGNATURE----- iQEzBAEBCAAdFiEEds7GsXJ0tGXALbPZ5xo1VCwwuqUFAlxt1JEACgkQ5xo1VCww uqXWAAf/TN3c93zRwvLvV3Udw4SkYcgo20Ln0LbJWmu7J6FRWyOsNxlvkqvpUEd1 1IFO231WI1vsQ/OkeEWeqYvHMSOm+6zeBwUZwNwOoxUX11m7Trm0WOCvV/TsfiWU b3/8oifnKvYLfXgjP0AOZ5R/z+JVABPuOB8sGLLGf0JxrZ8+6/rVb2uyazsYm7T5 D7ITKmjb4UxcDB5Vva3pVBCRV2gNPjGps+THIvBM87Shm9caB/0jsFLEu/jntgjF 70ixuOd6frxFz3F07YuoXgYghJPnvdoiujAIZuFRRUTT+6y9Htrc/uVZeXSVaUFP 7jacGvkZDkkgDsBAaFGRCPcAbg+XAw== =+gkR -----END PGP SIGNATURE----- --Sig_/Vj/+qrZqGNc4yo.3Y.OPOS3-- From unknown Mon Jun 23 04:14:43 2025 X-Loop: help-debbugs@gnu.org Subject: bug#34531: Guix profile fails on Overdrive 1000 Resent-From: Ricardo Wurmus Original-Sender: "Debbugs-submit" Resent-CC: bug-guix@gnu.org Resent-Date: Sat, 23 Feb 2019 11:21:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 34531 X-GNU-PR-Package: guix X-GNU-PR-Keywords: To: Danny Milosavljevic Cc: 34531@debbugs.gnu.org, Andreas Enge Received: via spool by 34531-submit@debbugs.gnu.org id=B34531.155092083032077 (code B ref 34531); Sat, 23 Feb 2019 11:21:02 +0000 Received: (at 34531) by debbugs.gnu.org; 23 Feb 2019 11:20:30 +0000 Received: from localhost ([127.0.0.1]:48938 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1gxVM5-0008LJ-JI for submit@debbugs.gnu.org; Sat, 23 Feb 2019 06:20:29 -0500 Received: from sender-of-o51.zoho.com ([135.84.80.216]:21032) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1gxVM3-0008L9-E7 for 34531@debbugs.gnu.org; Sat, 23 Feb 2019 06:20:28 -0500 ARC-Seal: i=1; a=rsa-sha256; t=1550920812; cv=none; d=zoho.com; s=zohoarc; b=IctcuCp2YFnHc+2bEl09WcG7vNQxCuaYRNjMKIDEwR2EF1R3ehX29iHULasRh+oimaHZhJuLuWrhMIBfOrsPvD04bHKo0kisCyTd52yR6e9CY70Hi7aVKuJYnfBA4MvQy0gvUWjmGhkyKtV7H5yE95M0hAhHEl+CKE+JYE3/H0Q= ARC-Message-Signature: i=1; a=rsa-sha256; c=relaxed/relaxed; d=zoho.com; s=zohoarc; t=1550920812; h=Content-Type:Content-Transfer-Encoding:Cc:Date:From:In-Reply-To:MIME-Version:Message-ID:References:Subject:To:ARC-Authentication-Results; bh=i4RQ/3GigWJrSb+aiHizLrq7UUBVzjq76SBIL/M9Gb8=; b=PVtiFCrbAUg9So3+jTtdzyoxZs12y0cnzJDn3rQ0d6i1dOK11X5BWKAd83A4hJnnd7NEoZBuXR//mXsSjwnOHaRLRnYeKj7w0kMA1+puPDPeQgEijuB/3Drazfs1GrYq9M8g17tFPr/pVBxd8HIojAMHAiBQr3Zrwe2/Y0E3bu8= ARC-Authentication-Results: i=1; mx.zoho.com; dkim=pass header.i=elephly.net; spf=pass smtp.mailfrom=rekado@elephly.net; dmarc=pass header.from= header.from= DKIM-Signature: v=1; a=rsa-sha256; q=dns/txt; c=relaxed/relaxed; t=1550920812; s=zoho; d=elephly.net; i=rekado@elephly.net; h=References:From:To:Cc:Subject:In-reply-to:Date:Message-ID:MIME-Version:Content-Type:Content-Transfer-Encoding; l=1697; bh=i4RQ/3GigWJrSb+aiHizLrq7UUBVzjq76SBIL/M9Gb8=; b=Cz/Yc6LCZOjjuV4zqhufqTgLYyNknhDlC5qYt9nki77Iyx8m5/v6MaoQDs/k09us Leat1VR1zS7NojMNi6RnGz++eJuUl43GLEQ9J0NGjk9+LoqiJmDynpCW8SrGjnc/LxC Q8yKc0vGKM0Lc6J/Aq3Qfq07rVenQS/M5kAmzGHQ= Received: from localhost (p4FD5AE1B.dip0.t-ipconnect.de [79.213.174.27]) by mx.zohomail.com with SMTPS id 1550920810714534.8698901726877; Sat, 23 Feb 2019 03:20:10 -0800 (PST) References: <20190218200552.GB1881@jurong> <87mumsom9l.fsf@fastmail.com> <20190219082728.GA5650@jurong> <87lg2bvrne.fsf@elephly.net> <20190219161954.47234638@scratchpost.org> <20190220115136.422bdf5b@scratchpost.org> <87va1eu1gp.fsf@elephly.net> <20190220142634.56868dba@scratchpost.org> <87k1hutpvw.fsf@elephly.net> <20190220172603.1a675f61@scratchpost.org> <87a7iq5gh8.fsf@elephly.net> <20190220230857.2282d9b1@scratchpost.org> User-agent: mu4e 1.0; emacs 26.1 From: Ricardo Wurmus In-reply-to: <20190220230857.2282d9b1@scratchpost.org> X-URL: https://elephly.net X-PGP-Key: https://elephly.net/rekado.pubkey X-PGP-Fingerprint: BCA6 89B6 3655 3801 C3C6 2150 197A 5888 235F ACAC Date: Sat, 23 Feb 2019 12:20:06 +0100 Message-ID: <87ef7y3g61.fsf@elephly.net> MIME-Version: 1.0 Content-Type: text/plain; charset=utf-8 Content-Transfer-Encoding: quoted-printable X-ZohoMailClient: External X-Spam-Score: 0.0 (/) 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: -1.0 (-) Danny Milosavljevic writes: > (define (skip-comments text) > (replace (string-append "//[^\n]*?|" > "/[*].*?[*]/|" > "'([.]|[^'])*?'|" > "\"([.]|[^\"])*?\"") This last part will remove anything between double quotes, such as every string. Another problem seems to be the handling of /* comments */. It=E2=80=99s a greedy regex that will swallow any character until it finally hits */ =E2=80=94 even if the characters in between may have been */. I would not use regular expressions here but a read loop such as this: --8<---------------cut here---------------start------------->8--- (define (strip-comments port) (let loop ((char (get-char port)) (balance 0) (chars '())) (cond ;; done! ((eof-object? char) (list->string (reverse chars))) ;; line comment ((and (equal? char #\/) (equal? #\/ (peek-char port))) (begin (read-line port) (loop (get-char port) balance chars))) ;; begin of block comment ((and (equal? char #\/) (equal? #\* (peek-char port))) (begin (read-char port) (loop (get-char port) (1+ balance) chars))) ;; end of block comment ((and (positive? balance) (equal? char #\*) (equal? #\/ (peek-char port))) (begin (read-char port) (loop (get-char port) (1- balance) chars))) ;; inside block comment ((positive? balance) (loop (get-char port) balance chars)) ;; just a plain ol=E2=80=99 character (else (loop (get-char port) balance (cons char chars)))))) ;; Strip all comments from the file =E2=80=9Cfname=E2=80=9D and show the re= sult. (display (call-with-input-file fname strip-comments)) --8<---------------cut here---------------end--------------->8--- -- Ricardo From unknown Mon Jun 23 04:14:43 2025 X-Loop: help-debbugs@gnu.org Subject: bug#34531: Guix profile fails on Overdrive 1000 Resent-From: Danny Milosavljevic Original-Sender: "Debbugs-submit" Resent-CC: bug-guix@gnu.org Resent-Date: Sun, 24 Feb 2019 10:41:01 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 34531 X-GNU-PR-Package: guix X-GNU-PR-Keywords: To: Ricardo Wurmus Cc: 34531@debbugs.gnu.org, Andreas Enge Received: via spool by 34531-submit@debbugs.gnu.org id=B34531.15510048496763 (code B ref 34531); Sun, 24 Feb 2019 10:41:01 +0000 Received: (at 34531) by debbugs.gnu.org; 24 Feb 2019 10:40:49 +0000 Received: from localhost ([127.0.0.1]:49856 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1gxrDE-0001l0-LH for submit@debbugs.gnu.org; Sun, 24 Feb 2019 05:40:49 -0500 Received: from dd26836.kasserver.com ([85.13.145.193]:35000) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1gxrDC-0001kr-IK for 34531@debbugs.gnu.org; Sun, 24 Feb 2019 05:40:47 -0500 Received: from localhost (77.117.229.159.wireless.dyn.drei.com [77.117.229.159]) by dd26836.kasserver.com (Postfix) with ESMTPSA id 4AFA83360C06; Sun, 24 Feb 2019 11:40:44 +0100 (CET) Date: Sun, 24 Feb 2019 11:40:34 +0100 From: Danny Milosavljevic Message-ID: <20190224114034.5f339ae3@scratchpost.org> In-Reply-To: <87ef7y3g61.fsf@elephly.net> References: <20190218200552.GB1881@jurong> <87mumsom9l.fsf@fastmail.com> <20190219082728.GA5650@jurong> <87lg2bvrne.fsf@elephly.net> <20190219161954.47234638@scratchpost.org> <20190220115136.422bdf5b@scratchpost.org> <87va1eu1gp.fsf@elephly.net> <20190220142634.56868dba@scratchpost.org> <87k1hutpvw.fsf@elephly.net> <20190220172603.1a675f61@scratchpost.org> <87a7iq5gh8.fsf@elephly.net> <20190220230857.2282d9b1@scratchpost.org> <87ef7y3g61.fsf@elephly.net> X-Mailer: Claws Mail 3.17.3 (GTK+ 2.24.32; x86_64-unknown-linux-gnu) MIME-Version: 1.0 Content-Type: multipart/signed; micalg=pgp-sha256; boundary="Sig_/nFPWXNFxBAnN3KmvFLM.E6s"; protocol="application/pgp-signature" X-Spam-Score: -0.7 (/) 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: -1.7 (-) --Sig_/nFPWXNFxBAnN3KmvFLM.E6s Content-Type: multipart/mixed; boundary="MP_/jMoNmz7wzt8VYOwnvYGfQY9" --MP_/jMoNmz7wzt8VYOwnvYGfQY9 Content-Type: text/plain; charset=US-ASCII Content-Transfer-Encoding: quoted-printable Content-Disposition: inline Final version attached. Works fine now. --MP_/jMoNmz7wzt8VYOwnvYGfQY9 Content-Type: text/x-scheme Content-Transfer-Encoding: quoted-printable Content-Disposition: attachment; filename=generate.scm ;; -*- geiser-scheme-implementation: guile -*- ;;; Implementation: Danny Milosavljevic ;;; Based on: Implementation in Python by Vicent Marti. ;;; License: ISC, like the original generate.py in clar. (use-modules (ice-9 ftw)) (use-modules (ice-9 regex)) (use-modules (ice-9 getopt-long)) (use-modules (ice-9 rdelim)) (use-modules (ice-9 match)) (use-modules (ice-9 textual-ports)) (use-modules (srfi srfi-1)) (define (render-callback cb) (if cb (string-append " { \"" (assoc-ref cb "short-name") "\", &" (assoc-ref cb "symbol") " }") " { NULL, NULL }")) (define (replace needle replacement haystack) "Replace all occurences of NEEDLE in HAYSTACK by REPLACEMENT. NEEDLE is a regular expression." (regexp-substitute/global #f needle haystack 'pre replacement 'post)) (define (skip-comments* text) (call-with-input-string text (lambda (port) (let loop ((result '()) (section #f)) (define (consume-char) (cons (read-char port) result)) (define (skip-char) (read-char port) result) (match section (#f (match (peek-char port) (#\/ (loop (consume-char) 'almost-in-block-comment)) (#\" (loop (consume-char) 'in-string-literal)) (#\' (loop (consume-char) 'in-character-literal)) ((? eof-object?) result) (_ (loop (consume-char) section)))) ('almost-in-block-comment (match (peek-char port) (#\* (loop (consume-char) 'in-block-comment)) (#\/ (loop (consume-char) 'in-line-comment)) ((? eof-object?) result) (_ (loop (consume-char) #f)))) ('in-line-comment (match (peek-char port) (#\newline (loop (consume-char) #f)) ((? eof-object?) result) (_ (loop (skip-char) section)))) ('in-block-comment (match (peek-char port) (#\* (loop (skip-char) 'almost-out-of-block-comment)) ((? eof-object?) result) (_ (loop (skip-char) section)))) ('almost-out-of-block-comment (match (peek-char port) (#\/ (loop (cons (read-char port) (cons #\* result)) #f)) (#\* (loop (skip-char) 'almost-out-of-block-comment)) ((? eof-object?) result) (_ (loop (skip-char) 'in-block-comment)))) ('in-string-literal (match (peek-char port) (#\\ (loop (skip-char) 'in-string-literal-escape)) (#\" (loop (consume-char) #f)) ((? eof-object?) result) (_ (loop (skip-char) section)))) ('in-string-literal-escape (match (peek-char port) ((? eof-object?) result) (_ (loop (skip-char) 'in-string-literal)))) ('in-character-literal (match (peek-char port) (#\\ (loop (skip-char) 'in-character-literal-escape)) (#\' (loop (consume-char) #f)) ((? eof-object?) result) (_ (loop (skip-char) section)))) ('in-character-literal-escape (match (peek-char port) ((? eof-object?) result) (_ (loop (skip-char) 'in-character-literal))))))))) (define (skip-comments text) (list->string (reverse (skip-comments* text)))) (define (maybe-only items) (match items ((a) a) (_ #f))) (define (Module name path excludes) (let* ((clean-name (replace "_" "::" name)) (enabled (not (any (lambda (exclude) (string-prefix? exclude clean-name)) excludes)))) (define (parse contents) (define (cons-match match prev) (cons `(("declaration" . ,(match:substring match 1)) ("symbol" . ,(match:substring match 2)) ("short-name" . ,(match:substring match 3))) prev)) (let* ((contents (skip-comments contents)) (entries (fold-matches (make-regexp (string-append "^(void\\s+(test_" name "__(\\w+))\\s*\\(\\s*vo= id\\s*\\))\\s*\\{") regexp/newline) contents '() cons-match)) (callbacks (filter (lambda (entry) (match (assoc-ref entry "short-name") ("initialize" #f) ("cleanup" #f) (_ #t))) entries))) (if (> (length callbacks) 0) `(("name" . ,name) ("enabled" . ,(if enabled "1" "0")) ("clean-name" . ,clean-name) ("initialize" . ,(maybe-only (filter-map (lambda (entry) (match (assoc-ref ent= ry "short-name") ("initialize" entry) (_ #f))) entries))) ("cleanup" . ,(maybe-only (filter-map (lambda (entry) (match (assoc-ref entry = "short-name") ("cleanup" entry) (_ #f))) entries))) ("callbacks" . ,callbacks)) #f))) (define (refresh path) (and (file-exists? path) (parse (call-with-input-file path get-string-all)))) (refresh path))) (define (generate-TestSuite path output excludes) (define (load) (define enter? (const #t)) (define (leaf file stat result) (let* ((module-root (string-drop (dirname file) (string-length path))) (module-root (filter-map (match-lambda ("" #f) (a a)) (string-split module-root #\/)))) (define (make-module path) (let* ((name (string-join (append module-root (list (string-d= rop-right (basename path) (string-length ".c")))) "_")) (name (replace "-" "_" name))) (Module name path excludes))) (if (string-suffix? ".c" file) (let ((module (make-module file))) (if module (cons module result) result)) result))) (define (down dir stat result) result) (define (up file state result) result) (define skip (const #f)) (define error (const #f)) ; FIXME (file-system-fold enter? leaf down up skip error '() path)) (define (CallbacksTemplate module) (string-append "static const struct clar_func _clar_cb_" (assoc-ref module "name") "[] =3D {\n" (string-join (map render-callback (assoc-ref module "callbacks")) ",\n") "\n};\n")) (define (DeclarationTemplate module) (string-append (string-join (map (lambda (cb) (string-append "extern " (assoc-ref cb "decl= aration") ";")) (assoc-ref module "callbacks")) "\n") "\n" (if (assoc-ref module "initialize") (string-append "extern " (assoc-ref (assoc-ref mod= ule "initialize") "declaration") ";\n") "") (if (assoc-ref module "cleanup") (string-append "extern " (assoc-ref (assoc-ref mod= ule "cleanup") "declaration") ";\n") ""))) (define (InfoTemplate module) (string-append " { \"" (assoc-ref module "clean-name") "\", " (render-callback (assoc-ref module "initialize")) ", " (render-callback (assoc-ref module "cleanup")) ", _clar_cb_" (assoc-ref module "name") ", " (number->string (length (assoc-ref module "callbacks"))) ", " (assoc-ref module "enabled") " }")) (define (Write data) (define (name< module-a module-b) (stringstring (suite-count))) (callback-count-str (number->string (callback-count)))) (display-x "static const size_t _clar_suite_count =3D ") (display-x suite-count-str) (display-x ";\n") (display-x "static const size_t _clar_callback_count =3D ") (display-x callback-count-str) (display-x ";\n") (display (string-append "Written `clar.suite` (" callback-count-str " tests in " suite-count-str " suites)")) (newline)) #t) (call-with-output-file (string-append output "/clar.suite") Write)) ;;; main (define (main) (define option-spec '((force (single-char #\f) (value #f)) (exclude (single-char #\x) (value #t)) (output (single-char #\o) (value #t)) (help (single-char #\h) (value #f)))) (define options (getopt-long (command-line) option-spec #:stop-at-first-n= on-option #t)) (define args (reverse (option-ref options '() '()))) (when (> (length args) 1) (display "More than one path given\n") (exit 1)) (if (< (length args) 1) (set! args '("."))) (let* ((path (car args)) (output (option-ref options 'output path)) (excluded (filter-map (match-lambda (('exclude . value) value) (_ #f)) options))) (generate-TestSuite path output excluded))) (main) --MP_/jMoNmz7wzt8VYOwnvYGfQY9-- --Sig_/nFPWXNFxBAnN3KmvFLM.E6s Content-Type: application/pgp-signature Content-Description: OpenPGP digital signature -----BEGIN PGP SIGNATURE----- iQEzBAEBCAAdFiEEds7GsXJ0tGXALbPZ5xo1VCwwuqUFAlxydKIACgkQ5xo1VCww uqWRrgf/ZVYQ0le+CZutV7yguT5yiC7B0RL5sA1v89Erkfli/B/phAnZPUnZ2skv hVB2Ku8zIh7tZkmTf9bnHWlEp+H6SdsaxTGiJLjbNzIsu4NuBlKxiXHRo5qrmiTC opk//7JgEEqO7ICVGt5PYH5i0zfJ5B6dtZ4V34JsaMZb4yWw1C9u1o30GfsqvWOK JYuSu79d7D8KH2scMQzv1/BDYTa0lKrLtBYLsqbSZD5/VHfr0GS1lPYW75YYe69z Zyg+HUcPNhM5ZmFsb1yIyLA4D9uB5NkNDAVVwgyKFoYhrbunX+ft9zg6JUfT5L8d EiO7SKc4TGZ+QxVQ7fPwHs6kPfDElg== =+pIw -----END PGP SIGNATURE----- --Sig_/nFPWXNFxBAnN3KmvFLM.E6s-- From unknown Mon Jun 23 04:14:43 2025 X-Loop: help-debbugs@gnu.org Subject: bug#34531: Guix profile fails on Overdrive 1000 Resent-From: Ricardo Wurmus Original-Sender: "Debbugs-submit" Resent-CC: bug-guix@gnu.org Resent-Date: Sun, 24 Feb 2019 11:46:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 34531 X-GNU-PR-Package: guix X-GNU-PR-Keywords: To: Danny Milosavljevic Cc: 34531@debbugs.gnu.org, Andreas Enge Received: via spool by 34531-submit@debbugs.gnu.org id=B34531.155100875912699 (code B ref 34531); Sun, 24 Feb 2019 11:46:02 +0000 Received: (at 34531) by debbugs.gnu.org; 24 Feb 2019 11:45:59 +0000 Received: from localhost ([127.0.0.1]:49866 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1gxsEJ-0003Ik-AD for submit@debbugs.gnu.org; Sun, 24 Feb 2019 06:45:59 -0500 Received: from sender-of-o51.zoho.com ([135.84.80.216]:21041) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1gxsEG-0003Ib-JM for 34531@debbugs.gnu.org; Sun, 24 Feb 2019 06:45:57 -0500 ARC-Seal: i=1; a=rsa-sha256; t=1551008740; cv=none; d=zoho.com; s=zohoarc; b=AXUCx22YRXwb3b4y5qZN+tTFZq3sLO/LwmFwM/UwdngvZEuHPfw0E6vnMsRhmXs01izKWhHwIz7ZerlQQrCQbtyjBsD+nt5cLLFKUv6ZKn4GehoOSZZIiWTRpKcrHOJjDMMps/qN6blDjSgjCPtz+qM9HxVVO7WpJqqd0sDpOo8= ARC-Message-Signature: i=1; a=rsa-sha256; c=relaxed/relaxed; d=zoho.com; s=zohoarc; t=1551008740; h=Content-Type:Cc:Date:From:In-Reply-To:MIME-Version:Message-ID:References:Subject:To:ARC-Authentication-Results; bh=QhFM7gXyQ+Au1Mmk334/WLZxq8IoI4rlAqIs19622rM=; b=lbALafOfjziJ1GJtu/RksJ5I4DtjB7WqYIYtBIYghV0FYTSg9RvjGJsd05IpWw6ktyyPTx3l2jJ2PHhAPEQayKnkJTY+m+2DySqjiHdjJduPf1sj6QincFE4y65uxyqZmD5sRDFHD/0bhphTeDg1XytmiXyZO3OW+PkFIlqAf2c= ARC-Authentication-Results: i=1; mx.zoho.com; dkim=pass header.i=elephly.net; spf=pass smtp.mailfrom=rekado@elephly.net; dmarc=pass header.from= header.from= DKIM-Signature: v=1; a=rsa-sha256; q=dns/txt; c=relaxed/relaxed; t=1551008740; s=zoho; d=elephly.net; i=rekado@elephly.net; h=References:From:To:Cc:Subject:In-reply-to:Date:Message-ID:MIME-Version:Content-Type; l=221; bh=QhFM7gXyQ+Au1Mmk334/WLZxq8IoI4rlAqIs19622rM=; b=Ir7voB1b42MPUSfK87LDUt4PLYkIKOwDqgxMtgURbugWqMWVRs65yeYwIor7I/gf 6wK0YENUj8e8DOsu7ZbpWpi8LU03KDOzgKCq1SOO6iX4iyL8iX2GKximjcpoKeKlitY M7flcaFiuvwx7ml+qb/uHMOrqRckHkPUdyOaedwY= Received: from localhost (p4FD5AD7D.dip0.t-ipconnect.de [79.213.173.125]) by mx.zohomail.com with SMTPS id 1551008738454485.4154029653006; Sun, 24 Feb 2019 03:45:38 -0800 (PST) References: <20190218200552.GB1881@jurong> <87mumsom9l.fsf@fastmail.com> <20190219082728.GA5650@jurong> <87lg2bvrne.fsf@elephly.net> <20190219161954.47234638@scratchpost.org> <20190220115136.422bdf5b@scratchpost.org> <87va1eu1gp.fsf@elephly.net> <20190220142634.56868dba@scratchpost.org> <87k1hutpvw.fsf@elephly.net> <20190220172603.1a675f61@scratchpost.org> <87a7iq5gh8.fsf@elephly.net> <20190220230857.2282d9b1@scratchpost.org> <87ef7y3g61.fsf@elephly.net> <20190224114034.5f339ae3@scratchpost.org> User-agent: mu4e 1.0; emacs 26.1 From: Ricardo Wurmus In-reply-to: <20190224114034.5f339ae3@scratchpost.org> X-URL: https://elephly.net X-PGP-Key: https://elephly.net/rekado.pubkey X-PGP-Fingerprint: BCA6 89B6 3655 3801 C3C6 2150 197A 5888 235F ACAC Date: Sun, 24 Feb 2019 12:45:34 +0100 Message-ID: <878sy52yw1.fsf@elephly.net> MIME-Version: 1.0 Content-Type: text/plain X-ZohoMailClient: External X-Spam-Score: 0.0 (/) 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: -1.0 (-) Danny Milosavljevic writes: > Final version attached. Works fine now. The loop looks a bit more complicated than it needs to be, I think. Did my version not work for you? -- Ricardo From unknown Mon Jun 23 04:14:43 2025 X-Loop: help-debbugs@gnu.org Subject: bug#34531: Guix profile fails on Overdrive 1000 Resent-From: Danny Milosavljevic Original-Sender: "Debbugs-submit" Resent-CC: bug-guix@gnu.org Resent-Date: Sun, 24 Feb 2019 12:13:01 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 34531 X-GNU-PR-Package: guix X-GNU-PR-Keywords: To: Ricardo Wurmus Cc: 34531@debbugs.gnu.org, Andreas Enge Received: via spool by 34531-submit@debbugs.gnu.org id=B34531.155101033615000 (code B ref 34531); Sun, 24 Feb 2019 12:13:01 +0000 Received: (at 34531) by debbugs.gnu.org; 24 Feb 2019 12:12:16 +0000 Received: from localhost ([127.0.0.1]:49872 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1gxsdj-0003tr-Hk for submit@debbugs.gnu.org; Sun, 24 Feb 2019 07:12:16 -0500 Received: from dd26836.kasserver.com ([85.13.145.193]:42026) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1gxsdh-0003ti-Pt for 34531@debbugs.gnu.org; Sun, 24 Feb 2019 07:12:15 -0500 Received: from localhost (77.117.229.159.wireless.dyn.drei.com [77.117.229.159]) by dd26836.kasserver.com (Postfix) with ESMTPSA id E45CD336038A; Sun, 24 Feb 2019 13:12:11 +0100 (CET) Date: Sun, 24 Feb 2019 13:12:07 +0100 From: Danny Milosavljevic Message-ID: <20190224131204.21fdc1e5@scratchpost.org> In-Reply-To: <878sy52yw1.fsf@elephly.net> References: <20190218200552.GB1881@jurong> <87mumsom9l.fsf@fastmail.com> <20190219082728.GA5650@jurong> <87lg2bvrne.fsf@elephly.net> <20190219161954.47234638@scratchpost.org> <20190220115136.422bdf5b@scratchpost.org> <87va1eu1gp.fsf@elephly.net> <20190220142634.56868dba@scratchpost.org> <87k1hutpvw.fsf@elephly.net> <20190220172603.1a675f61@scratchpost.org> <87a7iq5gh8.fsf@elephly.net> <20190220230857.2282d9b1@scratchpost.org> <87ef7y3g61.fsf@elephly.net> <20190224114034.5f339ae3@scratchpost.org> <878sy52yw1.fsf@elephly.net> X-Mailer: Claws Mail 3.17.3 (GTK+ 2.24.32; x86_64-unknown-linux-gnu) MIME-Version: 1.0 Content-Type: multipart/signed; micalg=pgp-sha256; boundary="Sig_/C9Z09VBlqZncJLHLIJNgTVo"; protocol="application/pgp-signature" X-Spam-Score: -0.7 (/) 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: -1.7 (-) --Sig_/C9Z09VBlqZncJLHLIJNgTVo Content-Type: multipart/mixed; boundary="MP_/VpRHHE=oKH54+=l9R=eqpsl" --MP_/VpRHHE=oKH54+=l9R=eqpsl Content-Type: text/plain; charset=US-ASCII Content-Transfer-Encoding: quoted-printable Content-Disposition: inline Hi Ricardo, On Sun, 24 Feb 2019 12:45:34 +0100 Ricardo Wurmus wrote: > Danny Milosavljevic writes: >=20 > > Final version attached. Works fine now. =20 >=20 > The loop looks a bit more complicated than it needs to be, I think. Did > my version not work for you? It did, but I wanted to make sure the port did exactly the same as the original generate.py--maybe I overdid it, but I didn't want to break it by porting it. What skip_comments in the original does is strip comments, but not strip "comment-like things" that are in string literals ("/*blah*/"). (as far as I can tell, at least) I agree your version is easier but does it do the same thing? Attached a v2 where I fixed a bug in literal handling related to that (oops= ). WDYT? --MP_/VpRHHE=oKH54+=l9R=eqpsl Content-Type: text/x-scheme Content-Transfer-Encoding: quoted-printable Content-Disposition: attachment; filename=generate.scm ;; -*- geiser-scheme-implementation: guile -*- ;;; Implementation: Danny Milosavljevic ;;; Based on: Implementation in Python by Vicent Marti. ;;; License: ISC, like the original generate.py in clar. (use-modules (ice-9 ftw)) (use-modules (ice-9 regex)) (use-modules (ice-9 getopt-long)) (use-modules (ice-9 rdelim)) (use-modules (ice-9 match)) (use-modules (ice-9 textual-ports)) (use-modules (srfi srfi-1)) (define (render-callback cb) (if cb (string-append " { \"" (assoc-ref cb "short-name") "\", &" (assoc-ref cb "symbol") " }") " { NULL, NULL }")) (define (replace needle replacement haystack) "Replace all occurences of NEEDLE in HAYSTACK by REPLACEMENT. NEEDLE is a regular expression." (regexp-substitute/global #f needle haystack 'pre replacement 'post)) (define (skip-comments* text) (call-with-input-string text (lambda (port) (let loop ((result '()) (section #f)) (define (consume-char) (cons (read-char port) result)) (define (skip-char) (read-char port) result) (match section (#f (match (peek-char port) (#\/ (loop (consume-char) 'almost-in-block-comment)) (#\" (loop (consume-char) 'in-string-literal)) (#\' (loop (consume-char) 'in-character-literal)) ((? eof-object?) result) (_ (loop (consume-char) section)))) ('almost-in-block-comment (match (peek-char port) (#\* (loop (consume-char) 'in-block-comment)) (#\/ (loop (consume-char) 'in-line-comment)) ((? eof-object?) result) (_ (loop (consume-char) #f)))) ('in-line-comment (match (peek-char port) (#\newline (loop (consume-char) #f)) ((? eof-object?) result) (_ (loop (skip-char) section)))) ('in-block-comment (match (peek-char port) (#\* (loop (skip-char) 'almost-out-of-block-comment)) ((? eof-object?) result) (_ (loop (skip-char) section)))) ('almost-out-of-block-comment (match (peek-char port) (#\/ (loop (cons (read-char port) (cons #\* result)) #f)) (#\* (loop (skip-char) 'almost-out-of-block-comment)) ((? eof-object?) result) (_ (loop (skip-char) 'in-block-comment)))) ('in-string-literal (match (peek-char port) (#\\ (loop (consume-char) 'in-string-literal-escape)) (#\" (loop (consume-char) #f)) ((? eof-object?) result) (_ (loop (consume-char) section)))) ('in-string-literal-escape (match (peek-char port) ((? eof-object?) result) (_ (loop (consume-char) 'in-string-literal)))) ('in-character-literal (match (peek-char port) (#\\ (loop (consume-char) 'in-character-literal-escape)) (#\' (loop (consume-char) #f)) ((? eof-object?) result) (_ (loop (consume-char) section)))) ('in-character-literal-escape (match (peek-char port) ((? eof-object?) result) (_ (loop (consume-char) 'in-character-literal))))))))) (define (skip-comments text) (list->string (reverse (skip-comments* text)))) (define (maybe-only items) (match items ((a) a) (_ #f))) (define (Module name path excludes) (let* ((clean-name (replace "_" "::" name)) (enabled (not (any (lambda (exclude) (string-prefix? exclude clean-name)) excludes)))) (define (parse contents) (define (cons-match match prev) (cons `(("declaration" . ,(match:substring match 1)) ("symbol" . ,(match:substring match 2)) ("short-name" . ,(match:substring match 3))) prev)) (let* ((contents (skip-comments contents)) (entries (fold-matches (make-regexp (string-append "^(void\\s+(test_" name "__(\\w+))\\s*\\(\\s*vo= id\\s*\\))\\s*\\{") regexp/newline) contents '() cons-match)) (callbacks (filter (lambda (entry) (match (assoc-ref entry "short-name") ("initialize" #f) ("cleanup" #f) (_ #t))) entries))) (if (> (length callbacks) 0) `(("name" . ,name) ("enabled" . ,(if enabled "1" "0")) ("clean-name" . ,clean-name) ("initialize" . ,(maybe-only (filter-map (lambda (entry) (match (assoc-ref ent= ry "short-name") ("initialize" entry) (_ #f))) entries))) ("cleanup" . ,(maybe-only (filter-map (lambda (entry) (match (assoc-ref entry = "short-name") ("cleanup" entry) (_ #f))) entries))) ("callbacks" . ,callbacks)) #f))) (define (refresh path) (and (file-exists? path) (parse (call-with-input-file path get-string-all)))) (refresh path))) (define (generate-TestSuite path output excludes) (define (load) (define enter? (const #t)) (define (leaf file stat result) (let* ((module-root (string-drop (dirname file) (string-length path))) (module-root (filter-map (match-lambda ("" #f) (a a)) (string-split module-root #\/)))) (define (make-module path) (let* ((name (string-join (append module-root (list (string-d= rop-right (basename path) (string-length ".c")))) "_")) (name (replace "-" "_" name))) (Module name path excludes))) (if (string-suffix? ".c" file) (let ((module (make-module file))) (if module (cons module result) result)) result))) (define (down dir stat result) result) (define (up file state result) result) (define skip (const #f)) (define error (const #f)) ; FIXME (file-system-fold enter? leaf down up skip error '() path)) (define (CallbacksTemplate module) (string-append "static const struct clar_func _clar_cb_" (assoc-ref module "name") "[] =3D {\n" (string-join (map render-callback (assoc-ref module "callbacks")) ",\n") "\n};\n")) (define (DeclarationTemplate module) (string-append (string-join (map (lambda (cb) (string-append "extern " (assoc-ref cb "decl= aration") ";")) (assoc-ref module "callbacks")) "\n") "\n" (if (assoc-ref module "initialize") (string-append "extern " (assoc-ref (assoc-ref mod= ule "initialize") "declaration") ";\n") "") (if (assoc-ref module "cleanup") (string-append "extern " (assoc-ref (assoc-ref mod= ule "cleanup") "declaration") ";\n") ""))) (define (InfoTemplate module) (string-append " { \"" (assoc-ref module "clean-name") "\", " (render-callback (assoc-ref module "initialize")) ", " (render-callback (assoc-ref module "cleanup")) ", _clar_cb_" (assoc-ref module "name") ", " (number->string (length (assoc-ref module "callbacks"))) ", " (assoc-ref module "enabled") " }")) (define (Write data) (define (name< module-a module-b) (stringstring (suite-count))) (callback-count-str (number->string (callback-count)))) (display-x "static const size_t _clar_suite_count =3D ") (display-x suite-count-str) (display-x ";\n") (display-x "static const size_t _clar_callback_count =3D ") (display-x callback-count-str) (display-x ";\n") (display (string-append "Written `clar.suite` (" callback-count-str " tests in " suite-count-str " suites)")) (newline)) #t) (call-with-output-file (string-append output "/clar.suite") Write)) ;;; main (define (main) (define option-spec '((force (single-char #\f) (value #f)) (exclude (single-char #\x) (value #t)) (output (single-char #\o) (value #t)) (help (single-char #\h) (value #f)))) (define options (getopt-long (command-line) option-spec #:stop-at-first-n= on-option #t)) (define args (reverse (option-ref options '() '()))) (when (> (length args) 1) (display "More than one path given\n") (exit 1)) (if (< (length args) 1) (set! args '("."))) (let* ((path (car args)) (output (option-ref options 'output path)) (excluded (filter-map (match-lambda (('exclude . value) value) (_ #f)) options))) (generate-TestSuite path output excluded))) (main) --MP_/VpRHHE=oKH54+=l9R=eqpsl-- --Sig_/C9Z09VBlqZncJLHLIJNgTVo Content-Type: application/pgp-signature Content-Description: OpenPGP digital signature -----BEGIN PGP SIGNATURE----- iQEzBAEBCAAdFiEEds7GsXJ0tGXALbPZ5xo1VCwwuqUFAlxyihcACgkQ5xo1VCww uqUs5Af/f7aY+mEgiIxPAqTB6eND4vLo4XF0JdSQI5ZUKiQLJS4AlZhMeBY9QMh+ BRzF0nQqx+uNSARZ4xicAnDSPrKb+8xEeDNBmpxzeGNn889J/mx2TtQDVRdFpZDh B4edM97tpseoTKMZmKn9u+JrlZVIjA2VJ81iXF9z5WiCb0T6RUmDhszFk+V8+8Ce xFnz6jZr3WuVM9aeqTu9ehiOIHyWdpMwdXS973+9PABYRl9bmOL9fw5iKGy1XJLm v0r/yDLQYkYOmxLUXq4uEPBrCbuLAhh/Id1eQW6imW0orCVIVXg2zgJDnhv1l9ty PRJopkHQ6En1PmO54t8qnl2sYAIqgA== =RV1a -----END PGP SIGNATURE----- --Sig_/C9Z09VBlqZncJLHLIJNgTVo-- From unknown Mon Jun 23 04:14:43 2025 X-Loop: help-debbugs@gnu.org Subject: bug#34531: Guix profile fails on Overdrive 1000 Resent-From: Ricardo Wurmus Original-Sender: "Debbugs-submit" Resent-CC: bug-guix@gnu.org Resent-Date: Tue, 26 Feb 2019 21:08:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 34531 X-GNU-PR-Package: guix X-GNU-PR-Keywords: To: Danny Milosavljevic Cc: 34531@debbugs.gnu.org, Andreas Enge Received: via spool by 34531-submit@debbugs.gnu.org id=B34531.155121524623977 (code B ref 34531); Tue, 26 Feb 2019 21:08:02 +0000 Received: (at 34531) by debbugs.gnu.org; 26 Feb 2019 21:07:26 +0000 Received: from localhost ([127.0.0.1]:53335 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1gyjwj-0006Ed-Ge for submit@debbugs.gnu.org; Tue, 26 Feb 2019 16:07:25 -0500 Received: from sender-of-o51.zoho.com ([135.84.80.216]:21068) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1gyjwf-0006EM-6C for 34531@debbugs.gnu.org; Tue, 26 Feb 2019 16:07:23 -0500 ARC-Seal: i=1; a=rsa-sha256; t=1551215232; cv=none; d=zoho.com; s=zohoarc; b=hcW2TtE8hC/kJnXpig3JlQyLPRF/s9/khoitlmLsF3bBkYDroPaJxjvAvGgsHwjZ+jF7rEOCLNI2PODSKkpp53FdsLqApBSUUGY+ijqJdcIylbQt9GCePnVIu7KjcHeJ14UJjUTN8IKhWB0C1JoTcHduJo8dI1iztRdCTtmGWvU= ARC-Message-Signature: i=1; a=rsa-sha256; c=relaxed/relaxed; d=zoho.com; s=zohoarc; t=1551215232; h=Content-Type:Content-Transfer-Encoding:Cc:Date:From:In-Reply-To:MIME-Version:Message-ID:References:Subject:To:ARC-Authentication-Results; bh=fskKxYzclZtKAirGuJd9D10HbZQp2k4kpLKYKOb7p2A=; b=NmtrVEZZDrd2bwUS+LkdWvoKEgilb6FkQcCDODsS71IAIPtIYUJj919sWBfbF/Zz9FF0t5B8K1dYd1fWXs4Kopl7aLBlddbRad8FaNATb307KgV71QygarsYL8pJxCSDUwn6Bak/R5wljIDRilDvtLYJ1+8IYTUUgSDgHbOjeD0= ARC-Authentication-Results: i=1; mx.zoho.com; dkim=pass header.i=elephly.net; spf=pass smtp.mailfrom=rekado@elephly.net; dmarc=pass header.from= header.from= DKIM-Signature: v=1; a=rsa-sha256; q=dns/txt; c=relaxed/relaxed; t=1551215232; s=zoho; d=elephly.net; i=rekado@elephly.net; h=References:From:To:Cc:Subject:In-reply-to:Date:Message-ID:MIME-Version:Content-Type:Content-Transfer-Encoding; l=889; bh=fskKxYzclZtKAirGuJd9D10HbZQp2k4kpLKYKOb7p2A=; b=bzVqqiUvvkjEjzht+w7dDRoi3eMDlvllgq+DrVVFOw8jOfcW/r6EKQHZxTo+dBcD bZEc2u7w1rQDcte9oc/lOFysSMRi1cMfK62kuk3qgZCyZ5sSjwjZTL90qeMQDuI68+x VP7gkychT+Y2n09pG3jZbCavDfT9lVLNu+sQCgCM= Received: from localhost (p54AD4D0D.dip0.t-ipconnect.de [84.173.77.13]) by mx.zohomail.com with SMTPS id 1551215230384842.1765252421028; Tue, 26 Feb 2019 13:07:10 -0800 (PST) References: <20190218200552.GB1881@jurong> <87mumsom9l.fsf@fastmail.com> <20190219082728.GA5650@jurong> <87lg2bvrne.fsf@elephly.net> <20190219161954.47234638@scratchpost.org> <20190220115136.422bdf5b@scratchpost.org> <87va1eu1gp.fsf@elephly.net> <20190220142634.56868dba@scratchpost.org> <87k1hutpvw.fsf@elephly.net> <20190220172603.1a675f61@scratchpost.org> <87a7iq5gh8.fsf@elephly.net> <20190220230857.2282d9b1@scratchpost.org> <87ef7y3g61.fsf@elephly.net> <20190224114034.5f339ae3@scratchpost.org> <878sy52yw1.fsf@elephly.net> <20190224131204.21fdc1e5@scratchpost.org> User-agent: mu4e 1.0; emacs 26.1 From: Ricardo Wurmus In-reply-to: <20190224131204.21fdc1e5@scratchpost.org> X-URL: https://elephly.net X-PGP-Key: https://elephly.net/rekado.pubkey X-PGP-Fingerprint: BCA6 89B6 3655 3801 C3C6 2150 197A 5888 235F ACAC Date: Tue, 26 Feb 2019 22:07:06 +0100 Message-ID: <87mumiz2bp.fsf@elephly.net> MIME-Version: 1.0 Content-Type: text/plain; charset=utf-8 Content-Transfer-Encoding: quoted-printable X-ZohoMailClient: External X-Spam-Score: 0.0 (/) 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: -1.0 (-) Hi Danny, >> The loop looks a bit more complicated than it needs to be, I think. Did >> my version not work for you? > > It did, but I wanted to make sure the port did exactly the same as the > original generate.py--maybe I overdid it, but I didn't want to break it > by porting it. > > What skip_comments in the original does is strip comments, but not strip > "comment-like things" that are in string literals ("/*blah*/"). > (as far as I can tell, at least) Ah, I see. If your version works fine I think it=E2=80=99s worth using it = to replace the need for Python here. I=E2=80=99d probably implement this somewhat differently (to remove the =E2=80=9Calmost*=E2=80=9D symbols and to cut down on duplication), but I do= n=E2=80=99t think it=E2=80=99s worth polishing this when the main purpose has been achieved. Thanks for tackling this! --=20 Ricardo From unknown Mon Jun 23 04:14:43 2025 MIME-Version: 1.0 X-Mailer: MIME-tools 5.505 (Entity 5.505) X-Loop: help-debbugs@gnu.org From: help-debbugs@gnu.org (GNU bug Tracking System) To: Andreas Enge Subject: bug#34531: closed (Re: bug#34531: Guix profile fails on Overdrive 1000) Message-ID: References: <87r2airour.fsf@gnu.org> <20190218200552.GB1881@jurong> X-Gnu-PR-Message: they-closed 34531 X-Gnu-PR-Package: guix Reply-To: 34531@debbugs.gnu.org Date: Thu, 04 Apr 2019 11:29:02 +0000 Content-Type: multipart/mixed; boundary="----------=_1554377342-12280-1" This is a multi-part message in MIME format... ------------=_1554377342-12280-1 Content-Disposition: inline Content-Transfer-Encoding: quoted-printable Content-Type: text/plain; charset="utf-8" Your bug report #34531: Guix profile fails on Overdrive 1000 which was filed against the guix package, has been closed. The explanation is attached below, along with your original report. If you require more details, please reply to 34531@debbugs.gnu.org. --=20 34531: http://debbugs.gnu.org/cgi/bugreport.cgi?bug=3D34531 GNU Bug Tracking System Contact help-debbugs@gnu.org with problems ------------=_1554377342-12280-1 Content-Type: message/rfc822 Content-Disposition: inline Content-Transfer-Encoding: 7bit Received: (at 34531-done) by debbugs.gnu.org; 4 Apr 2019 11:28:55 +0000 Received: from localhost ([127.0.0.1]:43730 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1hC0YA-0003Bm-Ns for submit@debbugs.gnu.org; Thu, 04 Apr 2019 07:28:54 -0400 Received: from eggs.gnu.org ([209.51.188.92]:54306) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1hC0Y9-0003BZ-2s for 34531-done@debbugs.gnu.org; Thu, 04 Apr 2019 07:28:53 -0400 Received: from fencepost.gnu.org ([2001:470:142:3::e]:43105) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1hC0Y2-0000JE-Ou; Thu, 04 Apr 2019 07:28:46 -0400 Received: from [2001:660:6102:320:e120:2c8f:8909:cdfe] (port=57508 helo=ribbon) by fencepost.gnu.org with esmtpsa (TLS1.2:RSA_AES_256_CBC_SHA1:256) (Exim 4.82) (envelope-from ) id 1hC0Y1-0000vW-NF; Thu, 04 Apr 2019 07:28:46 -0400 From: =?utf-8?Q?Ludovic_Court=C3=A8s?= To: Ricardo Wurmus Subject: Re: bug#34531: Guix profile fails on Overdrive 1000 References: <20190218200552.GB1881@jurong> <87mumsom9l.fsf@fastmail.com> <20190219082728.GA5650@jurong> <87lg2bvrne.fsf@elephly.net> Date: Thu, 04 Apr 2019 13:28:44 +0200 In-Reply-To: <87lg2bvrne.fsf@elephly.net> (Ricardo Wurmus's message of "Tue, 19 Feb 2019 14:23:23 +0100") Message-ID: <87r2airour.fsf@gnu.org> User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/26.1 (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: 0.0 (/) X-Debbugs-Envelope-To: 34531-done Cc: Andreas Enge , 34531-done@debbugs.gnu.org, Marius Bakke 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: -1.0 (-) Hello, Ricardo Wurmus skribis: > Andreas Enge writes: > >> Before closing the bug, I would still like to ask whether there is a way >> of getting around the need for python. > > Guix pull needs =E2=80=9Cguile-git=E2=80=9D, and =E2=80=9Cguile-git=E2=80= =9D needs =E2=80=9Clibgit2=E2=80=9D, which > needs =E2=80=9Cpython-wrapper=E2=80=9D. To remove the need for Python in= =E2=80=9Cguix pull=E2=80=9D we > would need to build libgit2 without Python. I don=E2=80=99t know if anyo= ne has > investigated whether this can be done. Danny Milosavljevic skribis: > I've started on implementing a replacement test generator, see attachment. > > Usage is exactly the same as the original generate.py. I gather this bug was fixed with commit 03fb5ff6ae01a680c786d9ee148839543c519411. Closing! Ludo=E2=80=99. ------------=_1554377342-12280-1 Content-Type: message/rfc822 Content-Disposition: inline Content-Transfer-Encoding: 7bit Received: (at submit) by debbugs.gnu.org; 18 Feb 2019 20:06:09 +0000 Received: from localhost ([127.0.0.1]:53227 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1gvpB3-0004Wa-CR for submit@debbugs.gnu.org; Mon, 18 Feb 2019 15:06:09 -0500 Received: from eggs.gnu.org ([209.51.188.92]:50341) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1gvpB1-0004WG-JH for submit@debbugs.gnu.org; Mon, 18 Feb 2019 15:06:08 -0500 Received: from lists.gnu.org ([209.51.188.17]:38363) by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_256_CBC_SHA1:32) (Exim 4.71) (envelope-from ) id 1gvpAw-0002T8-GF for submit@debbugs.gnu.org; Mon, 18 Feb 2019 15:06:02 -0500 Received: from eggs.gnu.org ([209.51.188.92]:36483) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1gvpAv-0007qz-0d for bug-guix@gnu.org; Mon, 18 Feb 2019 15:06:02 -0500 X-Spam-Checker-Version: SpamAssassin 3.3.2 (2011-06-06) on eggs.gnu.org X-Spam-Level: X-Spam-Status: No, score=0.8 required=5.0 tests=BAYES_50,RCVD_IN_DNSWL_NONE, URIBL_BLOCKED autolearn=disabled version=3.3.2 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1gvpAs-0002Pv-Ci for bug-guix@gnu.org; Mon, 18 Feb 2019 15:06:00 -0500 Received: from hera.aquilenet.fr ([185.233.100.1]:37788) by eggs.gnu.org with esmtps (TLS1.0:DHE_RSA_AES_256_CBC_SHA1:32) (Exim 4.71) (envelope-from ) id 1gvpAr-0002LX-JS for bug-guix@gnu.org; Mon, 18 Feb 2019 15:05:58 -0500 Received: from localhost (localhost [127.0.0.1]) by hera.aquilenet.fr (Postfix) with ESMTP id DB25711144; Mon, 18 Feb 2019 21:05:54 +0100 (CET) X-Virus-Scanned: Debian amavisd-new at aquilenet.fr Received: from hera.aquilenet.fr ([127.0.0.1]) by localhost (hera.aquilenet.fr [127.0.0.1]) (amavisd-new, port 10024) with ESMTP id fXusoUchU5Eq; Mon, 18 Feb 2019 21:05:54 +0100 (CET) Received: from jurong (unknown [IPv6:2001:910:103f::2af]) by hera.aquilenet.fr (Postfix) with ESMTPSA id DB4231110A; Mon, 18 Feb 2019 21:05:53 +0100 (CET) Date: Mon, 18 Feb 2019 21:05:52 +0100 From: Andreas Enge To: bug-guix@gnu.org Subject: Guix profile fails on Overdrive 1000 Message-ID: <20190218200552.GB1881@jurong> MIME-Version: 1.0 Content-Type: text/plain; charset=us-ascii Content-Disposition: inline User-Agent: Mutt/1.11.2 (2019-01-07) X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic] X-Received-From: 185.233.100.1 X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6.x X-Spam-Score: 0.7 (/) X-Debbugs-Envelope-To: submit 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: -0.3 (/) Hello, on a newly installed Overdrive 1000 machine with 8 GB of memory, I am trying guix pull -n This results in Updating channel 'guix' from Git repository at 'https://git.savannah.gnu.org/git/guix.git'... Building from this channel: guix https://git.savannah.gnu.org/git/guix.git d0d207c The following derivations will be built: /gnu/store/qvljgqnsynw113h1062nws9i2zfcz15y-compute-guix-derivation.drv /gnu/store/rj824ibc8nhhl1j2h25sgw4lyxkxjggc-gdb-8.2.drv ... /gnu/store/w1jw283cdf6n03qnccsrvxgzy41z0hps-guile-gcrypt-0.1.0.drv building /gnu/store/wy37294j2rb6fg5fgpybki28vq60jz94-python-minimal-3.6.5.drv... starting phase `set-SOURCE-DATE-EPOCH' ... That a build of something starts although the "-n" flag is specified seems to be a first bug. Then, during the test phase, the build is killed since the machine runs out of memory. I also tried to pass "--cores=1" to "guix build", but this parameter is not honoured: "top" shows that all four cores are running. This might be a second bug. In any case, it becomes impossible to upgrade with the usual mechanism, which is a rather serious bug. My guix version: $ guix --version guix (GNU Guix) 0.15.0-8.71a78ba There should be a number of possible solutions: - Try to not depend on python for such basic operations (preferable; where does this dependency come from anyway?) - Disable the tests in a bootstrapping python that is used here. - Disable only tests requiring a lot of memory. - Update python to a newer version. What do you think we should try? Andreas PS: I am still not convinced that the system is in a coherent state, so it would be interesting if someone could confirm this bug. For instance, I observe the following: $ guix package -i hello -n guix package: warning: Your Guix installation is 9 days old. guix package: warning: Consider running 'guix pull' followed by 'guix package -u' to get up-to-date packages and security updates. The following package would be installed: hello 2.10 /gnu/store/5hzc1q803ksynz19sr8ymvgzf4v7anzk-hello-2.10 The following derivations would be built: /gnu/store/1krpkl0axqyn2lpxp3ick3s0p2z5qrnv-profile.drv /gnu/store/gfxnqasw81kxjjvfmv5i54rbvlpkd8n1-mkfontdir-1.0.7.tar.bz2.drv /gnu/store/n0fgxl55ni7pmw03p8aqaamqvj31ym0l-libfontenc-1.1.3.tar.bz2.drv /gnu/store/4c1jfinnpjrxnx7grpwmwh3s1b64b8bc-libfontenc-1.1.3.drv /gnu/store/x38kid3sf3zw15rlwl375kp0ng1iz8m3-mkfontscale-1.1.3.tar.bz2.drv /gnu/store/9fb2w29gyfq6hsw064l89vb29jd0jry4-mkfontscale-1.1.3.drv /gnu/store/iwi0648clfzpp084qic303glv9cp9qwy-module-import-compiled.drv /gnu/store/lz4psj250m4xh4mpvkd2qchbs9vb9f19-mkfontdir-1.0.7.drv /gnu/store/w11j7chynk58lzk40agd37ii32rc7d6c-fonts-dir.drv /gnu/store/rj824ibc8nhhl1j2h25sgw4lyxkxjggc-gdb-8.2.drv /gnu/store/7g3ybwsd664941qz7jp2c3rcxaxm2nij-valgrind-3.13.0.drv /gnu/store/swx5jipn1id1qfw60hh1f7icxfflfx6s-scons-python2-3.0.1.drv /gnu/store/q98m948gmibnccjjdbw4s80vkn5ywmza-boost-1.66.0.drv /gnu/store/i1a2f33p08brilpkdn35rm5jgng2bnrn-swig-3.0.12.drv /gnu/store/m8y9k0zqkq6sa0lv9714ql9f4m36pmrh-serf-1.3.9.drv /gnu/store/sazsmami6651dkgj51ij53x0bx9hl46x-lz4-1.8.1.2.drv /gnu/store/3g8plb0fvnblmb7ldr4ikmlpv44k0xzp-libxslt-1.1.32.drv /gnu/store/4nms2l8g8n770harl3f9qzizp0amyqvz-xcb-proto-1.13.drv /gnu/store/wy37294j2rb6fg5fgpybki28vq60jz94-python-minimal-3.6.5.drv /gnu/store/zyq4z95r0afywwn9y6283irikgx72885-python-minimal-wrapper-3.6.5.drv /gnu/store/68bycryid94b46kw9kp1mlmgc0s3y8k6-libxrender-0.9.10.drv /gnu/store/wgxbfymwcscqmsqn5cbv7sskd9racsr9-libxft-2.3.2.drv /gnu/store/7jl0aja7msxhnm39x7vbz0r7lxfrk0xh-python-3.6.5.drv /gnu/store/xmhsaqhlp6fmxny50vs3if8jlv0cclbi-python-wrapper-3.6.5.drv /gnu/store/jbdy9za2xfxqg65c27lwic1psnz2kikg-ghostscript-9.23.drv /gnu/store/g9i8l4dnp7a6pr1rz4ly2apyp7cxcmz7-openldap-2.4.46.drv /gnu/store/jvj8p7qc1y1f15yd34ahysdpkl2120kn-groff-1.22.3.drv /gnu/store/220nl6licli726kdrvzw8k3j6qak5cq5-libx11-1.6.5.drv /gnu/store/gnijgdfa363n5jc2qk9wn54x12787yvl-curl-7.59.0.drv /gnu/store/i3bvnpnjhj6y8d2kzksw6f6gpfbadwl0-libxext-1.3.3.drv /gnu/store/jf7dxdv6dsrkr75b68whz7nnyss485js-tk-8.6.8.drv /gnu/store/jga9yslz6zafqchv4mr5hg7106s0lhsx-libxcb-1.13.drv /gnu/store/lkwynhkq6a4a242i17qbxcx5khkng3wc-asciidoc-8.6.10.drv /gnu/store/slj73h4y23gdwm6znclijsxi3cggdd57-xmlto-0.0.28.drv /gnu/store/wn577xbf7fc70kcczmrcn03b0615mlpl-python2-2.7.14.drv /gnu/store/x2xbfpl32ni1lbq5r515qqh45qsyalri-subversion-1.10.2.drv /gnu/store/h9v84xaab30a6vqg7ni4g74fwslzz1f2-git-2.19.2.drv /gnu/store/jrk6szd0b8glb69iqs8kwsr74d47ck78-guile-gdbm-ffi-20120209.fa1d5b6-checkout.drv /gnu/store/6zgzgmmqa5ghqljwslmsh7xcmz3rckcy-guile-gdbm-ffi-20120209.tar.xz.drv /gnu/store/g0103wbwhzgv716xn7x2pyzhp0xmypbm-module-import.drv /gnu/store/nhy3343z8q23f20im1jm8cr0dvax8m3n-module-import-compiled.drv /gnu/store/81jxzs3h1ryr1jmnzlazqn2i1qswxpxn-module-import-compiled.drv /gnu/store/8va28xxwi4qidaq5gha55sxwwr2hwsbi-guile-gdbm-ffi-20120209.fa1d5b6.drv /gnu/store/h64z34a0g2jy57fbfrmdrykfjqsm8ny4-module-import.drv /gnu/store/cmavl4ahvx5yi1klmn1dmjc004njyi5h-ca-certificate-bundle.drv /gnu/store/73vrp31a5fg5zgwyb4808dk7g5idq0n0-bash-static-4.4.19.drv /gnu/store/rybkx8wn2czlbyhqf2hrxa4qjmrm5hkn-glibc-2.27.tar.xz.drv /gnu/store/2ww5cyacdml0wqmpmpryyamvay1ryqfv-glibc-2.27.drv /gnu/store/9mf0p34cm53g3l8li2fikmy4ns1f4jfm-linux-libre-headers-4.14.26.drv /gnu/store/hwc4xr8jx4g4im96rsm5h3fbmr3b5gfv-gzip-1.9.drv /gnu/store/vjc17j34rl0cvnbj547gk1hn1kxx4jdh-module-import-compiled.drv /gnu/store/0mppv29wf1wf02hbrsi1i9y3rxj4wg99-info-dir.drv /gnu/store/7vs1h0b02fzzf02bnmk23lw2sibfhnjy-glibc-utf8-locales-2.27.drv /gnu/store/v1sz6x6z0nliqqzhvn5956gyq9qsw9k3-manual-database.drv /gnu/store/zci2ggar92r1zfbfx5rb9klpzjlr6qg0-module-import-compiled.drv This is an awful lot of unrelated packages required to build hello! ------------=_1554377342-12280-1--