From patchwork Mon Mar 10 04:19:06 2025 Content-Type: text/plain; charset="utf-8" MIME-Version: 1.0 Content-Transfer-Encoding: 8bit X-Patchwork-Submitter: "King, Spencer via Guix-patches\" via" X-Patchwork-Id: 40046 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 69EAA27BBE9; Mon, 10 Mar 2025 04:25:45 +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=-6.4 required=5.0 tests=BAYES_00,DKIM_INVALID, DKIM_SIGNED,MAILING_LIST_MULTI,RCVD_IN_DNSWL_BLOCKED, RCVD_IN_VALIDITY_CERTIFIED,RCVD_IN_VALIDITY_RPBL,RCVD_IN_VALIDITY_SAFE, SPF_HELO_PASS 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 B0DBA27BBE2 for ; Mon, 10 Mar 2025 04:25:42 +0000 (GMT) Received: from localhost ([::1] helo=lists1p.gnu.org) by lists.gnu.org with esmtp (Exim 4.90_1) (envelope-from ) id 1trUd1-00072e-NU; Mon, 10 Mar 2025 00:20:35 -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 1trUYd-0006Sp-QP for guix-patches@gnu.org; Mon, 10 Mar 2025 00:16:04 -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 1trUYd-0007WI-Fs for guix-patches@gnu.org; Mon, 10 Mar 2025 00:16:03 -0400 DKIM-Signature: v=1; a=rsa-sha256; q=dns/txt; c=relaxed/relaxed; d=debbugs.gnu.org; s=debbugs-gnu-org; h=MIME-Version:Date:From:To:Subject; bh=A4ZRmQymRrMqEEtTESkVbHB7HqUSsfFGG24JgF1PQUY=; b=Ydi1jrP+3Azf1Z4vDqTOR0B6cIEFxi4IvMT1D8vIHzW8o9N6HjTOqQzI3D9P0LrP2XNKrEm8rilq4faClND1vECpKd2meTRvm9ysP3sxIzEJgZcSc3azMpvs71qjZlI/7ItwtwSQsmtTmENFF85cqrKuCN9Y+rfVaJnUYqfMtcrtnsXpRq1+SUav1JWZW76C4NxA774vxkkqan+e0FzTbbIloWA8wuE9J4R0RGhJs4Cb1qKRCQRwurgPZb8z97wGtnlCA2jeJqMHGQZW9XtCfnWoiD+em4JFOCXbxaVdLT6rCdcylR7dLOF1OKKShbcWTnAVUhwTai7jKgqJGBaeEA==; Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1trUYc-0006wB-9z for guix-patches@gnu.org; Mon, 10 Mar 2025 00:16:02 -0400 X-Loop: help-debbugs@gnu.org Subject: [bug#76909] [PATCH] gnu: Add freeforth2. Resent-From: iyzsong@envs.net Original-Sender: "Debbugs-submit" Resent-CC: guix-patches@gnu.org Resent-Date: Mon, 10 Mar 2025 04:16:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: report 76909 X-GNU-PR-Package: guix-patches X-GNU-PR-Keywords: patch To: 76909@debbugs.gnu.org Cc: =?utf-8?b?5a6L5paH5q2m?= X-Debbugs-Original-To: guix-patches@gnu.org Received: via spool by submit@debbugs.gnu.org id=B.174158014226639 (code B ref -1); Mon, 10 Mar 2025 04:16:02 +0000 Received: (at submit) by debbugs.gnu.org; 10 Mar 2025 04:15:42 +0000 Received: from localhost ([127.0.0.1]:35729 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1trUYI-0006vZ-15 for submit@debbugs.gnu.org; Mon, 10 Mar 2025 00:15:42 -0400 Received: from lists.gnu.org ([2001:470:142::17]:43432) by debbugs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.84_2) (envelope-from ) id 1trUYF-0006v9-9o for submit@debbugs.gnu.org; Mon, 10 Mar 2025 00:15:40 -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 1trUXv-0006SY-7v for guix-patches@gnu.org; Mon, 10 Mar 2025 00:15:21 -0400 Received: from mail.envs.net ([5.199.136.28]) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1trUXt-0007Ru-0s for guix-patches@gnu.org; Mon, 10 Mar 2025 00:15:19 -0400 Received: from localhost (mail.envs.net [127.0.0.1]) by mail.envs.net (Postfix) with ESMTP id 63BD838A4005; Mon, 10 Mar 2025 04:15:13 +0000 (UTC) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=envs.net; s=modoboa; t=1741580113; bh=A4ZRmQymRrMqEEtTESkVbHB7HqUSsfFGG24JgF1PQUY=; h=From:To:Cc:Subject:Date:From; b=HxAiUBQ08irF6FxWVPMwLYO/b0hWAVVwdyVQRfIJIMUv4MGXj7a+NcgUE7BobuvL6 0yWBKbcfT4R1E6T9xdXGP4qBOfSI9rGqCiW7+0OR+5YtDg78dCiNIQKeToy3eFbikq sSS6/cAUjXyRcubCHcl0xL3mYwaR5zLaMq15W2XqtS+3790OWRxgqt3tJOwhQqgqep bPTqolPkv4+bj4G6EtmacMtm6watzgVFolrv4MlJV5teclUoxtCoYSAfO3w7tG3gtG CwQ/eFqnxypqE1IVSHnM1MgSSeiBbTtN1itVm7VWLemRgBy2clWPbhAeprVHYX9d0/ JdRJRjlhIilhzfssYnZ7v7vowVdvK4Spvr5njP70QdYnicWACxvn66J/QX+rFdNPA5 gOCOhGNDMjfFXeKJuMscrj2AR5V2ug8rIukwejJVr5Ao0NEGVBJYKtu+gnF9pVYyR7 lPPpOEVhhuTm40NyDKqXHdhcWAcsthiRLVsaYpu+oEmkNLE6pmzlpm19KtYkJmAS7j V8cnFwE41ROyDOsqNU/FfFtwPKb7+HJnN0qlWxNQdxFnSx64xaH4HPRGOVsTU9suW+ A4zlt3xWzJKfp8EkY8odRid4kdjdSRSC1ccriPacbHwZ55onkiiHJnOECTTfeDMUBn xvk38VhEjYB9538Uh1tyk5Ro= X-Virus-Scanned: Debian amavisd-new at mail.envs.net Received: from mail.envs.net ([127.0.0.1]) by localhost (mail.envs.net [127.0.0.1]) (amavisd-new, port 10026) with ESMTP id zB8npsSp55u9; Mon, 10 Mar 2025 04:15:08 +0000 (UTC) Received: from localhost (unknown [112.44.72.228]) (using TLSv1.3 with cipher TLS_AES_256_GCM_SHA384 (256/256 bits) key-exchange ECDHE (P-256) server-signature RSA-PSS (2048 bits) server-digest SHA256) (No client certificate requested) by mail.envs.net (Postfix) with ESMTPSA; Mon, 10 Mar 2025 04:15:07 +0000 (UTC) Received: from localhost.localdomain (localhost.lan [127.0.0.1]) by localhost (OpenSMTPD) with ESMTP id 9bf40709; Mon, 10 Mar 2025 04:19:09 +0000 (UTC) Date: Mon, 10 Mar 2025 12:19:06 +0800 Message-ID: <70c43b43bf8a94f403bda3f9a797018b264991f1.1741580343.git.iyzsong@member.fsf.org> X-Mailer: git-send-email 2.48.1 MIME-Version: 1.0 Received-SPF: pass client-ip=5.199.136.28; envelope-from=iyzsong@envs.net; helo=mail.envs.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, RCVD_IN_VALIDITY_RPBL_BLOCKED=0.001, RCVD_IN_VALIDITY_SAFE_BLOCKED=0.001, SPF_HELO_NONE=0.001, SPF_PASS=-0.001 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: iyzsong@envs.net X-ACL-Warn: , iyzsong--- via Guix-patches X-Patchwork-Original-From: iyzsong--- via Guix-patches via From: "King, Spencer via Guix-patches\" via" 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 From: 宋文武 * gnu/packages/forth.scm (freeforth2): New variable. Change-Id: I7f505a2f6ba9146008061778e582032c95b62298 --- gnu/packages/forth.scm | 43 +++++++++++++++++++++++++++++++++++++++++- 1 file changed, 42 insertions(+), 1 deletion(-) base-commit: 9866d32e173050ba99dc520b0a4d5aacb85e3fa0 diff --git a/gnu/packages/forth.scm b/gnu/packages/forth.scm index c523887871..36f4ba5051 100644 --- a/gnu/packages/forth.scm +++ b/gnu/packages/forth.scm @@ -1,6 +1,6 @@ ;;; GNU Guix --- Functional package management for GNU ;;; Copyright © 2016 Nikita -;;; Copyright © 2016 Sou Bunnbu +;;; Copyright © 2016, 2025 宋文武 ;;; Copyright © 2023 B. Wilson ;;; ;;; This file is part of GNU Guix. @@ -22,9 +22,11 @@ (define-module (gnu packages forth) #:use-module (guix build-system gnu) #:use-module (guix build-system trivial) #:use-module (guix download) + #:use-module (guix git-download) #:use-module (guix gexp) #:use-module ((guix licenses) #:prefix license:) #:use-module (guix packages) + #:use-module (gnu packages assembly) #:use-module (gnu packages m4) #:use-module (gnu packages vim)) @@ -63,6 +65,45 @@ (define-public gforth (home-page "https://www.gnu.org/software/gforth/") (license license:gpl3+))) +(define-public freeforth2 + (package + (name "freeforth2") + (version "1.0.0") + (source (origin + (method git-fetch) + (uri (git-reference + (url "https://github.com/dan4thewin/FreeForth2") + (commit (string-append "v" version)))) + (file-name (git-file-name name version)) + (sha256 + (base32 + "0nnbvqvv0q7mcy2paxknl97zk6vphflvqp3dy741p0kaghcpgli7")))) + (build-system gnu-build-system) + (arguments + (list #:test-target "test" + #:system "i686-linux" ;requires 32-bit gcc + #:make-flags + #~(list (string-append "PREFIX=" #$output) + "LD=gcc -m32 -nostartfiles -lc") + #:phases + #~(modify-phases %standard-phases + (replace 'configure + (lambda _ + (substitute* "fflin.boot" + (("/usr/local/share/ff") + (string-append #$output "/share/ff")) + ;; Increase the size of ffpath for store path. + (("46[+] create ffpath") + "256+ create ffpath"))))))) + (native-inputs (list fasm)) + (synopsis "Lightweight x86 Forth") + (home-page "https://github.com/dan4thewin/FreeForth2") + (description + "FreeForth2 offers a lightweight Forth for x86 GNU/Linux that deftly +blends assembly and Forth.") + (supported-systems '("i686-linux" "x86_64-linux")) + (license license:asl2.0))) + (define-public smithforth (package (name "smithforth")