bug#41237: guix deploy hangs when a file-system-device is set to a UUID

[Brice Waegeneire]

On 2020-06-04 11:29, Ludovic Courtès wrote:
> Hey,
>
> Brice Waegeneire <brice@waegenei.re> skribis:
>
> > On 2020-06-04 09:41, Ludovic Courtès wrote:
> > > Brice Waegeneire <brice@waegenei.re> skribis:
> > > > In ice-9/boot-9.scm:
> > > >     2806:4  6 (save-module-excursion _)
> > > >    4351:12  5 (_)
> > > > In unknown file:
> > > >             4 (find #<procedure 7fab527ecd80 at 
> > > > gnu/build/file-syste…>
> > > > …)
> > > > In gnu/system/uuid.scm:
> > > >      302:5  3 (uuid=? . _)
> > > > In unknown file:
> > > > While executing meta-command:
> > > > In procedure frame-local-ref: Argument 2 out of range: 0
> > >
> > > And what does “,locals” show?
> >
> > There isn't much:
> >
> > scheme@(guix-user) [1]> ,locals
> >    Local variables:
> >    $1 = closure = #<procedure raise-exception (exn #:key 
> > continuable?)>
>
> And in upper frames?  (Type “,up”.)

I went trough all the upper frames:

--8<---------------cut here---------------start------------->8---
scheme@(guix-user)> (load 
"/gnu/store/wzvn8r2z7lnf5mqzagxzcb64wr69kgk4-remote-assertion.scm")
^Cice-9/boot-9.scm:1669:16: In procedure raise-exception:
User interrupt

Entering a new prompt.  Type `,bt' for a backtrace or `,q' to continue.
scheme@(guix-user) [1]> ,bt
In ice-9/boot-9.scm:
   2806:4  6 (save-module-excursion _)
  4351:12  5 (_)
In unknown file:
           4 (find #<procedure 7f31d107c570 at gnu/build/file-syste…> …)
In gnu/system/uuid.scm:
    302:5  3 (uuid=? . _)
In unknown file:
While executing meta-command:
In procedure frame-local-ref: Argument 2 out of range: 0
scheme@(guix-user) [1]> ,locals
  Local variables:
  $1 = closure = #<procedure raise-exception (exn #:key continuable?)>
scheme@(guix-user) [1]> ,up
In ice-9/top-repl.scm:
    37:24  1 (_ _)
scheme@(guix-user) [1]> ,locals
  Local variables:
  $2 = arg = signal
  $3 = arg = #f
  $4 = arg = ()
  $5 = pair = (() (2))
  $6 = pair = ("User interrupt" () (2))
  $7 = pair = (#f "User interrupt" () (2))
scheme@(guix-user) [1]> ,up
While executing meta-command:
In procedure frame-local-ref: Argument 2 out of range: 0
scheme@(guix-user) [1]> ,locals
  No local variables.
scheme@(guix-user) [1]> ,up
In gnu/system/uuid.scm:
    302:5  3 (uuid=? . _)
scheme@(guix-user) [1]> ,locals
  Local variables:
  $8 = closure = #<procedure uuid=? expr>
  $9 = w = #vu8(185 176 222 181)
While executing meta-command:
In procedure frame-local-ref: Argument 2 out of range: 3
scheme@(guix-user) [1]> ,up
           4 (find #<procedure 7f31d107c570 at gnu/build/file-syste…> …)
scheme@(guix-user) [1]> ,locals
  No local variables.
scheme@(guix-user) [1]> ,up
In ice-9/boot-9.scm:
  4351:12  5 (_)
scheme@(guix-user) [1]> ,locals
  No local variables.
scheme@(guix-user) [1]> ,up
In ice-9/boot-9.scm:
   2806:4  6 (save-module-excursion _)
scheme@(guix-user) [1]> ,locals
  Local variables:
  thunk = #<unspecified>
  $10 = obj = #<variable 7f31d1075990 value: #f>
  $11 = outer-module = #f
  $12 = obj = #<variable 7f31d1075980 value: #<directory (guix-user) 7…>
  $13 = box = #<variable 7f31d5703ef0 value: #<procedure set-current-m…>
  closure = #<unspecified>
scheme@(guix-user) [1]> ,up
Already at outermost frame.
--8<---------------cut here---------------end--------------->8---

- Brice