From mboxrd@z Thu Jan  1 00:00:00 1970
From: ludo@gnu.org (Ludovic =?UTF-8?Q?Court=C3=A8s?=)
Subject: bug#27284: =?UTF-8?Q?=E2=80=98guix_?= =?UTF-8?Q?pull=E2=80=99?=
	broken on Guile 2.0
Date: Tue, 10 Apr 2018 23:53:17 +0200
Message-ID: <87bmeq684y.fsf_-_@gnu.org>
References: <87h8tnz1dx.fsf@gnu.org> <20171211105253.9670-1-ludo@gnu.org>
	<20171211105253.9670-4-ludo@gnu.org> <871sjst76a.fsf@gnu.org>
	<87d0zpyj5d.fsf_-_@gnu.org> <87zi2dvemk.fsf@gnu.org>
	<87po38noln.fsf@elephly.net>
Mime-Version: 1.0
Content-Type: text/plain; charset=utf-8
Content-Transfer-Encoding: quoted-printable
Return-path: <bug-guix-bounces+gcggb-bug-guix=m.gmane.org@gnu.org>
Received: from eggs.gnu.org ([2001:4830:134:3::10]:44424)
	by lists.gnu.org with esmtp (Exim 4.71)
	(envelope-from <Debian-debbugs@debbugs.gnu.org>) id 1f61DJ-0001XD-A5
	for bug-guix@gnu.org; Tue, 10 Apr 2018 17:54:07 -0400
Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71)
	(envelope-from <Debian-debbugs@debbugs.gnu.org>) id 1f61DG-0001CS-3R
	for bug-guix@gnu.org; Tue, 10 Apr 2018 17:54:05 -0400
Received: from debbugs.gnu.org ([208.118.235.43]:37593)
	by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_128_CBC_SHA1:16)
	(Exim 4.71) (envelope-from <Debian-debbugs@debbugs.gnu.org>)
	id 1f61DF-0001CD-Vu
	for bug-guix@gnu.org; Tue, 10 Apr 2018 17:54:02 -0400
