From d897f1b440fde666415be4027fa71ea91f6084fb Mon Sep 17 00:00:00 2001
From: Ludovic Courtès <ludo@gnu.org>
Date: Tue, 3 Dec 2024 14:42:33 +0100
Subject: gnu: netdde: Add default case.
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

This fixes evaluation of ‘master’, which was failing with a ‘match’
error.

* gnu/packages/hurd.scm (netdde)[arguments]: Add default case.

Change-Id: I093b21f629a930f6e6b43430f5a204d06e1f3aad
---
 gnu/packages/hurd.scm | 8 ++++++--
 1 file changed, 6 insertions(+), 2 deletions(-)

(limited to 'gnu/packages/hurd.scm')

diff --git a/gnu/packages/hurd.scm b/gnu/packages/hurd.scm
index 61833219c4..e0369a7af3 100644
--- a/gnu/packages/hurd.scm
+++ b/gnu/packages/hurd.scm
@@ -1,6 +1,6 @@
 ;;; GNU Guix --- Functional package management for GNU
 ;;; Copyright © 2014, 2015, 2016, 2017 Manolis Fragkiskos Ragkousis <manolis837@gmail.com>
-;;; Copyright © 2018, 2020-2023 Ludovic Courtès <ludo@gnu.org>
+;;; Copyright © 2018, 2020-2024 Ludovic Courtès <ludo@gnu.org>
 ;;; Copyright © 2020 Efraim Flashner <efraim@flashner.co.il>
 ;;; Copyright © 2020 Marius Bakke <mbakke@fastmail.com>
 ;;; Copyright © 2020, 2022, 2023, 2024 Janneke Nieuwenhuizen <janneke@gnu.org>
@@ -636,7 +636,11 @@ implementing them.")
                               ((? target-x86-32?)
                                "x86")
                               ((? target-x86-64?)
-                               "amd64"))))
+                               "amd64")
+                              (_
+                               ;; XXX: Cross-compiling this package to an
+                               ;; unsupported system.
+                               "UNSUPPORTED_SYSTEM"))))
                  (string-append "ARCH=" arch)))
          #:configure-flags
          ,#~(list (string-append "LDFLAGS=-Wl,-rpath=" #$output "/lib"))
-- 
cgit v1.2.3