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

From: Brice Waegeneire <[email-masked]>
Date: Fri, 05 Jun 2020 17:11:23 +0000

Hello Ludovic,

The same with “COLUMNS=200“:

--8<---------------cut here---------------start------------->8---
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 7f9a930bd570 at 
gnu/build/file-systems.scm:606:4 (device)> ("/dev/sda" "/dev/sda1" 
"/dev/sda2" "/dev/sda3" "/dev/sdb" "/dev/sdb2" "/dev/sdb3"))
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 7f9a930bd570 at 
gnu/build/file-systems.scm:606:4 (device)> ("/dev/sda" "/dev/sda1" 
"/dev/sda2" "/dev/sda3" "/dev/sdb" "/dev/sdb2" "/dev/sdb3"))
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 7f9a930b5770 value: #f>
   $11 = outer-module = #f
   $12 = obj = #<variable 7f9a930b5760 value: #<directory (guix-user) 
7f9a9505f6e0>>
   $13 = box = #<variable 7f9a97743ef0 value: #<procedure 
set-current-module (_)>>
   closure = #<unspecified>
scheme@(guix-user) [1]> ,up
Already at outermost frame.
scheme@(guix-user) [1]>
--8<---------------cut here---------------end--------------->8---

- Brice