From patchwork Thu Feb 1 00:29:22 2024 Content-Type: text/plain; charset="utf-8" MIME-Version: 1.0 Content-Transfer-Encoding: 7bit X-Patchwork-Submitter: Charles X-Patchwork-Id: 59676 Return-Path: X-Original-To: patchwork@mira.cbaines.net Delivered-To: patchwork@mira.cbaines.net Received: by mira.cbaines.net (Postfix, from userid 113) id C39C827BBE2; Thu, 1 Feb 2024 00:31:30 +0000 (GMT) X-Spam-Checker-Version: SpamAssassin 3.4.6 (2021-04-09) on mira.cbaines.net X-Spam-Level: X-Spam-Status: No, score=-3.7 required=5.0 tests=BAYES_00,DKIM_INVALID, DKIM_SIGNED,MAILING_LIST_MULTI,RCVD_IN_MSPIKE_H5,RCVD_IN_MSPIKE_WL, SPF_HELO_PASS,URIBL_BLOCKED autolearn=unavailable autolearn_force=no version=3.4.6 Received: from lists.gnu.org (lists.gnu.org [209.51.188.17]) by mira.cbaines.net (Postfix) with ESMTPS id A65A927BBE9 for ; Thu, 1 Feb 2024 00:31:25 +0000 (GMT) Received: from localhost ([::1] helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1rVKz3-0005yS-UG; Wed, 31 Jan 2024 19:31:13 -0500 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 1rVKyr-0005xW-LR for guix-patches@gnu.org; Wed, 31 Jan 2024 19:31:04 -0500 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 1rVKyp-00086u-UQ for guix-patches@gnu.org; Wed, 31 Jan 2024 19:30:59 -0500 Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1rVKys-0003zY-8s; Wed, 31 Jan 2024 19:31:02 -0500 X-Loop: help-debbugs@gnu.org Subject: [bug#68859] [PATCH v2] gnu: Add cl-modf. References: In-Reply-To: Resent-From: Charles Original-Sender: "Debbugs-submit" Resent-CC: glv@posteo.net, cox.katherine.e+guix@gmail.com, me@bonfacemunyoki.com, sharlatanus@gmail.com, jgart@dismail.de, guix-patches@gnu.org Resent-Date: Thu, 01 Feb 2024 00:31:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 68859 X-GNU-PR-Package: guix-patches X-GNU-PR-Keywords: patch To: 68859@debbugs.gnu.org Cc: Charles , Guillaume Le Vaillant , Katherine Cox-Buday , Munyoki Kilyungi , Sharlatan Hellseher , jgart X-Debbugs-Original-Xcc: Guillaume Le Vaillant , Katherine Cox-Buday , Munyoki Kilyungi , Sharlatan Hellseher , jgart Received: via spool by 68859-submit@debbugs.gnu.org id=B68859.170674742815303 (code B ref 68859); Thu, 01 Feb 2024 00:31:02 +0000 Received: (at 68859) by debbugs.gnu.org; 1 Feb 2024 00:30:28 +0000 Received: from localhost ([127.0.0.1]:39329 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1rVKyJ-0003yk-HM for submit@debbugs.gnu.org; Wed, 31 Jan 2024 19:30:27 -0500 Received: from 076-187-208-035.res.spectrum.com ([76.187.208.35]:56848 helo=mail.charje.net) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1rVKyE-0003yP-Fv for 68859@debbugs.gnu.org; Wed, 31 Jan 2024 19:30:26 -0500 DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=charje.net; s=dkim6; t=1706747405; h=from:from:reply-to:subject:subject:date:date:message-id:message-id: to:to:cc:cc:mime-version:mime-version: content-transfer-encoding:content-transfer-encoding; bh=9ZKBzEAkxy+4Pba4Rys/0fm8MIfluKvdMtPbKlgpTrc=; b=g+8s7oiJJFT84fzz91mOh+/RiIgujFj45tP3CkukR47rXudjJ64S+bukrd/Dx1/46yvgIT 83yRjUHIVqaecAQKCJ2KFhaUDdtGp1Ise+yIepUZmGMnKdUOve6kkHL37unEjSnyXlgkdL ccsPfiP5CP9VkGP45jThltDM+xF3qc36tTEfgTiOoUzHPZKWREYVpYeOJu7oj0lNzukVh0 xLIALUy124iaf7wdEN+9IxZ0WCjN5XvgHLA7J+pejvfXu1JC+/GAvbCm+eYAo73Erc4OT0 1QXK1Jc8XBSa8+CvS0a34m0SaQDJ9QYwopBn42lpRdHYNa9ndojJNG8J/dA/9A== Received: from charje.net (076-187-208-035.res.spectrum.com [76.187.208.35]) by localhost (OpenSMTPD) with ESMTPSA id a1119dc8 (TLSv1.3:TLS_AES_256_GCM_SHA384:256:NO); Thu, 1 Feb 2024 00:30:05 +0000 (UTC) Date: Wed, 31 Jan 2024 18:29:22 -0600 Message-ID: <56e554151a26bd59da3fb75e94a6b9f84c1ed12a.1706747362.git.charles@charje.net> X-Mailer: git-send-email 2.41.0 MIME-Version: 1.0 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: Charles X-ACL-Warn: , Charles via Guix-patches X-Patchwork-Original-From: Charles via Guix-patches via From: Charles Errors-To: guix-patches-bounces+patchwork=mira.cbaines.net@gnu.org Sender: guix-patches-bounces+patchwork=mira.cbaines.net@gnu.org X-getmail-retrieved-from-mailbox: Patches * gnu/packages/lisp-xyz.scm (sbcl-modf, cl-modf, ecl-modf): New variables. Change-Id: Ic7e8e4511ca537531a7d9aa134e671aca060aa09 --- I just saw that you change the git-file-name to use the package name, so I updated this patch to do the same. gnu/packages/lisp-xyz.scm | 36 ++++++++++++++++++++++++++++++++++++ 1 file changed, 36 insertions(+) base-commit: bf7991a8c767abd32cfb2c92e3d57665a7cabf00 prerequisite-patch-id: bcaf8eb7f369a54bf47e9c7ef7b94fda2295de4a diff --git a/gnu/packages/lisp-xyz.scm b/gnu/packages/lisp-xyz.scm index b764d6b885..8c9ee783a4 100644 --- a/gnu/packages/lisp-xyz.scm +++ b/gnu/packages/lisp-xyz.scm @@ -11552,6 +11552,42 @@ (define-public ecl-fset ;; Tests fails on ECL with "The function FSET::MAKE-CHAR is undefined". '(#:tests? #f)))) +(define-public sbcl-modf + (let ((commit "dea93fe62c6bf7f66f32f52ac0c555aedbf7abad") + (revision "0")) + (package + (name "sbcl-modf") + (version (git-version "0" revision commit)) + (source + (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/smithzvk/modf") + (commit commit))) + (file-name (git-file-name name version)) + (sha256 + (base32 + "1aap7ldy7lv942khp026pgndgdzfkkqa9xcq1ykinrmflrgdazay")))) + (build-system asdf-build-system/sbcl) + (inputs + (list sbcl-alexandria + sbcl-closer-mop + sbcl-iterate)) + (native-inputs + (list sbcl-stefil)) + (home-page "https://github.com/smithzvk/modf") + (synopsis "@code{setf} like macro for functional programming in Common Lisp") + (description "This library simplifies functional programming in Common +Lisp by making it easier to make new data structures with specified changes in +place.") + (license license:bsd-3)))) + +(define-public cl-modf + (sbcl-package->cl-source-package sbcl-modf)) + +(define-public ecl-modf + (sbcl-package->ecl-package sbcl-modf)) + (define-public sbcl-cl-cont (let ((commit "fc1fa7e6eb64894fdca13e688e6015fad5290d2a") (revision "1"))