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 UCuOMqvMgmJQIgAAbAwnHQ (envelope-from ) for ; Tue, 17 May 2022 00:14:03 +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 oNaYMavMgmJOTQAAG6o9tA (envelope-from ) for ; Tue, 17 May 2022 00:14:03 +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 3D1F2CA9B for ; Tue, 17 May 2022 00:14:03 +0200 (CEST) Received: from localhost ([::1]:39358 helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1nqiyX-0007cd-MJ for larch@yhetil.org; Mon, 16 May 2022 18:14:01 -0400 Received: from eggs.gnu.org ([2001:470:142:3::10]:33578) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1nqhtm-0003bk-VZ for bug-guix@gnu.org; Mon, 16 May 2022 17:05:03 -0400 Received: from debbugs.gnu.org ([209.51.188.43]:33017) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_128_GCM_SHA256:128) (Exim 4.90_1) (envelope-from ) id 1nqhtm-00008w-Ao for bug-guix@gnu.org; Mon, 16 May 2022 17:05:02 -0400 Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1nqhtm-0005WQ-6Q for bug-guix@gnu.org; Mon, 16 May 2022 17:05:02 -0400 X-Loop: help-debbugs@gnu.org Subject: bug#55464: (current-filename) is #f when guix pull'ing Resent-From: Attila Lendvai Original-Sender: "Debbugs-submit" Resent-CC: bug-guix@gnu.org Resent-Date: Mon, 16 May 2022 21:05:01 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: report 55464 X-GNU-PR-Package: guix X-GNU-PR-Keywords: To: 55464@debbugs.gnu.org X-Debbugs-Original-To: "bug-guix@gnu.org" Received: via spool by submit@debbugs.gnu.org id=B.165273507421187 (code B ref -1); Mon, 16 May 2022 21:05:01 +0000 Received: (at submit) by debbugs.gnu.org; 16 May 2022 21:04:34 +0000 Received: from localhost ([127.0.0.1]:55147 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1nqhtB-0005VX-Iu for submit@debbugs.gnu.org; Mon, 16 May 2022 17:04:34 -0400 Received: from lists.gnu.org ([209.51.188.17]:32996) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1nqht9-0005VO-Cj for submit@debbugs.gnu.org; Mon, 16 May 2022 17:04:23 -0400 Received: from eggs.gnu.org ([2001:470:142:3::10]:33520) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1nqht9-0002dZ-7Y for bug-guix@gnu.org; Mon, 16 May 2022 17:04:23 -0400 Received: from mail-4317.proton.ch ([185.70.43.17]:47201) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1nqht5-0008WS-Or for bug-guix@gnu.org; Mon, 16 May 2022 17:04:22 -0400 Date: Mon, 16 May 2022 21:04:10 +0000 DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=lendvai.name; s=protonmail3; t=1652735054; bh=8vcFFcQ/lKaU42XEgyH5HPNb19AU9KZwusObGmSju/I=; h=Date:To:From:Reply-To:Subject:Message-ID:Feedback-ID:From:To:Cc: Date:Subject:Reply-To:Feedback-ID:Message-ID; b=amyUJtDKJsTWPyxrZZx82jdSk6L+/OlGOY9pAmegCk1iIf2oFk9Rbn+D17Z/JZWNJ ws6pPJ+Vl+uoWxLKN5jzBWZY0PWcTKnFJbkV0o2WEbs/T0pesETcpK1tmZWNWyx4WI ue1f3qDOjs5/dIhCAHbmQd92Afys0+G1H5v9JV54aFgBJUvAxsefvw1NqX7hIbGU+u Nh1XeyKQm9iER8corR5yiTPu7EgIzgm6MW/TwAzqnoTQ1kVG5Humuz5/daY22GOuDP 4cLjf1HX8xyPwBMVFr7ecrgYBEehBZ5tsuDgkF/BKPD5SC8bVKENHRmJBmrH+GDuCJ F7le/vVxiofzw== From: Attila Lendvai Message-ID: <625DOHHScuzJjNNfdQOqaLqGWVTmXC-S9PcF2xU3nzsFYG4XYTSEt0NGXDSXnBqVHqYqr6AsEbTysg7y_fxoqeBkbEtCqMZrx9muo3DlvS0=@lendvai.name> Feedback-ID: 28384833:user:proton MIME-Version: 1.0 Content-Type: text/plain; charset=utf-8 Content-Transfer-Encoding: quoted-printable Received-SPF: pass client-ip=185.70.43.17; envelope-from=attila@lendvai.name; helo=mail-4317.proton.ch 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, SPF_HELO_NONE=0.001, SPF_PASS=-0.001, T_SCC_BODY_TEXT_LINE=-0.01 autolearn=ham autolearn_force=no X-Spam_action: no action 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: , Reply-To: Attila Lendvai Errors-To: bug-guix-bounces+larch=yhetil.org@gnu.org Sender: "bug-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=1652739243; h=from:from:sender:sender:reply-to: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:resent-cc: resent-from:resent-sender:resent-message-id:list-id:list-help: list-unsubscribe:list-subscribe:list-post:dkim-signature; bh=8vcFFcQ/lKaU42XEgyH5HPNb19AU9KZwusObGmSju/I=; b=p6dWXcSBVFPSWBJNvBDOL1uA3uc3ahhVdTUXjg0jg15jHgf8CzVulaODl8crW1y7RVPXT0 bjDsK8LxR2j38ryZcb7CZQPWIN98BaWIx2BdM+nDLEsY6Oks+JuYGT8GlYEYx1zvDipgkr a6TeQI4f/JuhvWNL4mk6Xbj1hqnyeXA37lYFjd4iZfazMlo+Au46Z/fIS6WClz/BnwklNH e2Ece36jsoANgZiUU5OdryNfpee4TrHSnEEj9N+oHfzKa60oiu8ERI4szVvpm9PbdxGErQ dEnRYJybeowHtUC+SUyaz+wUvZ47x5j7n5EWxQPLMysjJ89JS67b8NGaB64FxA== ARC-Seal: i=1; s=key1; d=yhetil.org; t=1652739243; a=rsa-sha256; cv=none; b=e4c+bSxokBYzrxybWTp35Hh+QpbyFq0NqHG7Q3hwW6wMXOe3xaFd1GQgjaRQzAraEP0qbi kvK8+c7qGMUBxX7UjFz13bQTIrBiwjtryimEForqehgWQkEHNH9Psd42+aGAG+juU1mu8F qG/qoFGYlzDQ3LHa6rkuHnQAIoGnB1I27cz95auViBKorGq4DLO9060+un6HdlC7YqV0aC yF4nGztuCr3Y2USQZLVnZrULK3Ko2H4hOkQpVmnAUsasVMonG5ujHYUFJbjVyCpsalaaWk 4MPeeW8n44+3k5A/puoImgKfV/QUMUPuizf5RKbDaOvkDwCeCluixQjTqn3jXA== ARC-Authentication-Results: i=1; aspmx1.migadu.com; dkim=fail ("headers rsa verify failed") header.d=lendvai.name header.s=protonmail3 header.b=amyUJtDK; dmarc=none; spf=pass (aspmx1.migadu.com: domain of "bug-guix-bounces+larch=yhetil.org@gnu.org" designates 209.51.188.17 as permitted sender) smtp.mailfrom="bug-guix-bounces+larch=yhetil.org@gnu.org" X-Migadu-Spam-Score: 0.77 Authentication-Results: aspmx1.migadu.com; dkim=fail ("headers rsa verify failed") header.d=lendvai.name header.s=protonmail3 header.b=amyUJtDK; dmarc=none; spf=pass (aspmx1.migadu.com: domain of "bug-guix-bounces+larch=yhetil.org@gnu.org" designates 209.51.188.17 as permitted sender) smtp.mailfrom="bug-guix-bounces+larch=yhetil.org@gnu.org" X-Migadu-Queue-Id: 3D1F2CA9B X-Spam-Score: 0.77 X-Migadu-Scanner: scn0.migadu.com X-TUID: W8lj+vjMetLt the actual context where i'm encountering this is a package definition wher= e i want to load some hashes from a file relative the to the .scm file: (define-public foo (let ((hashes (with-input-from-file (string-append (dirname (current-filename)) "/foo.hashes") read))) (package ...))) this works fine in a `./pre-inst-env build foo`, but i think there's someth= ing special in how `guix pull` compiles the scm files, and (c-f) expands to= #f. guix pull works, but afterwards: $ guix system --on-error=3Dbacktrace reconfigure --allow-downgrades /etc/gu= ix/config.scm guix system: error: failed to load '/etc/guix/config.scm': guix-crypto/packages/ethereum.scm:47:36: In procedure scm_to_utf8_stringn: = Wrong type argument in position 1 (expecting string): #f In ice-9/boot-9.scm: 222:29 19 (map1 (((gnu)) ((gnu system)) ((gnu system #)) ((# =E2=80= =A6)) =E2=80=A6)) 222:29 18 (map1 (((gnu system)) ((gnu system file-systems)) (#) = =E2=80=A6)) 222:29 17 (map1 (((gnu system file-systems)) ((oop goops)) ((=E2=80= =A6)) =E2=80=A6)) 222:29 16 (map1 (((oop goops)) ((shepherd service)) ((nongnu =E2=80= =A6)) =E2=80=A6)) 222:29 15 (map1 (((shepherd service)) ((nongnu packages linux)) = =E2=80=A6)) 222:29 14 (map1 (((nongnu packages linux)) ((guix-crypto # #)) # = =E2=80=A6)) 222:17 13 (map1 (((guix-crypto packages ethereum)) ((# # #)) (#) = =E2=80=A6)) 3936:31 12 (_ ((guix-crypto packages ethereum))) 3327:17 11 (resolve-interface (guix-crypto packages ethereum) # _ # = =E2=80=A6) In ice-9/threads.scm: 390:8 10 (_ _) In ice-9/boot-9.scm: 3253:13 9 (_) In ice-9/threads.scm: 390:8 8 (_ _) In ice-9/boot-9.scm: 3544:20 7 (_) 2836:4 6 (save-module-excursion #) 3564:26 5 (_) In unknown file: 4 (primitive-load-path "guix-crypto/packages/ethereum" #<= =E2=80=A6>) In guix-crypto/packages/ethereum.scm: 47:36 3 (_) In unknown file: 2 (dirname #f) In ice-9/boot-9.scm: 1685:16 1 (raise-exception _ #:continuable? _) 1780:13 0 (_ #<&compound-exception components: (#<&assertion-fail= =E2=80=A6>) i would be happy to avoid using (c-f), but i failed to find a way in Guile'= s module reflection API. -- =E2=80=A2 attila lendvai =E2=80=A2 PGP: 963F 5D5F 45C7 DFCD 0A39 -- =E2=80=9CPeople who have never gone to school have never developed negative= attitudes toward exploring their world.=E2=80=9D =09=E2=80=94 Grace Llewellyn