From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: from mp10.migadu.com ([2001:41d0:2:4a6f::]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits)) by ms5.migadu.com with LMTPS id kEVkDHrsLWM/1AAAbAwnHQ (envelope-from ) for ; Fri, 23 Sep 2022 19:27:22 +0200 Received: from aspmx1.migadu.com ([2001:41d0:2:4a6f::]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits)) by mp10.migadu.com with LMTPS id oIl6C3rsLWOsBgAAG6o9tA (envelope-from ) for ; Fri, 23 Sep 2022 19:27:22 +0200 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 B2A0311FAB for ; Fri, 23 Sep 2022 19:27:21 +0200 (CEST) Received: from localhost ([::1]:33936 helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1obmSN-0005pH-QC for larch@yhetil.org; Fri, 23 Sep 2022 13:27:19 -0400 Received: from eggs.gnu.org ([2001:470:142:3::10]:37304) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1obmRn-0005ow-JL for help-guix@gnu.org; Fri, 23 Sep 2022 13:26:43 -0400 Received: from mail-wr1-x435.google.com ([2a00:1450:4864:20::435]:39675) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_128_GCM_SHA256:128) (Exim 4.90_1) (envelope-from ) id 1obmRl-0005jC-0D for help-guix@gnu.org; Fri, 23 Sep 2022 13:26:43 -0400 Received: by mail-wr1-x435.google.com with SMTP id cc5so1003897wrb.6 for ; Fri, 23 Sep 2022 10:26:38 -0700 (PDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=gmail.com; s=20210112; h=content-transfer-encoding:mime-version:message-id:date:subject:to :from:from:to:cc:subject:date; bh=CMSv4cQ3PudJJgK+8BPGQ2ctxEgf5Mxd4TzvgB/1iJM=; b=gDT1XMsMsKLLizTjQdhqSv5RHisQwrY68tnZWaaKc+yJGHLU7sAPjIdQzbI3WrVYAP AWEDqzbXHJOcxeS3Z56Rshv0fLNTzl0u+X3ypMLKu/OPnVwGSDIEDXrlOPtXqFdoGb7t NSqibXq8Pj43eExzwzBoUSPmuriWVU5PkIDrTyBNErlXj5+JC7pNEqnZCmZq4W/+87WZ JJ37ySCKYrOqzRRxGfIqvFtxeQVv+gAhIhKcFvJAktAlj7s9c02h1Ty8n1l38xMErqBE XjWNgaLv0Koz7bXEHh6hfhhW9BJsQg2x6ryDx2mFf7Aa4cMQDw1631BHeXaFYoN7IOPa H+cQ== X-Google-DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=1e100.net; s=20210112; h=content-transfer-encoding:mime-version:message-id:date:subject:to :from:x-gm-message-state:from:to:cc:subject:date; bh=CMSv4cQ3PudJJgK+8BPGQ2ctxEgf5Mxd4TzvgB/1iJM=; b=6qFJX6xcQpM5o3zARM8EcOACHjgpHCjYIYjF8avKgLZR05A/3mmO9uvuE52Nsm4nwK CUNsoH0d2ZwHuUM9IV+MbNUG9SAX2qMUBFieWgbxB11QVXRGQ8PPhBpNjXL3fU18OywO IjW8aZI3/y9qABYr8rMbOXoZvVQ7RDpAzo4UiL1gVtv8mMJVPgqEzBcR/f/Tf94kJlm5 CWyoIknq9mEQi7roSxy5H/mLNpHpLTixFQBSsi5hOez8kHNKjNjo5vqYcVglk+uoVR5H 4ZjB4uOg6RyRbIDv94mdTNjTnJPTUCAYysphF5GvDHT8K3c3GNspP4r8vZFscY0ULIx0 LpKg== X-Gm-Message-State: ACrzQf2m02XqMXWO8YWBXHBFqNNZxscmkKnOUNTEViuabZKCJRjTfWD9 TZGqGM6JpB4zgu5XY3hU4PdX27dqvzg= X-Google-Smtp-Source: AMsMyM7to8eV8b2ak6NUEjx57lYsXYOuvW54lUagwzfdvhrgYe5GN1qFsZEPjL1YGaySt11dgOq/Gw== X-Received: by 2002:a05:6000:188c:b0:22b:5c7:a21c with SMTP id a12-20020a056000188c00b0022b05c7a21cmr5885210wri.59.1663953997756; Fri, 23 Sep 2022 10:26:37 -0700 (PDT) Received: from pfiuh07 ([193.48.40.241]) by smtp.gmail.com with ESMTPSA id f11-20020a5d664b000000b0022af63bb6f2sm7663206wrw.113.2022.09.23.10.26.36 for (version=TLS1_3 cipher=TLS_AES_256_GCM_SHA384 bits=256/256); Fri, 23 Sep 2022 10:26:37 -0700 (PDT) From: zimoun To: help-guix Subject: how to fix this G-exp? Date: Fri, 23 Sep 2022 19:26:20 +0200 Message-ID: <87czbm2e9v.fsf@gmail.com> MIME-Version: 1.0 Content-Type: text/plain; charset=utf-8 Content-Transfer-Encoding: quoted-printable Received-SPF: pass client-ip=2a00:1450:4864:20::435; envelope-from=zimon.toutoune@gmail.com; helo=mail-wr1-x435.google.com X-Spam_score_int: -20 X-Spam_score: -2.1 X-Spam_bar: -- X-Spam_report: (-2.1 / 5.0 requ) BAYES_00=-1.9, DKIM_SIGNED=0.1, DKIM_VALID=-0.1, DKIM_VALID_AU=-0.1, DKIM_VALID_EF=-0.1, FREEMAIL_FROM=0.001, RCVD_IN_DNSWL_NONE=-0.0001, SPF_HELO_NONE=0.001, SPF_PASS=-0.001 autolearn=ham autolearn_force=no X-Spam_action: no action X-BeenThere: help-guix@gnu.org X-Mailman-Version: 2.1.29 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: help-guix-bounces+larch=yhetil.org@gnu.org Sender: "Help-Guix" X-Migadu-Flow: FLOW_IN X-Migadu-To: larch@yhetil.org X-Migadu-Country: US ARC-Message-Signature: i=1; a=rsa-sha256; c=relaxed/relaxed; d=yhetil.org; s=key1; t=1663954041; h=from:from:sender:sender:reply-to:subject:subject:date:date: message-id:message-id:to:to:cc:mime-version:mime-version: content-type:content-type: content-transfer-encoding:content-transfer-encoding:list-id:list-help: list-unsubscribe:list-subscribe:list-post:dkim-signature; bh=CMSv4cQ3PudJJgK+8BPGQ2ctxEgf5Mxd4TzvgB/1iJM=; b=sWX1CqoOkLWJmR/Ri+LiPxACDQyhug5UBsZmZWKaBiFxr12XGbjF/HGZz8c5eJCfcybmnO AT7HOB4TJmfBtAthn3PsmxmQCN0DQpLJrVfOKboZnG8vlCxwm1oCbI0lm5AINam9Lm2ynK NldQQzfvsVATwQQeJGoW/tE0zmEfGiprkSFrWJ+HWhzGF6Zgrr+Ol37RmAKUMTDQyDVJTP DulXXzVwTQsm+C35DB+Jn0qswE7vzHFx92mrJMHUru9ILAVI7in0MTquPQSiA950qd05S1 R2K60PQy/tfIeEkWu5xTSCNAhWeH9fi8kvtOlgHEH66N1iC0Jk3SMgFbnxY+JA== ARC-Seal: i=1; s=key1; d=yhetil.org; t=1663954041; a=rsa-sha256; cv=none; b=uKQKNNdlhbymAkdTj1ydcblypvr5BKc4zAtUJkS5vOD1BFkBH3qBdDraTwUpjxHC3u5Z7t 5R+RibIgxcX6k1L4xRFaSWTciQx8/Hu8QodFCDUAS61rPDeJdzBMWb7CfwoDwT9PxQ9boA qFfeKEGAvjzvL2yESPJyxnqogwah9DNT4BNxAcd/JtKwUSWpr0ILTQfV2DBuAWggBRx7pS vyJ6NPcjsVAo5NbSjA6ezWI4qrL0o4kyfZnsviY6ammEJkJuA3PW90bYe3Xs9kDkQfL0hG 2pMZ4P709Hu6zOOIba5DExpLhRQr8hIWU+kRo5E4FhlbyEzwp4XK3jtU3OSknw== ARC-Authentication-Results: i=1; aspmx1.migadu.com; dkim=pass header.d=gmail.com header.s=20210112 header.b=gDT1XMsM; dmarc=pass (policy=none) header.from=gmail.com; spf=pass (aspmx1.migadu.com: domain of "help-guix-bounces+larch=yhetil.org@gnu.org" designates 209.51.188.17 as permitted sender) smtp.mailfrom="help-guix-bounces+larch=yhetil.org@gnu.org" X-Migadu-Spam-Score: -4.65 Authentication-Results: aspmx1.migadu.com; dkim=pass header.d=gmail.com header.s=20210112 header.b=gDT1XMsM; dmarc=pass (policy=none) header.from=gmail.com; spf=pass (aspmx1.migadu.com: domain of "help-guix-bounces+larch=yhetil.org@gnu.org" designates 209.51.188.17 as permitted sender) smtp.mailfrom="help-guix-bounces+larch=yhetil.org@gnu.org" X-Migadu-Queue-Id: B2A0311FAB X-Spam-Score: -4.65 X-Migadu-Scanner: scn0.migadu.com X-TUID: 8tyPcE8Lq03+ Hi, I am missing something and I do not find my way, so maybe someone could explain me what I am doing wrong. Let start with this example. --8<---------------cut here---------------start------------->8--- (use-modules (srfi srfi-1) (ice-9 match) (guix packages) (gnu packages)) (define (package+propagated-inputs package) (match (package-transitive-propagated-inputs package) (((labels packages) ...) (cons package packages)))) (define (something) 42) (define (an-example) (define build (with-extensions (package+propagated-inputs (specification->package "guile-json")) (with-imported-modules '((guix build utils) (json)) #~(begin (use-modules (guix build utils) (json)) (define that #+(something)) (define file-name (string-append #$output "/example.json")) (mkdir-p (dirname file-name)) (with-output-to-file file-name (lambda () (scm->json that))) )))) (computed-file "example-json" build)) (manifest (list (manifest-entry (name "bang") (version "0") (item (an-example))))) --8<---------------cut here---------------end--------------->8--- Then guix build -m /tmp/example.scm produces something cat /gnu/store/zsqg38qkwhjbhfl4hkhsb4288rbnxxic-example-json/example.js= on 42 Let remove the scm->json part and focus on what I do not understand: =E2=80=99something=E2=80=99. For instance, if instead something returns a list, --8<---------------cut here---------------start------------->8--- --- /tmp/example.scm 2022-09-23 19:11:34.769456052 +0200 +++ /tmp/example-fail.scm 2022-09-23 19:16:30.018780090 +0200 @@ -10,7 +10,7 @@ =20 =20 (define (something) - 42) + (list 42)) =20 =20 (define (an-example) @@ -32,9 +32,6 @@ =20 (mkdir-p (dirname file-name)) =20 - (with-output-to-file file-name - (lambda () - (scm->json that))) =20 )))) --8<---------------cut here---------------end--------------->8--- then I get this error, --8<---------------cut here---------------start------------->8--- Backtrace: 3 (primitive-load "/gnu/store/vd87i0gf8f48kvcwm2c4796cmsn?") In ice-9/eval.scm: 619:8 2 (_ #f) 626:19 1 (_ #) Exception thrown while printing backtrace: In procedure frame-local-ref: Argument 2 out of range: 1 ice-9/eval.scm:626:19: Wrong type to apply: 42 --8<---------------cut here---------------end--------------->8--- hum, maybe it is because a slice or something. Let replace #+ by #+@ abd the backtrace is fixed. Then, let add an item to the list, --8<---------------cut here---------------start------------->8--- (define (something) - 42) + (list 42 43)) (define that - #+(something)) + #+@(something)) --8<---------------cut here---------------end--------------->8--- then bang --8<---------------cut here---------------start------------->8--- ice-9/psyntax.scm:2794:12: In procedure syntax-violation: Syntax error: /gnu/store/zwizrn4xacyn2ynpnb5i2wgqvjj15rwa-example-json-builder:1:47: sour= ce expression failed to match any pattern in form (define that 42 43) --8<---------------cut here---------------end--------------->8--- I would like that my procedure =E2=80=99something=E2=80=99 returns a list, = so I would like that =E2=80=99that=E2=80=99 would also be a list. Because I would lik= e to feed scm->json with a list. I have tried various things (list of list, slice or not, etc.) and I am missing a point for understanding. Could someone explain me? Thanks in advance. Cheers, simon