bug#28265: guix system build fails

bug#28265: guix system build fails

[Efraim Flashner]

[-- Attachment #1.1: Type: text/plain, Size: 1349 bytes --]

efraim@macbook42:~/workspace/guix$ time nice ./pre-inst-env guix system build ~/lightweight-desktop.scm
Backtrace:
          11 (primitive-load "/home/efraim/workspace/guix/scripts/gu…")
In guix/ui.scm:
  1331:12 10 (run-guix-command _ . _)
In ice-9/boot-9.scm:
    837:9  9 (catch _ _ #<procedure 7f4e83aea8c0 at guix/ui.scm:448…> …)
    837:9  8 (catch _ _ #<procedure 7f4e83aea8d8 at guix/ui.scm:536…> …)
In guix/scripts/system.scm:
   1022:8  7 (_)
    905:6  6 (process-action _ _ _)
In guix/store.scm:
  1441:24  5 (run-with-store _ _ #:guile-for-build _ #:system _)
In guix/scripts/system.scm:
    637:2  4 (_ _)
In gnu/system.scm:
    884:4  3 (_ _)
In gnu/bootloader/grub.scm:
   343:29  2 (grub-configuration-file #<<bootloader-configuration> …> …)
   207:30  1 (eye-candy #<<bootloader-configuration> bootloader: #<…> …)
   149:22  0 (grub-background-image #<<bootloader-configuration> bo…> …)

gnu/bootloader/grub.scm:149:22: In procedure grub-background-image:
gnu/bootloader/grub.scm:149:22: In procedure struct_vtable: Wrong type argument in position 1 (expecting struct): 5

-- 
Efraim Flashner   <efraim@flashner.co.il>   אפרים פלשנר
GPG key = A28B F40C 3E55 1372 662D  14F7 41AA E7DC CA3D 8351
Confidentiality cannot be guaranteed on emails sent or received unencrypted

[-- Attachment #1.2: lightweight-desktop.scm --]
[-- Type: text/plain, Size: 2011 bytes --]

;; This is an operating system configuration template
;; for a "desktop" setup without full-blown desktop
;; environments.

(use-modules (gnu) (gnu system nss))
(use-service-modules desktop)
(use-package-modules bootloaders certs openbox suckless wm)

(operating-system
  (host-name "macbook11")
  (timezone "Asia/Jerusalem")
  (locale "en_US.utf8")

  ;; Use the UEFI variant of GRUB with the EFI System
  ;; Partition mounted on /boot/efi.
  (bootloader (bootloader-configuration
                (bootloader grub-efi-bootloader)
                (target "/boot/efi")))

  ;; Assume the target root file system is labelled "my-root".
  (file-systems (cons* (file-system
                         (device "my-root")
                         (title 'label)
                         (mount-point "/")
                         (type "ext4"))
                       (file-system
                         ;; Specify partition here since FAT
                         ;; labels are currently unsupported.
                         (device "/dev/sda1")
                         (mount-point "/boot/efi")
                         (type "vfat"))
                       %base-file-systems))

  (swap-devices '("/dev/sda2"))

  (users (cons (user-account
                (name "efraim")
                (group "users")
                (supplementary-groups '("wheel" "netdev"
                                        "audio" "video"))
                (home-directory "/home/efraim"))
               %base-user-accounts))

  ;; Add a bunch of window managers; we can choose one at
  ;; the log-in screen with F1.
  (packages (cons* openbox i3-wm i3status dmenu   ;window managers
                   nss-certs                      ;for HTTPS access
                   %base-packages))

  ;; Use the "desktop" services, which include the X11
  ;; log-in service, networking with Wicd, and more.
  (services %desktop-services)

  ;; Allow resolution of '.local' host names with mDNS.
  (name-service-switch %mdns-host-lookup-nss))

[-- Attachment #2: signature.asc --]
[-- Type: application/pgp-signature, Size: 833 bytes --]

bug#28265: guix system build fails

[Christopher Baines]

[-- Attachment #1: Type: text/plain, Size: 1628 bytes --]

On Mon, 28 Aug 2017 21:52:32 +0300
Efraim Flashner <efraim@flashner.co.il> wrote:

> efraim@macbook42:~/workspace/guix$ time nice ./pre-inst-env guix
> system build ~/lightweight-desktop.scm Backtrace:
>           11 (primitive-load
> "/home/efraim/workspace/guix/scripts/gu…") In guix/ui.scm:
>   1331:12 10 (run-guix-command _ . _)
> In ice-9/boot-9.scm:
>     837:9  9 (catch _ _ #<procedure 7f4e83aea8c0 at guix/ui.scm:448…>
> …) 837:9  8 (catch _ _ #<procedure 7f4e83aea8d8 at guix/ui.scm:536…>
> …) In guix/scripts/system.scm:
>    1022:8  7 (_)
>     905:6  6 (process-action _ _ _)
> In guix/store.scm:
>   1441:24  5 (run-with-store _ _ #:guile-for-build _ #:system _)
> In guix/scripts/system.scm:
>     637:2  4 (_ _)
> In gnu/system.scm:
>     884:4  3 (_ _)
> In gnu/bootloader/grub.scm:
>    343:29  2 (grub-configuration-file #<<bootloader-configuration> …>
> …) 207:30  1 (eye-candy #<<bootloader-configuration> bootloader: #<…>
> …) 149:22  0 (grub-background-image #<<bootloader-configuration> bo…>
> …)
> 
> gnu/bootloader/grub.scm:149:22: In procedure grub-background-image:
> gnu/bootloader/grub.scm:149:22: In procedure struct_vtable: Wrong
> type argument in position 1 (expecting struct): 5
> 

I tried this, and got the same error, but then I deleted all the .go
files, re-ran make, and then tried again, and then it worked.

→ ./pre-inst-env guix system build gnu/system/examples/lightweight-desktop.tmpl 
/gnu/store/hqjri2wz5sz32fabv7cr85zirnbsmvjs-system

I'm not quite sure what this means.... my understanding of Guile is a
bit vague.

[-- Attachment #2: OpenPGP digital signature --]
[-- Type: application/pgp-signature, Size: 963 bytes --]

bug#28265: guix system build fails

[Efraim Flashner]

[-- Attachment #1: Type: text/plain, Size: 2160 bytes --]

On Mon, Aug 28, 2017 at 09:15:35PM +0100, Christopher Baines wrote:
> On Mon, 28 Aug 2017 21:52:32 +0300
> Efraim Flashner <efraim@flashner.co.il> wrote:
> 
> > efraim@macbook42:~/workspace/guix$ time nice ./pre-inst-env guix
> > system build ~/lightweight-desktop.scm Backtrace:
> >           11 (primitive-load
> > "/home/efraim/workspace/guix/scripts/gu…") In guix/ui.scm:
> >   1331:12 10 (run-guix-command _ . _)
> > In ice-9/boot-9.scm:
> >     837:9  9 (catch _ _ #<procedure 7f4e83aea8c0 at guix/ui.scm:448…>
> > …) 837:9  8 (catch _ _ #<procedure 7f4e83aea8d8 at guix/ui.scm:536…>
> > …) In guix/scripts/system.scm:
> >    1022:8  7 (_)
> >     905:6  6 (process-action _ _ _)
> > In guix/store.scm:
> >   1441:24  5 (run-with-store _ _ #:guile-for-build _ #:system _)
> > In guix/scripts/system.scm:
> >     637:2  4 (_ _)
> > In gnu/system.scm:
> >     884:4  3 (_ _)
> > In gnu/bootloader/grub.scm:
> >    343:29  2 (grub-configuration-file #<<bootloader-configuration> …>
> > …) 207:30  1 (eye-candy #<<bootloader-configuration> bootloader: #<…>
> > …) 149:22  0 (grub-background-image #<<bootloader-configuration> bo…>
> > …)
> > 
> > gnu/bootloader/grub.scm:149:22: In procedure grub-background-image:
> > gnu/bootloader/grub.scm:149:22: In procedure struct_vtable: Wrong
> > type argument in position 1 (expecting struct): 5
> > 
> 
> I tried this, and got the same error, but then I deleted all the .go
> files, re-ran make, and then tried again, and then it worked.
> 

Ooops, so I should've run `make clean' first.

> → ./pre-inst-env guix system build gnu/system/examples/lightweight-desktop.tmpl 
> /gnu/store/hqjri2wz5sz32fabv7cr85zirnbsmvjs-system
> 
> I'm not quite sure what this means.... my understanding of Guile is a
> bit vague.

its returning the system that you just asked it to build.


I'm closing the bug, should've run `make clean' first.

-- 
Efraim Flashner   <efraim@flashner.co.il>   אפרים פלשנר
GPG key = A28B F40C 3E55 1372 662D  14F7 41AA E7DC CA3D 8351
Confidentiality cannot be guaranteed on emails sent or received unencrypted

[-- Attachment #2: signature.asc --]
[-- Type: application/pgp-signature, Size: 833 bytes --]

bug#28265: guix system build fails

[Ludovic Courtès]

Hello!

Christopher Baines <mail@cbaines.net> skribis:

> On Mon, 28 Aug 2017 21:52:32 +0300
> Efraim Flashner <efraim@flashner.co.il> wrote:
>
>> efraim@macbook42:~/workspace/guix$ time nice ./pre-inst-env guix
>> system build ~/lightweight-desktop.scm Backtrace:
>>           11 (primitive-load
>> "/home/efraim/workspace/guix/scripts/gu…") In guix/ui.scm:
>>   1331:12 10 (run-guix-command _ . _)
>> In ice-9/boot-9.scm:
>>     837:9  9 (catch _ _ #<procedure 7f4e83aea8c0 at guix/ui.scm:448…>
>> …) 837:9  8 (catch _ _ #<procedure 7f4e83aea8d8 at guix/ui.scm:536…>
>> …) In guix/scripts/system.scm:
>>    1022:8  7 (_)
>>     905:6  6 (process-action _ _ _)
>> In guix/store.scm:
>>   1441:24  5 (run-with-store _ _ #:guile-for-build _ #:system _)
>> In guix/scripts/system.scm:
>>     637:2  4 (_ _)
>> In gnu/system.scm:
>>     884:4  3 (_ _)
>> In gnu/bootloader/grub.scm:
>>    343:29  2 (grub-configuration-file #<<bootloader-configuration> …>
>> …) 207:30  1 (eye-candy #<<bootloader-configuration> bootloader: #<…>
>> …) 149:22  0 (grub-background-image #<<bootloader-configuration> bo…>
>> …)
>> 
>> gnu/bootloader/grub.scm:149:22: In procedure grub-background-image:
>> gnu/bootloader/grub.scm:149:22: In procedure struct_vtable: Wrong
>> type argument in position 1 (expecting struct): 5
>> 
>
> I tried this, and got the same error, but then I deleted all the .go
> files, re-ran make, and then tried again, and then it worked.

Yeah, this kind of error is typical of an ABI mismatch.  The reason is
that in Guile, record field accessors of SRFI-9 record types are
inlined:

--8<---------------cut here---------------start------------->8---
scheme@(guile-user)> ,use(srfi srfi-9)
scheme@(guile-user)> (define-record-type <foo>
		       (make-foo x)
		       foo?
		       (x foo-x))
scheme@(guile-user)> ,expand (foo-x bar)
$2 = (let ((s bar))
  (if ((@@ (srfi srfi-9) eq?)
       ((@@ (srfi srfi-9) struct-vtable) s)
       <foo>)
    ((@@ (srfi srfi-9) struct-ref) s 0)
    (let ((s* s))
      ((@@ (srfi srfi-9) throw)
       'wrong-type-arg
       'foo-x
       "Wrong type argument: ~S"
       ((@@ (srfi srfi-9) list) s*)
       ((@@ (srfi srfi-9) list) s*)))))
--8<---------------cut here---------------end--------------->8---

The (struct-ref s 0) above becomes incorrect if, say, we add a field
right before ‘x’, because ‘x’ would now be at offset 1.

The safe solution here is to “make clean-go && make”.

Ludo’.