From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: from mp1 ([2001:41d0:2:4a6f::]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits)) by ms0.migadu.com with LMTPS id kCXTK6rMqmDvTQEAgWs5BA (envelope-from ) for ; Sun, 23 May 2021 23:44:10 +0200 Received: from aspmx1.migadu.com ([2001:41d0:2:4a6f::]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits)) by mp1 with LMTPS id QBR6J6rMqmCdMgAAbx9fmQ (envelope-from ) for ; Sun, 23 May 2021 21:44:10 +0000 Received: from lists.gnu.org (lists.gnu.org [209.51.188.17]) (using TLSv1.2 with cipher ECDHE-RSA-AES256-GCM-SHA384 (256/256 bits)) (No client certificate requested) by aspmx1.migadu.com (Postfix) with ESMTPS id 1E75311489 for ; Sun, 23 May 2021 23:44:10 +0200 (CEST) Received: from localhost ([::1]:54578 helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1lkvtJ-0008Ck-4U for larch@yhetil.org; Sun, 23 May 2021 17:44:09 -0400 Received: from eggs.gnu.org ([2001:470:142:3::10]:34102) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1lkvtC-0008CV-9A for bug-guix@gnu.org; Sun, 23 May 2021 17:44:02 -0400 Received: from debbugs.gnu.org ([209.51.188.43]:58573) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_128_GCM_SHA256:128) (Exim 4.90_1) (envelope-from ) id 1lkvtC-0005UG-0f for bug-guix@gnu.org; Sun, 23 May 2021 17:44:02 -0400 Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1lkvtB-00009r-V4 for bug-guix@gnu.org; Sun, 23 May 2021 17:44:01 -0400 X-Loop: help-debbugs@gnu.org Subject: bug#47172: Shepherd 0.8.1 tests fail on core-updates Resent-From: Ludovic =?UTF-8?Q?Court=C3=A8s?= Original-Sender: "Debbugs-submit" Resent-CC: bug-guix@gnu.org Resent-Date: Sun, 23 May 2021 21:44:01 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 47172 X-GNU-PR-Package: guix X-GNU-PR-Keywords: To: Marius Bakke Received: via spool by 47172-submit@debbugs.gnu.org id=B47172.1621806207558 (code B ref 47172); Sun, 23 May 2021 21:44:01 +0000 Received: (at 47172) by debbugs.gnu.org; 23 May 2021 21:43:27 +0000 Received: from localhost ([127.0.0.1]:41886 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1lkvsc-00008r-Ey for submit@debbugs.gnu.org; Sun, 23 May 2021 17:43:26 -0400 Received: from eggs.gnu.org ([209.51.188.92]:40370) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1lkvsY-00008V-Hu; Sun, 23 May 2021 17:43:24 -0400 Received: from fencepost.gnu.org ([2001:470:142:3::e]:44660) by eggs.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1lkvsT-000595-AX; Sun, 23 May 2021 17:43:17 -0400 Received: from [2a01:e0a:1d:7270:af76:b9b:ca24:c465] (port=47488 helo=ribbon) by fencepost.gnu.org with esmtpsa (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1lkvsN-0005t4-E1; Sun, 23 May 2021 17:43:13 -0400 From: Ludovic =?UTF-8?Q?Court=C3=A8s?= References: <37305bfa08faea95b45a6496623154c2ebab1f11.camel@zaclys.net> <87zgwl4ui0.fsf@gnu.org> <87v9794l2a.fsf@gnu.org> <875yz9qxrv.fsf@gnu.org> Date: Sun, 23 May 2021 23:43:09 +0200 In-Reply-To: <875yz9qxrv.fsf@gnu.org> (Marius Bakke's message of "Sun, 23 May 2021 17:23:48 +0200") Message-ID: <87lf853z4i.fsf@gnu.org> User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/27.2 (gnu/linux) MIME-Version: 1.0 Content-Type: multipart/mixed; boundary="=-=-=" X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list X-BeenThere: bug-guix@gnu.org List-Id: Bug reports for GNU Guix List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Cc: 47172@debbugs.gnu.org, 48368@debbugs.gnu.org Errors-To: bug-guix-bounces+larch=yhetil.org@gnu.org Sender: "bug-Guix" X-Migadu-Flow: FLOW_IN ARC-Message-Signature: i=1; a=rsa-sha256; c=relaxed/relaxed; d=yhetil.org; s=key1; t=1621806250; h=from:from:sender:sender:reply-to:subject:subject:date:date: message-id:message-id:to:to:cc:cc:mime-version:mime-version: content-type:content-type:resent-cc:resent-from:resent-sender: resent-message-id:in-reply-to:in-reply-to:references:references: list-id:list-help:list-unsubscribe:list-subscribe:list-post; bh=3wmllR/agIndW6+MXdgJXSTag5nkNK2e8lyLf2COoLs=; b=WRBgoKJj81xoDjzlM3XNXQp2UU/5WJS5tx6jH2mZEUHqgAdtaei9vj2Mh8ngE2MFBkoML/ pdGW1E83s0zS3OjsV5R7SerXnIbtD8OqvzH/4R2kaTiX6V0peRXsEIuE7UrNORLnEl7A6d 464FrV8Zrd3Zzw2m3FFbdDqmRQcxSGXv/8FHZe6vOGRRuEPqyPVrf/hCePz31zQ6FFsnVC btWmPzJtxSbBnil2UXVgEy09OUnOol+BnoUWFJKEBj86Jt/ZwFuRLseMidbbX1kZH+C2oB Pal7SCNLDw2X/oJ7ZYhkWt6By47SBVodTfqeKQNSySpq7bYJcETGJbaOdaMEhQ== ARC-Seal: i=1; s=key1; d=yhetil.org; t=1621806250; a=rsa-sha256; cv=none; b=Vmc1Th1iT1gaDJA9VrnEy/RxUBSE9sRhStAsBTeBq0VWuLQA9BThoqHrxDXe01DLzOpfm5 MFZkoIGdpbGS0DEcWilbNvvK/yZPXJisQP6svy5S4OutnKK/KUIotFY4qC7RPGviVgHWD9 56zlp1XW4qGekIoNvPDsk6j9MPxDEpYFjtOTVbrI5wuZ+1IohT6cPzBRRlXSKbLP1j7x8Y QD9aQEwrstgVbJMGzYxsuK7Lp84MhlCJCTDDlsKjyQsOiNJPiujySN6lqbHICvL/Ds/REG /rfZwgX2EbgwjRaP815DguK985cOVzr997DL+CnwS4hGyAKJb0t2W2IE8d2raA== ARC-Authentication-Results: i=1; aspmx1.migadu.com; dkim=none; spf=pass (aspmx1.migadu.com: domain of bug-guix-bounces@gnu.org designates 209.51.188.17 as permitted sender) smtp.mailfrom=bug-guix-bounces@gnu.org X-Migadu-Spam-Score: -2.94 Authentication-Results: aspmx1.migadu.com; dkim=none; dmarc=pass (policy=none) header.from=gnu.org; spf=pass (aspmx1.migadu.com: domain of bug-guix-bounces@gnu.org designates 209.51.188.17 as permitted sender) smtp.mailfrom=bug-guix-bounces@gnu.org X-Migadu-Queue-Id: 1E75311489 X-Spam-Score: -2.94 X-Migadu-Scanner: scn0.migadu.com X-TUID: bWyFmhJXoSNF --=-=-= Content-Type: text/plain; charset=utf-8 Content-Transfer-Encoding: quoted-printable Hello, Marius Bakke skribis: > Ludovic Court=C3=A8s skriver: [...] >> A workaround that works with 3.0.7 is swapping the two =E2=80=98and=E2= =80=99 >> sub-expressions: >> >> diff --git a/modules/shepherd/scripts/herd.scm b/modules/shepherd/script= s/herd.scm >> index 106de1e..39d2e34 100644 >> --- a/modules/shepherd/scripts/herd.scm >> +++ b/modules/shepherd/scripts/herd.scm >> @@ -126,8 +126,8 @@ of pairs." >> the daemon via SOCKET-FILE." >> (with-system-error-handling >> (let ((sock (open-connection socket-file)) >> - (action* (if (and (eq? action 'detailed-status) >> - (memq service '(root shepherd))) >> + (action* (if (and (memq service '(root shepherd)) >> + (eq? action 'detailed-status)) >> 'status >> action))) >> ;; Send the command. > > Cc'ing the relevant Guile bug: > > https://bugs.gnu.org/48368 Oh nice! (It would have saved me a bit of time to catch up on email beforehand. :-)) > See also commit 79be6a985799adc6d663890250f4fb7c12f015b4 on > 'core-updates' that builds with -O1 as a less satisfactory workaround. I found that =E2=80=98-O2 -Ono-resolve-primitives=E2=80=99 also does the tr= ick. If we manually replace =E2=80=98memq=E2=80=99 by two =E2=80=98eq?=E2=80=99 = tests (which is what the compiler does), the same problem is exhibited: --=-=-= Content-Type: text/x-patch Content-Disposition: inline diff --git a/modules/shepherd/scripts/herd.scm b/modules/shepherd/scripts/herd.scm index 106de1e..513508f 100644 --- a/modules/shepherd/scripts/herd.scm +++ b/modules/shepherd/scripts/herd.scm @@ -127,7 +127,8 @@ the daemon via SOCKET-FILE." (with-system-error-handling (let ((sock (open-connection socket-file)) (action* (if (and (eq? action 'detailed-status) - (memq service '(root shepherd))) + (or (eq? service 'root) + (eq? service 'shepherd))) 'status action))) ;; Send the command. --=-=-= Content-Type: text/plain; charset=utf-8 Content-Transfer-Encoding: quoted-printable =E2=80=98-Ono-resolve-primitives=E2=80=99 also helps in this case. =E2=80=98-Ono-optimize-branch-chains=E2=80=99 has no effect. So, not much progress, but at least we have a workaround. Thanks, Ludo=E2=80=99. --=-=-=--