Package: guix;
Reported by: Mark H Weaver <mhw <at> netris.org>
Date: Wed, 13 Sep 2017 14:43:02 UTC
Severity: important
Done: ludo <at> gnu.org (Ludovic Courtès)
Bug is archived. No further changes may be made.
View this message in rfc822 format
From: help-debbugs <at> gnu.org (GNU bug Tracking System) To: Mark H Weaver <mhw <at> netris.org> Subject: bug#28445: closed (Re: bug#28445: match-error in 'device-sexp->device' while building system) Date: Fri, 06 Oct 2017 22:24:03 +0000
[Message part 1 (text/plain, inline)]
Your bug report #28445: match-error in 'device-sexp->device' while building system 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 28445 <at> debbugs.gnu.org. -- 28445: http://debbugs.gnu.org/cgi/bugreport.cgi?bug=28445 GNU Bug Tracking System Contact help-debbugs <at> gnu.org with problems
[Message part 2 (message/rfc822, inline)]
From: ludo <at> gnu.org (Ludovic Courtès) To: Mark H Weaver <mhw <at> netris.org> Cc: 28445-done <at> debbugs.gnu.org, Marius Bakke <mbakke <at> fastmail.com> Subject: Re: bug#28445: match-error in 'device-sexp->device' while building system Date: Sat, 07 Oct 2017 00:22:48 +0200Hi Mark, Mark H Weaver <mhw <at> netris.org> skribis: > ludo <at> gnu.org (Ludovic Courtès) writes: >> Andy pushed the first half of the fix as >> 96bc6518002c3b2ad9f15cf36991b20bebcbbe8a. Could you check whether the >> ‘ensure-not-/dev’ part below solves the rest? > > I see that you've pushed the 'ensure-not-/dev' part, and I have that now > in my tree, but FYI it didn't solve the problem for me. My system > 'parameters' file contains: > > (store (device "/dev/mapper/jojen-root") (mount-point "/")) > > and my grub.cfg still uses: > > search --label --set /dev/mapper/jojen-root I tested with the config you had posted, and commit 90d23ed9df33e35e157fecd8ab60f55e716ca42f fixes the problem. Let me know if anything else pops up in this area! Thank you, Ludo’.
[Message part 3 (message/rfc822, inline)]
From: Mark H Weaver <mhw <at> netris.org> To: bug-guix <at> gnu.org Subject: match-error in 'device-sexp->device' while building system Date: Wed, 13 Sep 2017 10:41:39 -0400I just started getting this error while trying to build my x86_64 GuixSD system: --8<---------------cut here---------------start------------->8--- mhw <at> jojen ~$ guix system build -K /etc/config-new.scm Backtrace: 14 (primitive-load "/home/mhw/guix/scripts/guix") In guix/ui.scm: 1331:12 13 (run-guix-command _ . _) In ice-9/boot-9.scm: 837:9 12 (catch _ _ #<procedure 7f67b07988c0 at guix/ui.scm:448…> …) 837:9 11 (catch _ _ #<procedure 7f67b07988d8 at guix/ui.scm:536…> …) In guix/scripts/system.scm: 1025:8 10 (_) 908:6 9 (process-action _ _ _) In guix/store.scm: 1443:24 8 (run-with-store _ _ #:guile-for-build _ #:system _ # _) In guix/scripts/system.scm: 661:31 7 (_ _) In srfi/srfi-1.scm: 705:23 6 (filter-map #<procedure system->boot-parameters (sys…> . #) In ice-9/boot-9.scm: 837:9 5 (catch system-error #<procedure 640e660 at guix/script…> …) In guix/scripts/system.scm: 385:30 4 (_) In gnu/system.scm: 307:17 3 (read-boot-parameters-file "/var/guix/profiles/system-9…") In ice-9/ports.scm: 444:17 2 (call-with-input-file _ _ #:binary _ #:encoding _ # _) In gnu/system.scm: 282:10 1 (read-boot-parameters _) 238:4 0 (device-sexp->device _) gnu/system.scm:238:4: In procedure device-sexp->device: gnu/system.scm:238:4: Throw to key `match-error' with args `("match" "no matching pattern" #f)'. --8<---------------cut here---------------end--------------->8--- I'm on commit 01ef804d69b2e57dd7b1d3d13e66e3f67e7c548a plus some local patches that are likely not relevant to this issue. Here's my config file /etc/config-new.scm: --8<---------------cut here---------------start------------->8--- ;; This is an operating system configuration template ;; for a "desktop" setup with GNOME and Xfce where the ;; root partition is encrypted with LUKS. (use-modules (gnu) (gnu system nss) (srfi srfi-1) (guix packages)) (use-service-modules base desktop networking xorg dbus) (use-package-modules certs gnome cryptsetup linux admin guile firmware xdisorg libusb) (define keymap (plain-file "keymap" "keymaps 0-255 keycode 42 = Shift keycode 54 = Shift keycode 29 = Control keycode 58 = Control keycode 56 = Alt keycode 100 = Alt alt shift keycode 1 = Meta_Escape alt shift keycode 2 = Meta_exclam alt shift keycode 3 = Meta_at alt shift keycode 4 = Meta_numbersign alt shift keycode 5 = Meta_dollar alt shift keycode 6 = Meta_percent alt shift keycode 7 = Meta_asciicircum shift control keycode 7 = Control_asciicircum control alt keycode 7 = Meta_Control_asciicircum shift control alt keycode 7 = Meta_Control_asciicircum alt shift keycode 8 = Meta_ampersand alt shift keycode 9 = Meta_asterisk alt shift keycode 10 = Meta_parenleft alt shift keycode 11 = Meta_parenright alt shift keycode 12 = Meta_underscore shift control keycode 12 = Control_underscore control alt keycode 12 = Meta_Control_underscore shift control alt keycode 12 = Meta_Control_underscore alt shift keycode 13 = Meta_plus alt shift keycode 14 = Meta_Delete alt shift keycode 15 = Meta_Tab alt shift keycode 16 = Meta_Q alt shift keycode 17 = Meta_W alt shift keycode 18 = Meta_E alt shift keycode 19 = Meta_R alt shift keycode 20 = Meta_T alt shift keycode 21 = Meta_Y alt shift keycode 22 = Meta_U alt shift keycode 23 = Meta_I alt shift keycode 24 = Meta_O alt shift keycode 25 = Meta_P alt shift keycode 26 = Meta_braceleft control alt keycode 26 = Meta_Escape alt shift keycode 27 = Meta_braceright control alt keycode 27 = Meta_Control_bracketright alt shift keycode 28 = Meta_Return alt shift keycode 29 = Meta_Control alt shift keycode 30 = Meta_A alt shift keycode 31 = Meta_S alt shift keycode 32 = Meta_D alt shift keycode 33 = Meta_F alt shift keycode 34 = Meta_G alt shift keycode 35 = Meta_H alt shift keycode 36 = Meta_J alt shift keycode 37 = Meta_K alt shift keycode 38 = Meta_L alt shift keycode 39 = Meta_colon alt shift keycode 40 = Meta_quotedbl alt shift keycode 41 = Meta_asciitilde alt shift keycode 43 = Meta_bar control alt keycode 43 = Meta_Control_backslash alt shift keycode 44 = Meta_Z alt shift keycode 45 = Meta_X alt shift keycode 46 = Meta_C alt shift keycode 47 = Meta_V alt shift keycode 48 = Meta_B alt shift keycode 49 = Meta_N alt shift keycode 50 = Meta_M alt shift keycode 51 = Meta_less alt shift keycode 52 = Meta_greater alt shift keycode 53 = Meta_question alt shift keycode 57 = Meta_space ")) (operating-system (host-name "jojen") (timezone "US/Eastern") (locale "en_US.utf8") (bootloader (bootloader-configuration (bootloader grub-bootloader) (target "/dev/sda"))) (kernel linux-libre) (firmware (list ath9k-htc-firmware)) ;; Specify a mapped device for the encrypted root partition. ;; The UUID is that returned by 'cryptsetup luksUUID'. (mapped-devices (list (mapped-device (source (uuid "a56c53e7-b345-4e24-a17b-6cf158dbc7d3")) (target "jojen-root") (type luks-device-mapping)))) (file-systems (cons* (file-system ;; XXX This doesn't seem to work ;; (device "jojen-root") ;; (title 'label) (device "/dev/mapper/jojen-root") (title 'device) (mount-point "/") (type "btrfs") (dependencies mapped-devices)) %base-file-systems)) (users (cons* (user-account (name "mhw") (uid 1000) (group "mhw") (supplementary-groups '("wheel" "users" "netdev" "audio" "video" "dialout")) (home-directory "/home/mhw")) %base-user-accounts)) (groups (cons* (user-group (name "mhw") (id 1000)) %base-groups)) (setuid-programs (list (file-append shadow "/bin/passwd") (file-append inetutils "/bin/ping"))) ;; This is where we specify system-wide packages. (packages (cons* nss-certs ;for HTTPS access gvfs ;for user mounts cryptsetup btrfs-progs wpa-supplicant network-manager network-manager-applet (delete sudo %base-packages))) (services (cons* (console-keymap-service keymap) ;;(xfce-desktop-service) (gnome-desktop-service) (service network-manager-service-type (network-manager-configuration)) (service wpa-supplicant-service-type wpa-supplicant) ;; Desktop services follow (slim-service) ;;(screen-locker-service slock) (screen-locker-service xlockmore "xlock") (simple-service 'mtp udev-service-type (list libmtp)) ;;(avahi-service) ; I don't trust this ;;(wicd-service) ; using NetworkManager instead (udisks-service) (upower-service) (colord-service) ;;(geoclue-service) ; I don't want this (polkit-service) (elogind-service) (dbus-service) ;;(ntp-service) ; I don't trust this (modify-services (remove (lambda (svc) (eq? (service-kind svc) wicd-service-type)) %base-services) ;; This is for debugging #; (nscd-service-type config => (nscd-configuration (inherit config) (debug-level 3) (log-file "/var/log/nscd.log"))) ;; I don't trust the build farm (guix-service-type config => (guix-configuration (inherit config) (use-substitutes? #f) (authorized-keys '()) (substitute-urls '()) (extra-options '("--gc-keep-derivations=yes" "--gc-keep-outputs=yes"))))))) ;; Allow resolution of '.local' host names with mDNS. ;;(name-service-switch %mdns-host-lookup-nss) ; disabled for now ) --8<---------------cut here---------------end--------------->8---
GNU bug tracking system
Copyright (C) 1999 Darren O. Benham,
1997,2003 nCipher Corporation Ltd,
1994-97 Ian Jackson.