From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: from mp1.migadu.com ([2001:41d0:1008:1e59::1]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits)) by ms1.migadu.com with LMTPS id mHX4F73dXmZgxgAAA41jLg (envelope-from ) for ; Tue, 04 Jun 2024 11:26:21 +0200 Received: from aspmx1.migadu.com ([2001:41d0:303:e224::]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits)) by mp1.migadu.com with LMTPS id wPymFL3dXmbQMAAA62LTzQ (envelope-from ) for ; Tue, 04 Jun 2024 11:26:21 +0200 X-Envelope-To: larch@yhetil.org Authentication-Results: aspmx1.migadu.com; dkim=fail ("headers rsa verify failed") header.d=tailcall.au header.s=x header.b="P aNBddx"; dmarc=pass (policy=none) header.from=gnu.org; spf=pass (aspmx1.migadu.com: domain of "guix-patches-bounces+larch=yhetil.org@gnu.org" designates 209.51.188.17 as permitted sender) smtp.mailfrom="guix-patches-bounces+larch=yhetil.org@gnu.org" ARC-Seal: i=1; s=key1; d=yhetil.org; t=1717493181; a=rsa-sha256; cv=none; b=nlW7+qMLgB19n27GBz7okMMkZ9KGpX5IMK0qsZNdle3M8WMQq4D/kgc5rGifYE9Igrr8QL UlbR/HxAIc3JT6VMHFXz/C18SUfbLtV5eCq11NJqpZRc/Iho6MQ3MaG49zETudTFOlyNNQ /8AeXIqiLijwE8Sj1CKKSlx6qjLWzWotwediSn8e9wO/nnHa+SFqBSnjrMOnd6H9nclrQ4 XAgnlya7pFERn+oPxRfnv9LJIY7HbmfVz4ZIHKPGW67nIndBxFMGTuHOtTQ2zBHzuoPMqg NqoSr/eVE+V+Zoc8ZREJWd2DQBzAeXsVGCRI8AvbD1gl1GLu+wg4+q0DTzqkLg== ARC-Authentication-Results: i=1; aspmx1.migadu.com; dkim=fail ("headers rsa verify failed") header.d=tailcall.au header.s=x header.b="P aNBddx"; dmarc=pass (policy=none) header.from=gnu.org; spf=pass (aspmx1.migadu.com: domain of "guix-patches-bounces+larch=yhetil.org@gnu.org" designates 209.51.188.17 as permitted sender) smtp.mailfrom="guix-patches-bounces+larch=yhetil.org@gnu.org" ARC-Message-Signature: i=1; a=rsa-sha256; c=relaxed/relaxed; d=yhetil.org; s=key1; t=1717493181; h=from:from:sender:sender:reply-to:reply-to:subject:subject:date:date: message-id:message-id:to:to:cc: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=7Tx0Woz/AdS/thn+fpCeMFGhARQ0REFiQcu8h6e261E=; b=bQPWNsKNj+vdEEgpUpOw8xFmXkUOl/CuhamxuAUfu7lJURPLq7Q9u+zJS/Z5aby2E7f9zd xW+pEKD+6DXuT7sY2M47Pxtv8uq4sMy72gnspEJU4/7MkFJuVp5DkuCqDJHnhiZDGs5Bxi Hr16sCiAojckWTPHn7E9sQ2MzbbLGmt9FuUFK7OENP/fRAgd/z1duZNYgN2dO9AWoWI00v KacXj6efMzFu4cy0sPoFVwsJ0v+jPtiD7I2My8b/3Vb6k1DuvZQYuEmsk9QXEF1M4Beb6O KJ/Yh2mOasO2G+Qu0pwI6g0xJ4guz7Q07t3fGfhyYgoyeoUNCWk5/YwntFX4IA== 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 2365D606EB for ; Tue, 4 Jun 2024 11:26:21 +0200 (CEST) Received: from localhost ([::1] helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1sEQQV-0000XV-4R; Tue, 04 Jun 2024 05:25:55 -0400 Received: from eggs.gnu.org ([2001:470:142:3::10]) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1sEQQP-0000W2-GU for guix-patches@gnu.org; Tue, 04 Jun 2024 05:25:49 -0400 Received: from debbugs.gnu.org ([2001:470:142:5::43]) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_128_GCM_SHA256:128) (Exim 4.90_1) (envelope-from ) id 1sEQQP-0006FD-8o for guix-patches@gnu.org; Tue, 04 Jun 2024 05:25:49 -0400 Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1sEQQc-0004q9-6w for guix-patches@gnu.org; Tue, 04 Jun 2024 05:26:02 -0400 X-Loop: help-debbugs@gnu.org Subject: [bug#71359] [PATCH] gnu: Add unsyntax. Resent-From: Andrew Whatson Original-Sender: "Debbugs-submit" Resent-CC: guix-patches@gnu.org Resent-Date: Tue, 04 Jun 2024 09:26:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: report 71359 X-GNU-PR-Package: guix-patches X-GNU-PR-Keywords: patch To: 71359@debbugs.gnu.org Cc: Andrew Whatson X-Debbugs-Original-To: guix-patches@gnu.org Received: via spool by submit@debbugs.gnu.org id=B.171749312118483 (code B ref -1); Tue, 04 Jun 2024 09:26:02 +0000 Received: (at submit) by debbugs.gnu.org; 4 Jun 2024 09:25:21 +0000 Received: from localhost ([127.0.0.1]:60137 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1sEQPv-0004o0-Qi for submit@debbugs.gnu.org; Tue, 04 Jun 2024 05:25:21 -0400 Received: from lists.gnu.org ([209.51.188.17]:37898) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1sEQPY-0004mc-Pw for submit@debbugs.gnu.org; Tue, 04 Jun 2024 05:25:04 -0400 Received: from eggs.gnu.org ([2001:470:142:3::10]) by lists.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1sEQPL-0000JO-0N for guix-patches@gnu.org; Tue, 04 Jun 2024 05:24:43 -0400 Received: from warrnambool.hosting-cloud.net ([103.146.113.26]) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1sEQPG-0005uK-DI for guix-patches@gnu.org; Tue, 04 Jun 2024 05:24:42 -0400 X-Mailborder-Info: host=console.hosting-cloud.net, gmt_time=1717493059, scan_time=4.32s X-Mailborder-Spam-Score: 0.0 X-Mailborder-Spam-Report: ALL_TRUSTED, BAYES_00, MC_BLOCK_XYZ_IN_BODY, DKIM_SIGNED, DKIM_VALID, DKIM_VALID_EF, DKIM_VALID_AU, T_SCC_BODY_TEXT_LINE, X-Sender-id: user_650765867 X-Sender-id: user_650765867 Received: from cp61.hosting-cloud.net (cp61.hosting-cloud.net [103.119.110.239]) (Authenticated sender: user_650765867) by smtp.hosting-cloud.net (Postfix) with ESMTPSA id 627B07CC07 for ; Tue, 4 Jun 2024 19:24:09 +1000 (AEST) DKIM-Filter: OpenDKIM Filter v2.11.0 smtp.hosting-cloud.net 627B07CC07 DKIM-Signature: v=1; a=rsa-sha256; q=dns/txt; c=relaxed/relaxed; d=tailcall.au ; s=x; h=Content-Transfer-Encoding:Content-Type:MIME-Version:Message-ID:Date: Subject:Cc:To:From:Sender:Reply-To:Content-ID:Content-Description:Resent-Date :Resent-From:Resent-Sender:Resent-To:Resent-Cc:Resent-Message-ID:In-Reply-To: References:List-Id:List-Help:List-Unsubscribe:List-Subscribe:List-Post: List-Owner:List-Archive; bh=7Tx0Woz/AdS/thn+fpCeMFGhARQ0REFiQcu8h6e261E=; b=P aNBddxyH+MhxRt9kXJSTP54FaqMAjBmcN0DI5e0UNyZjd6ovG3gKwUKaO2gFlvJvqOSvYL6z3HjQ1 pB4ujp18Pl60Ywi8fvA/G5TFk43Xoslvt9iC9yYXoCWRtNfKNsmKgQye4l0ju7JR75mBCRenQA7up rCzgUlE8U6RUIvtmJ/L0GWeTZpcDDLETTV30zgHzSaz9GbghhmrsnoRPODM0V97zbcExXKNFNqcRc vvxQUM9e7k+SU7QZQZSSDP6IQ+q1WUlU6Yf/h88dXiJd9mAF75dQ/aQGTdGnFBTJNVGK8gEmmnR1v 8O2Fnr2tlz0eYBEiOq06d1wqppMgs6P0w==; X-HostingCloud-MailScanner-From: whatson@tailcall.au X-HostingCloud-MailScanner-SpamCheck: not spam, SpamAssassin (not cached, score=-2.909, required 4, autolearn=not spam, ALL_TRUSTED -1.00, BAYES_00 -1.90, TVD_RCVD_IP 0.00, T_SCC_BODY_TEXT_LINE -0.01) X-HostingCloud-MailScanner: Found to be clean X-HostingCloud-MailScanner-ID: 1sEQOg-00H2gH-0A X-HostingCloud-MailScanner-Information: Please contact the ISP for more information Received: from 220-244-65-12.tpgi.com.au ([220.244.65.12] helo=fumo.fritz.box) by cp61.hosting-cloud.net with esmtpsa (TLS1.3) tls TLS_AES_256_GCM_SHA384 (Exim 4.96) (envelope-from ) id 1sEQOg-00H2gH-0A; Tue, 04 Jun 2024 19:24:01 +1000 Date: Tue, 4 Jun 2024 19:22:52 +1000 Message-ID: <6faff8d80d23b950be727e9ca2ea7560ab28b9ed.1717492971.git.whatson@tailcall.au> X-Mailer: git-send-email 2.45.1 MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit X-Authenticated-Id: whatson@tailcall.au Received-SPF: pass client-ip=103.146.113.26; envelope-from=whatson@tailcall.au; helo=warrnambool.hosting-cloud.net 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_PASS=-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: guix-patches@gnu.org List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Reply-to: Andrew Whatson X-ACL-Warn: , Andrew Whatson via Guix-patches From: Andrew Whatson via Guix-patches via Errors-To: guix-patches-bounces+larch=yhetil.org@gnu.org Sender: guix-patches-bounces+larch=yhetil.org@gnu.org X-Migadu-Country: US X-Migadu-Flow: FLOW_IN X-Migadu-Queue-Id: 2365D606EB X-Migadu-Scanner: mx12.migadu.com X-Migadu-Spam-Score: -7.04 X-Spam-Score: -7.04 X-TUID: tnVihL7p5N1X * gnu/packages/scheme.scm (unsyntax): New variable. Change-Id: If00a41e98d2a261af063cecd61e21a7bbc3f91ee --- gnu/packages/scheme.scm | 59 ++++++++++++++++++++++++++++++++++++++++- 1 file changed, 58 insertions(+), 1 deletion(-) diff --git a/gnu/packages/scheme.scm b/gnu/packages/scheme.scm index 47754800f9..419467fdf0 100644 --- a/gnu/packages/scheme.scm +++ b/gnu/packages/scheme.scm @@ -20,7 +20,7 @@ ;;; Copyright © 2022 Morgan Smith ;;; Copyright © 2022 jgart ;;; Copyright © 2022 Robby Zambito -;;; Copyright © 2023 Andrew Whatson +;;; Copyright © 2023, 2024 Andrew Whatson ;;; Copyright © 2023 Juliana Sims ;;; Copyright © 2023 Maxim Cournoyer ;;; Copyright © 2024 Skylar Hill @@ -62,6 +62,7 @@ (define-module (gnu packages scheme) #:use-module (gnu packages base) #:use-module (gnu packages bash) #:use-module (gnu packages bdw-gc) + #:use-module (gnu packages build-tools) #:use-module (gnu packages compression) #:use-module (gnu packages databases) #:use-module (gnu packages emacs) @@ -81,15 +82,18 @@ (define-module (gnu packages scheme) #:use-module (gnu packages lisp-check) #:use-module (gnu packages lisp-xyz) #:use-module (gnu packages m4) + #:use-module (gnu packages man) #:use-module (gnu packages multiprecision) #:use-module (gnu packages ncurses) #:use-module (gnu packages netpbm) #:use-module (gnu packages pcre) + #:use-module (gnu packages perl) #:use-module (gnu packages pkg-config) #:use-module (gnu packages sqlite) #:use-module (gnu packages tex) #:use-module (gnu packages texinfo) #:use-module (gnu packages tls) + #:use-module (gnu packages version-control) #:use-module (gnu packages xorg) #:use-module (srfi srfi-1) #:use-module (ice-9 match)) @@ -618,6 +622,59 @@ (define-public chibi-scheme threads.") (license bsd-3))) +(define-public unsyntax + (let ((commit "144772eeef4a812dd79515b67010d33ad2e7e890") + (revision "0")) + (package + (name "unsyntax") + (version (git-version "0.0.3" revision commit)) + (home-page "https://www.unsyntax.org") + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://gitlab.com/nieper/unsyntax.git") + (commit commit))) + (file-name (git-file-name name version)) + (sha256 + (base32 "1ia58xdrywsm0dg19kmkghnrgw6gj2bsaypyjmbpirrila73cqk0")))) + (build-system gnu-build-system) + (arguments + (list #:make-flags + #~(list "gl_public_submodule_commit=") ; disable submodule checks + #:phases + #~(modify-phases %standard-phases + (add-before 'bootstrap 'prepare-bootstrap + (lambda _ + ;; Unsyntax relies on bootstrap to fetch gnulib, we use + ;; the sources from guix's gnulib package instead. + (copy-recursively (getenv "GNULIB_SRCDIR") ".gnulib") + (setenv "GNULIB_SRCDIR" ".gnulib") + (patch-shebang ".gnulib/gnulib-tool") + (patch-shebang ".gnulib/build-aux/bootstrap") + (patch-shebang ".gnulib/build-aux/git-version-gen") + (patch-shebang ".gnulib/build-aux/prefix-gnulib-mk") + ;; The bootstrap_sync option updates the bootstrap script + ;; and runs it with CONFIG_SHELL, make sure it's correct. + (setenv "CONFIG_SHELL" (which "sh")) + ;; Tell git-version-gen the correct version number. + (call-with-output-file ".tarball-version" + (lambda (port) + (display #$version port)))))))) + (native-inputs + (list autoconf automake libtool git gnulib help2man perl texinfo)) + (propagated-inputs + (list chibi-scheme)) + (synopsis "Expander for R7RS programs") + (description + "Unsyntax is an implementation of the Scheme programming language, +specifically of its R7RS standard, and includes a number of extensions. +Unsyntax evaluates Scheme expressions and compiles and runs Scheme programs by +first expanding them into a minimal dialect of R7RS (small) without any +syntactic extensions. The resulting expression or program is then evaluated +by an existing Scheme implementation.") + (license expat)))) + (define-public sicp (let ((commit "bda03f79d6e2e8899ac2b5ca6a3732210e290a79") (revision "3")) base-commit: 5d3edff1a604414a3c42b89fcbc007e9d573993d -- 2.45.1