Sender: "Debbugs-submit" <debbugs-submit-bounces@debbugs.gnu.org>
Resent-Message-ID: <handler.27284.D27284.152339720415548@debbugs.gnu.org>
In-Reply-To: <87po38noln.fsf@elephly.net> (Ricardo Wurmus's message of "Mon,
	09 Apr 2018 21:53:24 +0200")
List-Id: Bug reports for GNU Guix <bug-guix.gnu.org>
List-Unsubscribe: <https://lists.gnu.org/mailman/options/bug-guix>,
	<mailto:bug-guix-request@gnu.org?subject=unsubscribe>
List-Archive: <http://lists.gnu.org/archive/html/bug-guix/>
List-Post: <mailto:bug-guix@gnu.org>
List-Help: <mailto:bug-guix-request@gnu.org?subject=help>
List-Subscribe: <https://lists.gnu.org/mailman/listinfo/bug-guix>,
	<mailto:bug-guix-request@gnu.org?subject=subscribe>
Errors-To: bug-guix-bounces+gcggb-bug-guix=m.gmane.org@gnu.org
Sender: "bug-Guix" <bug-guix-bounces+gcggb-bug-guix=m.gmane.org@gnu.org>
To: Ricardo Wurmus <rekado@elephly.net>
Cc: 27284-done@debbugs.gnu.org, Maxim Cournoyer <maxim.cournoyer@gmail.com>

Hello,

Ricardo Wurmus <rekado@elephly.net> skribis:

> This is really great!  I=E2=80=99m very happy that this is finally in the=
 master
> branch.  Thank you!

It=E2=80=99s still not as good as we=E2=80=99d like obviously, but if you=
=E2=80=99re lucky, you
get pull in 5 minutes now.

> As discussed on IRC, there is a problem when running =E2=80=9Cguix pull=
=E2=80=9D with an
> older version of Guix that is still using Guile 2.0, which seems to be
> adequately fixed by your patch:

I=E2=80=99ve pushed this as commit e69dd8443ad2b8620c3a3db874dc50e06b0d43d0.

Unfortunately I=E2=80=99m now stuck with this:

--8<---------------cut here---------------start------------->8---
building path(s) `/gnu/store/81dmaf8c1wfzn3lifxsfxn827bgdz8y6-guix-extra'
loading...	  0.0% of 106 filesBacktrace:
In unknown file:
   ?: 19 [primitive-load-path "guix/packages" ...]
In guix/packages.scm:
  23: 18 [#<procedure 1067ac0 ()>]
In ice-9/boot-9.scm:
2987: 17 [define-module* (guix packages) #:filename ...]
2962: 16 [resolve-imports (((guix utils)) ((guix records)) ((guix store)) .=
..)]
2900: 15 [resolve-interface (guix utils) #:select ...]
2825: 14 [#<procedure 84b000 at ice-9/boot-9.scm:2813:4 (name #:optional au=
toload version #:key ensure)> # ...]
3101: 13 [try-module-autoload (guix utils) #f]
2412: 12 [save-module-excursion #<procedure 106ffc0 at ice-9/boot-9.scm:310=
2:17 ()>]
3121: 11 [#<procedure 106ffc0 at ice-9/boot-9.scm:3102:17 ()>]
In unknown file:
   ?: 10 [primitive-load-path "guix/utils" ...]
In guix/utils.scm:
  26: 9 [#<procedure 1080740 ()>]
In ice-9/boot-9.scm:
2987: 8 [define-module* (guix utils) #:filename ...]
2962: 7 [resolve-imports (((guix config)) ((srfi srfi-1)) ((srfi srfi-9)) .=
..)]
2900: 6 [resolve-interface (guix config) #:select ...]
2825: 5 [#<procedure 84b000 at ice-9/boot-9.scm:2813:4 (name #:optional aut=
oload version #:key ensure)> # ...]
3101: 4 [try-module-autoload (guix config) #f]
2412: 3 [save-module-excursion #<procedure 1086900 at ice-9/boot-9.scm:3102=
:17 ()>]
3121: 2 [#<procedure 1086900 at ice-9/boot-9.scm:3102:17 ()>]
In unknown file:
   ?: 1 [primitive-load-path "guix/config" ...]
In guix/config.scm:
   1: 0 [#<procedure 10856a0 ()>]

guix/config.scm:1:726: In procedure #<procedure 10856a0 ()>:
guix/config.scm:1:726: In procedure module-lookup: Unbound variable: getenv
builder for `/gnu/store/0g3zg87w1dlqv368az3q3a1p57nd4f91-guix-extra.drv' fa=
iled with exit code 1
cannot build derivation `/gnu/store/gk74rl0k8hj79ckcf6ncg8ikgv8yyawq-guix-2=
0180410.21.drv': 1 dependencies couldn't be built
--8<---------------cut here---------------end--------------->8---

Indeed, on closer inspection, (guix config) is miscompiled and looks for
=E2=80=98getenv=E2=80=99 and =E2=80=98string-append=E2=80=99 in a nonexiste=
nt anonymous module (the
#{=C2=A0g12345}# thing below) instead of (guile):

--8<---------------cut here---------------start------------->8---
$ guix environment --ad-hoc guile@2.0 -- guild disassemble /gnu/store/vhb0p=
ps5lnsm4k2f1fg3050x85v8n7xz-guix-core/guix/config.go

[...]

 975    (load-string "bug-guix@gnu.org");; "bug-guix@gnu.org"
 995    (vector-set)=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=
=20=20
 996    (dup)=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=
=20=20=20=20=20=20=20
 997    (make-int8 60)                  ;; 60
 999    (load-string "https://gnu.org/s/guix");; "https://gnu.org/s/guix"
1025    (vector-set)=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=
=20=20
1026    (dup)=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=
=20=20=20=20=20=20=20
1027    (make-int8 61)                  ;; 61
1029    (load-symbol " g59791")         ;; #{ g59791}#
1040    (vector-set)=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=
=20=20
1041    (dup)=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=
=20=20=20=20=20=20=20
1042    (make-int8 62)                  ;; 62
1044    (object-ref 61)=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20
1046    (list 0 1)                      ;; 1 element
1049    (vector-set)=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=
=20=20
1050    (dup)=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=
=20=20=20=20=20=20=20
1051    (make-int8 63)                  ;; 63
1053    (load-symbol "getenv")          ;; getenv
1063    (vector-set)=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=
=20=20
1064    (dup)=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=
=20=20=20=20=20=20=20
1065    (make-int8 64)                  ;; 64
1067    (object-ref 62)=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20
1069    (object-ref 63)=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20
1071    (make-false)=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=
=20=20
1072    (list 0 3)                      ;; 3 elements
1075    (vector-set)=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=
=20=20
1076    (dup)=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=
=20=20=20=20=20=20=20
1077    (make-int8 65)                  ;; 65
1079    (object-ref 62)=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20
1081    (object-ref 63)=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20
1083    (make-false)=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=
=20=20
1084    (list 0 3)                      ;; 3 elements
1087    (vector-set)=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=
=20=20
1088    (dup)=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=
=20=20=20=20=20=20=20
1089    (make-int8 66)                  ;; 66
1091    (load-string "GUIX_REGISTER")   ;; "GUIX_REGISTER"
1108    (vector-set)=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=
=20=20
1109    (dup)=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=
=20=20=20=20=20=20=20
1110    (make-int8 67)                  ;; 67
1112    (load-symbol "string-append")   ;; string-append
1129    (vector-set)=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=20=
=20=20

[...]

--8<---------------cut here---------------end--------------->8---

Ludo=E2=80=99.