From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: from mp2 ([2001:41d0:2:4a6f::]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits)) by ms11 with LMTPS id WEazHP2rV19LYQAA0tVLHw (envelope-from ) for ; Tue, 08 Sep 2020 16:06:21 +0000 Received: from aspmx1.migadu.com ([2001:41d0:2:4a6f::]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits)) by mp2 with LMTPS id 2LeEGP2rV1+OQwAAB5/wlQ (envelope-from ) for ; Tue, 08 Sep 2020 16:06:21 +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 3CD11940876 for ; Tue, 8 Sep 2020 16:06:20 +0000 (UTC) Received: from localhost ([::1]:43374 helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1kFg8R-0005V8-0K for larch@yhetil.org; Tue, 08 Sep 2020 12:06:19 -0400 Received: from eggs.gnu.org ([2001:470:142:3::10]:36800) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1kFg3L-00049O-Ji for guix-patches@gnu.org; Tue, 08 Sep 2020 12:01:03 -0400 Received: from debbugs.gnu.org ([209.51.188.43]:44598) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_128_GCM_SHA256:128) (Exim 4.90_1) (envelope-from ) id 1kFg3L-0004dc-7M for guix-patches@gnu.org; Tue, 08 Sep 2020 12:01:03 -0400 Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1kFg3L-0005Sg-69 for guix-patches@gnu.org; Tue, 08 Sep 2020 12:01:03 -0400 X-Loop: help-debbugs@gnu.org Subject: [bug#43183] [PATCH v3 3/4] gnu: Add guile-laesare. Resent-From: Martin Becze Original-Sender: "Debbugs-submit" Resent-CC: guix-patches@gnu.org Resent-Date: Tue, 08 Sep 2020 16:01:03 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 43183 X-GNU-PR-Package: guix-patches X-GNU-PR-Keywords: patch To: 43183@debbugs.gnu.org Cc: Martin Becze Received: via spool by 43183-submit@debbugs.gnu.org id=B43183.159958083819477 (code B ref 43183); Tue, 08 Sep 2020 16:01:03 +0000 Received: (at 43183) by debbugs.gnu.org; 8 Sep 2020 16:00:38 +0000 Received: from localhost ([127.0.0.1]:56139 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1kFg2s-0004za-NT for submit@debbugs.gnu.org; Tue, 08 Sep 2020 12:00:38 -0400 Received: from mx1.riseup.net ([198.252.153.129]:43450) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1kFg2m-0004sL-JT for 43183@debbugs.gnu.org; Tue, 08 Sep 2020 12:00:28 -0400 Received: from capuchin.riseup.net (capuchin-pn.riseup.net [10.0.1.176]) (using TLSv1 with cipher ECDHE-RSA-AES256-SHA (256/256 bits)) (Client CN "*.riseup.net", Issuer "Sectigo RSA Domain Validation Secure Server CA" (not verified)) by mx1.riseup.net (Postfix) with ESMTPS id 4Bm8xP4srkzFpT6 for <43183@debbugs.gnu.org>; Tue, 8 Sep 2020 09:00:09 -0700 (PDT) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/simple; d=riseup.net; s=squak; t=1599580828; bh=YerIjUHiFK+YtGYPa/8ttZrYf6mmvsgZZCJyOdj8ik0=; h=From:To:Cc:Subject:Date:In-Reply-To:References:From; b=im1F5daNOG1onaVXEZUE63MVyJCiRaNrNAPZWjP98Ibv52Mxj9UWTrxcjfe3Wjkqz /ckFTuo6YR1M+7075CO6Q3LTy3wg2oKO9m2VEozOcRXg/Hfx1J4xQxm6ro7+sv0nx8 wcmKOjSBaQQ8VHMFrd4sNOqRCD9f0OailYDZN7yM= X-Riseup-User-ID: 112FE1B8DB7C6EAB80CEAECE4C124A10890D8DBE3EC39D0024D545F1EF92CAFC Received: from [127.0.0.1] (localhost [127.0.0.1]) by capuchin.riseup.net (Postfix) with ESMTPSA id 4Bm8xP0FYgz8ty4; Tue, 8 Sep 2020 09:00:08 -0700 (PDT) From: Martin Becze Date: Tue, 8 Sep 2020 10:59:45 -0500 Message-Id: <20200908155946.2322-4-mjbecze@riseup.net> In-Reply-To: <20200908155946.2322-1-mjbecze@riseup.net> References: <20200903150243.27796-1-mjbecze@riseup.net> <20200908155946.2322-1-mjbecze@riseup.net> MIME-Version: 1.0 Content-Transfer-Encoding: 8bit X-Spam-Score: -0.7 (/) X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list X-Spam-Score: -1.7 (-) X-BeenThere: guix-patches@gnu.org List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: guix-patches-bounces+larch=yhetil.org@gnu.org Sender: "Guix-patches" X-Scanner: scn0 Authentication-Results: aspmx1.migadu.com; dkim=fail (rsa verify failed) header.d=riseup.net header.s=squak header.b=im1F5daN; dmarc=fail reason="SPF not aligned (relaxed)" header.from=riseup.net (policy=none); spf=pass (aspmx1.migadu.com: domain of guix-patches-bounces@gnu.org designates 209.51.188.17 as permitted sender) smtp.mailfrom=guix-patches-bounces@gnu.org X-Spam-Score: 5.09 X-TUID: dZTeckxTLGFz * gnu/packages/guile-xyz.scm (guile-laesare): New variable. --- gnu/packages/guile-xyz.scm | 46 ++++++++++++++++++++++++++++++++++++++ 1 file changed, 46 insertions(+) diff --git a/gnu/packages/guile-xyz.scm b/gnu/packages/guile-xyz.scm index 7c8a417a14..bba60361d0 100644 --- a/gnu/packages/guile-xyz.scm +++ b/gnu/packages/guile-xyz.scm @@ -3959,3 +3959,49 @@ code and object formats; for all architectures. Here you'll find libraries for working with binary code: assembly, disassembly, instruction tables, object formats and related areas.") (license license:expat))) + +(define-public guile-laesare + (package + (name "guile-laesare") + (version "1.0.0") + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/weinholt/laesare.git") + (commit (string-append "v" version)))) + (file-name (git-file-name name version)) + (sha256 + (base32 "15q619gzw717r8r1ql23zfdaibpnp9qqs96032vdc3rj74msxc92")))) + (build-system guile-build-system) + (arguments + `(#:compile-flags '("--r6rs" "-Wunbound-variable" "-Warity-mismatch") + #:modules ((guix build guile-build-system) + (guix build utils) + (srfi srfi-26) + (ice-9 ftw)) + #:phases (modify-phases %standard-phases + (add-before 'build 'move-sls-files + (lambda _ + ;; Move files under a laesare directory to reflect + ;; the module hierarchy. + (define dst-folder "laesare") + (define (target file) + (string-append dst-folder "/" file)) + (define files + (scandir "." (negate (cut member <> '("." ".."))))) + (mkdir dst-folder) + (for-each (lambda (file) + (rename-file file (target file))) + files) + #t))))) + (native-inputs + `(("guile" ,guile-3.0))) + (home-page "https://github.com/weinholt/laesare") + (synopsis "R6RS Scheme library that provides a reader") + (description + "This is an R6RS Scheme library that provides a reader with some extra +features not found in the standard read procedure such as a compatible mode +with support for other RnRS standards and a tolerant mode that continues on +errors.") + (license license:expat))) -- 2.28.0