From unknown Fri Aug 15 21:21:13 2025 X-Loop: help-debbugs@gnu.org Subject: [bug#65934] [PATCH] gnu: Add smithforth. Resent-From: "B. Wilson" Original-Sender: "Debbugs-submit" Resent-CC: guix-patches@gnu.org Resent-Date: Thu, 14 Sep 2023 05:28:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: report 65934 X-GNU-PR-Package: guix-patches X-GNU-PR-Keywords: patch To: 65934@debbugs.gnu.org Cc: "B. Wilson" X-Debbugs-Original-To: guix-patches@gnu.org Received: via spool by submit@debbugs.gnu.org id=B.16946692694887 (code B ref -1); Thu, 14 Sep 2023 05:28:02 +0000 Received: (at submit) by debbugs.gnu.org; 14 Sep 2023 05:27:49 +0000 Received: from localhost ([127.0.0.1]:36520 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1qgetJ-0001Gk-C2 for submit@debbugs.gnu.org; Thu, 14 Sep 2023 01:27:49 -0400 Received: from lists.gnu.org ([2001:470:142::17]:51348) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1qgetE-0001GU-R7 for submit@debbugs.gnu.org; Thu, 14 Sep 2023 01:27:48 -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 1qget3-0002wW-5I for guix-patches@gnu.org; Thu, 14 Sep 2023 01:27:33 -0400 Received: from m42-5.mailgun.net ([69.72.42.5]) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_128_GCM_SHA256:128) (Exim 4.90_1) (envelope-from ) id 1qgesy-0004bw-7w for guix-patches@gnu.org; Thu, 14 Sep 2023 01:27:31 -0400 DKIM-Signature: a=rsa-sha256; v=1; c=relaxed/relaxed; d=mg.wilsonb.com; q=dns/txt; s=krs; t=1694669247; x=1694676447; h=Content-Transfer-Encoding: Content-Type: MIME-Version: Message-ID: Date: Subject: Subject: Cc: To: To: From: From: Sender: Sender; bh=iO4KZvNCcF8REEHV4RznrmbW8Bq4+YcorJmpKrDulYc=; b=48mNlapRQ0J3K0xoBam2rRVppFWtOCtDtsIPJbRqqHsDUkQ9GXJCb172NP6IoMErQ+8XMhPYNwv6U9AX7e/p8kb1R9V7P6bv674NN7hnwhWFw6YGXL01jvkc4dKH1sk5wdfKnt9X4qCauO8jUYhn3GfRu1aHsgF1+f4qYYqBQOo06GXpChuU3D+kdujPOAvQ32/VpVdCZSV2kRBpJcXxcG2cqEFc4uyi3RDOK1dcb8ouVR6yI+d+q7kWlgdJ95+Vcxzm2/4gykK1xeajYMZO3KECJrFLCJs5p7r/uImAs7D0jQcdVoFReoNcHZszmmvlldFdcRxpRyGYOBiHBgqZ1w== X-Mailgun-Sending-Ip: 69.72.42.5 X-Mailgun-Sid: WyI5MmEzMyIsImd1aXgtcGF0Y2hlc0BnbnUub3JnIiwiMDg1NDdhIl0= Received: from wilsonb.com (wilsonb.com [104.199.203.42]) by ffcf8ad72342 with SMTP id 650299bfb39ab82ace084c6d (version=TLS1.3, cipher=TLS_AES_128_GCM_SHA256); Thu, 14 Sep 2023 05:27:27 GMT Received: from localhost (199.147.145.153.ap.dti.ne.jp [153.145.147.199]) by wilsonb.com (Postfix) with ESMTPSA id 1B8CEA0586; Thu, 14 Sep 2023 05:27:24 +0000 (UTC) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=wilsonb.com; s=201703; t=1694669244; bh=iO4KZvNCcF8REEHV4RznrmbW8Bq4+YcorJmpKrDulYc=; h=From:To:Cc:Subject:Date:From; b=9BatndNMQTPz+IiRMBPIn8Rb1ct/E0VVopc8RheUXtH+8spmX9Y54e9rUkNQd2ipL Rl2xfUV/AfCW4VqVMXAJJ3WkX4xYdSCMQTXhyBAh4pNHt7nSgb8yJZpZe29UK7qAwB fDJim3VIF4ZhMnHfMakJSYmjoOitx35LXI9IGWEqBAFITI8L/z0Soy0oAlUIGxgSX9 slklK+Hl4bLIe7KtmL5gKEAoiQIJ76PTrwt4gVTa5tBEkqO33s4r0KHJjaZP0N18ai SCO7qvNHB/R3gU+khwmLpcj8JuXC7l4gHkH9DQ2o4nBCBT5NrN3l5gZo4k8xXHQ8rp rnswsSrEQ0DPanWReFXeJPwZgEKolnPLNyb8Rpo5GVpQ9RwBcK6+X12smHbK4HvWWt Rr/V2CPmOt4MM20WnyzLj633vY/a/vbk2cS8OhmW+lFcr8kiXxluPE5fHWzVd5vjLM g67FQSQOFuCQIsVKBJdY3uy2CRq+em4id3Of23jTfO1KFfS5Wo+DbfzGAgjUulKzU1 nMPl9/IBpAVVYDMbhC6z7kv0CwkT+ZGM2+YVN+CqvNGRXZolHs5h3rLB7LB56C8UKw 2/k4RC5rVo2Vell+3fXYsJN/x/aiWPUS6zSRnINyy12SkcmwAU0N2sLi+TBp28S2/z cDG+M2G9+p/IiBfrQLhjAS7c= From: "B. Wilson" Date: Thu, 14 Sep 2023 14:27:09 +0900 Message-ID: <20230914052721.27820-1-elaexuotee@wilsonb.com> X-Mailer: git-send-email 2.41.0 MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit Received-SPF: pass client-ip=69.72.42.5; envelope-from=bounce+686de0.08547a-guix-patches=gnu.org@mg.wilsonb.com; helo=m42-5.mailgun.net X-Spam_score_int: -7 X-Spam_score: -0.8 X-Spam_bar: / X-Spam_report: (-0.8 / 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_BL_SPAMCOP_NET=1.347, RCVD_IN_DNSWL_NONE=-0.0001, RCVD_IN_MSPIKE_H4=0.001, RCVD_IN_MSPIKE_WL=0.001, SPF_HELO_NONE=0.001, SPF_PASS=-0.001 autolearn=no autolearn_force=no X-Spam_action: no action X-Spam-Score: 2.2 (++) X-Spam-Report: Spam detection software, running on the system "debbugs.gnu.org", has NOT identified this incoming email as spam. The original message has been attached to this so you can view it or label similar future email. If you have any questions, see the administrator of that system for details. Content preview: * gnu/packages/forth (smithforth): New variable. --- gnu/packages/forth.scm | 55 +++++++++++++++++++++++++++++++++++++++++- 1 file changed, 54 insertions(+), 1 deletion(-) diff --git a/gnu/packages/forth.scm b/gnu/packages/forth.scm index 8cb6ac8391..9910243ac1 100644 --- a/gnu/packages/forth.scm +++ b/gnu/packages/forth.scm @@ -1,6 +1,7 @@ ;;; GNU Guix --- Functional p [...] Content analysis details: (2.2 points, 10.0 required) pts rule name description ---- ---------------------- -------------------------------------------------- 1.2 RCVD_IN_BL_SPAMCOP_NET RBL: Received via a relay in bl.spamcop.net [Blocked - see ] -0.0 SPF_HELO_PASS SPF: HELO matches SPF record 1.0 SPF_SOFTFAIL SPF: sender does not match SPF record (softfail) X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: debbugs-submit-bounces@debbugs.gnu.org Sender: "Debbugs-submit" X-Spam-Score: 1.2 (+) X-Spam-Report: Spam detection software, running on the system "debbugs.gnu.org", has NOT identified this incoming email as spam. The original message has been attached to this so you can view it or label similar future email. If you have any questions, see the administrator of that system for details. Content preview: * gnu/packages/forth (smithforth): New variable. --- gnu/packages/forth.scm | 55 +++++++++++++++++++++++++++++++++++++++++- 1 file changed, 54 insertions(+), 1 deletion(-) diff --git a/gnu/packages/forth.scm b/gnu/packages/forth.scm index 8cb6ac8391..9910243ac1 100644 --- a/gnu/packages/forth.scm +++ b/gnu/packages/forth.scm @@ -1,6 +1,7 @@ ;;; GNU Guix --- Functional p [...] Content analysis details: (1.2 points, 10.0 required) pts rule name description ---- ---------------------- -------------------------------------------------- 1.2 RCVD_IN_BL_SPAMCOP_NET RBL: Received via a relay in bl.spamcop.net [Blocked - see ] -0.0 SPF_HELO_PASS SPF: HELO matches SPF record 1.0 SPF_SOFTFAIL SPF: sender does not match SPF record (softfail) -1.0 MAILING_LIST_MULTI Multiple indicators imply a widely-seen list manager * gnu/packages/forth (smithforth): New variable. --- gnu/packages/forth.scm | 55 +++++++++++++++++++++++++++++++++++++++++- 1 file changed, 54 insertions(+), 1 deletion(-) diff --git a/gnu/packages/forth.scm b/gnu/packages/forth.scm index 8cb6ac8391..9910243ac1 100644 --- a/gnu/packages/forth.scm +++ b/gnu/packages/forth.scm @@ -1,6 +1,7 @@ ;;; GNU Guix --- Functional package management for GNU ;;; Copyright © 2016 Nikita ;;; Copyright © 2016 Sou Bunnbu +;;; Copyright © 2023 B. Wilson ;;; ;;; This file is part of GNU Guix. ;;; @@ -22,7 +23,9 @@ (define-module (gnu packages forth) #:use-module (guix packages) #:use-module (guix download) #:use-module (guix build-system gnu) - #:use-module (gnu packages m4)) + #:use-module (guix build-system trivial) + #:use-module (gnu packages m4) + #:use-module (gnu packages vim)) (define-public gforth (package @@ -58,3 +61,53 @@ (define-public gforth included.") (home-page "https://www.gnu.org/software/gforth/") (license license:gpl3+))) + +(define-public smithforth + (package + (name "smithforth") + (version "220711") + (source + (origin + (method url-fetch) + (uri (string-append "https://dacvs.neocities.org/SF/SForth" + version "dmp.txt")) + (sha256 + (base32 "0a39pv7529llsa3f48fmvwvlcp3f9v8qkn5ziw2l6kxf0qvli3lm")))) + (build-system trivial-build-system) + (inputs + `(("system.fs" + ,(origin + (method url-fetch) + (uri (string-append "https://dacvs.neocities.org/SF/system" + version "fs.txt")) + (sha256 + (base32 + "17v1pp64s6n8q8w3kg48nd7zdcx2208y4svr5fpfms5lkyzg7z1m")))))) + (native-inputs (list xxd)) + (arguments + `(#:modules ((guix build utils)) + #:builder + (begin + (use-modules (guix build utils) + (ice-9 textual-ports)) + (let* ((sforth.dmp (assoc-ref %build-inputs "source")) + (system.fs (assoc-ref %build-inputs "system.fs")) + (xxd (string-append (assoc-ref %build-inputs "xxd") + "/bin/xxd")) + (bin (string-append (assoc-ref %outputs "out") "/bin"))) + (copy-file sforth.dmp "sforth.dmp") + (substitute* "sforth.dmp" (("#.*$") "\n")) + (with-output-to-file "sforth" + (lambda _ + (invoke xxd "-p" "-r" "sforth.dmp") + (call-with-input-file system.fs + (lambda (port) (display (get-string-all port))))) + #:binary #t) + (chmod "sforth" #o755) + (install-file "sforth" bin))))) + (home-page "https://dacvs.neocities.org/SF/") + (synopsis "Forth programming language for x86-64 desktop computers") + (description "SmithForth is an implementation of the Forth programming +language for x86-64 desktop computers. SmithForth is a text interpreter that +runs in a Linux text console.") + (license license:expat-0))) -- 2.41.0 From unknown Fri Aug 15 21:21:13 2025 X-Loop: help-debbugs@gnu.org Subject: [bug#65934] [PATCH] gnu: Add smithforth. Resent-From: Ludovic =?UTF-8?Q?Court=C3=A8s?= Original-Sender: "Debbugs-submit" Resent-CC: guix-patches@gnu.org Resent-Date: Thu, 05 Oct 2023 12:48:01 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 65934 X-GNU-PR-Package: guix-patches X-GNU-PR-Keywords: patch To: "B. Wilson" Cc: 65934@debbugs.gnu.org Received: via spool by 65934-submit@debbugs.gnu.org id=B65934.169651004532186 (code B ref 65934); Thu, 05 Oct 2023 12:48:01 +0000 Received: (at 65934) by debbugs.gnu.org; 5 Oct 2023 12:47:25 +0000 Received: from localhost ([127.0.0.1]:46197 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1qoNlE-0008N4-LQ for submit@debbugs.gnu.org; Thu, 05 Oct 2023 08:47:24 -0400 Received: from eggs.gnu.org ([2001:470:142:3::10]:44698) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1qoNlC-0008Mn-AA for 65934@debbugs.gnu.org; Thu, 05 Oct 2023 08:47:22 -0400 Received: from fencepost.gnu.org ([2001:470:142:3::e]) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1qoNko-0003Oy-Q7; Thu, 05 Oct 2023 08:46:58 -0400 DKIM-Signature: v=1; a=rsa-sha256; q=dns/txt; c=relaxed/relaxed; d=gnu.org; s=fencepost-gnu-org; h=MIME-Version:Date:References:In-Reply-To:Subject:To: From; bh=2fMUVA93FzW/LIPHQZxZS4Zxi5NFDPJKIPkxwQe9ORY=; b=QNX3oHTjdh/GWHdH4kYc B2eQBaQ1kG+LKjXDH7mAGiNLBm+uV58YWpQTB5XlVdRowBpfhlpATgoQPjC6NhQuOD+/klzdHXWWa ytnLfQooOQHbnPeznY24TkXekP2QzR3Ip6/gW9rv4bfX6Xf9CXmvoWcmB4+Dm8iWhIMrPOw3sGx3D tikxooxBX2/vZEXjCybu1WoC0bI68wLKoJUfXQgiWTZtktmcday+1AS6+DVtB5wodoLy5XHq7ryR7 Kglb2wosbKsviZ1ocH5Qqvi65fCEoLUbSUoAf9Gk3v/yPsCnIrNl/CMHwqp8XLSAVxAmptkxg3ynD AEJYJNpbzzYXvw==; From: Ludovic =?UTF-8?Q?Court=C3=A8s?= In-Reply-To: <20230914052721.27820-1-elaexuotee@wilsonb.com> (B. Wilson's message of "Thu, 14 Sep 2023 14:27:09 +0900") References: <20230914052721.27820-1-elaexuotee@wilsonb.com> Date: Thu, 05 Oct 2023 14:46:57 +0200 Message-ID: <87wmw16xtq.fsf@gnu.org> User-Agent: Gnus/5.13 (Gnus v5.13) MIME-Version: 1.0 Content-Type: text/plain; charset=utf-8 Content-Transfer-Encoding: quoted-printable X-Spam-Score: -2.3 (--) X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: debbugs-submit-bounces@debbugs.gnu.org Sender: "Debbugs-submit" X-Spam-Score: -3.3 (---) Hi, "B. Wilson" skribis: > * gnu/packages/forth (smithforth): New variable. [=E2=80=A6] > +(define-public smithforth > + (package > + (name "smithforth") > + (version "220711") > + (source > + (origin > + (method url-fetch) > + (uri (string-append "https://dacvs.neocities.org/SF/SForth" > + version "dmp.txt")) > + (sha256 > + (base32 "0a39pv7529llsa3f48fmvwvlcp3f9v8qkn5ziw2l6kxf0qvli3lm"= )))) > + (build-system trivial-build-system) > + (inputs > + `(("system.fs" > + ,(origin > + (method url-fetch) > + (uri (string-append "https://dacvs.neocities.org/SF/system" > + version "fs.txt")) > + (sha256 > + (base32 > + "17v1pp64s6n8q8w3kg48nd7zdcx2208y4svr5fpfms5lkyzg7z1m")))))) Is this a binary VM image dump? If so, is there source available, a way to bootstrap it? > + (native-inputs (list xxd)) > + (arguments > + `(#:modules ((guix build utils)) > + #:builder > + (begin > + (use-modules (guix build utils) > + (ice-9 textual-ports)) > + (let* ((sforth.dmp (assoc-ref %build-inputs "source")) > + (system.fs (assoc-ref %build-inputs "system.fs")) Please use a gexp here for #:builder and instead of the (assoc-ref =E2=80= =A6) expressions above, use: #~(begin ;; =E2=80=A6 (let* ((sforth.dmp #$(package-source this-package)) (system.fs #$(origin =E2=80=A6))) =E2=80=A6)) > + (home-page "https://dacvs.neocities.org/SF/") > + (synopsis "Forth programming language for x86-64 desktop computers") Please add a =E2=80=98supported-systems=E2=80=99 field so the package is cl= early marked as unsupported on architectures other than x86_64. Thanks, Ludo=E2=80=99. From unknown Fri Aug 15 21:21:13 2025 X-Loop: help-debbugs@gnu.org Subject: [bug#65934] [PATCH] gnu: Add smithforth. Resent-From: "B. Wilson" Original-Sender: "Debbugs-submit" Resent-CC: guix-patches@gnu.org Resent-Date: Thu, 05 Oct 2023 14:37:01 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 65934 X-GNU-PR-Package: guix-patches X-GNU-PR-Keywords: patch To: Ludovic =?UTF-8?Q?Court=C3=A8s?= Cc: 65934@debbugs.gnu.org Received: via spool by 65934-submit@debbugs.gnu.org id=B65934.1696516573353 (code B ref 65934); Thu, 05 Oct 2023 14:37:01 +0000 Received: (at 65934) by debbugs.gnu.org; 5 Oct 2023 14:36:13 +0000 Received: from localhost ([127.0.0.1]:48086 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1qoPSW-00005b-WF for submit@debbugs.gnu.org; Thu, 05 Oct 2023 10:36:13 -0400 Received: from m42-5.mailgun.net ([69.72.42.5]:62828) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1qoPSU-00005I-RW for 65934@debbugs.gnu.org; Thu, 05 Oct 2023 10:36:12 -0400 DKIM-Signature: a=rsa-sha256; v=1; c=relaxed/relaxed; d=mg.wilsonb.com; q=dns/txt; s=krs; t=1696516547; x=1696523747; h=Content-Transfer-Encoding: Content-Type: MIME-Version: Message-Id: In-Reply-To: References: From: From: Subject: Subject: Cc: To: To: Date: Sender: Sender; bh=hGYrFfybGeBonamGSiIKTNgt959S0V3cfGdxJMWfBok=; b=ECiwkOENKa8cBuU/ynegA3bynExMWjTC0+FGPrnwSwcW7pqAVLbmm8HJbV8YZIXInUX3cwOwBpfljscEWyJUOAQh72P4dnolngSDuN8xETLTbSkcPLTGKsPvmyIg38AlCIgtzRMOWzsQvkX5Q1UGqulvyhPQMN8qJzvz1B6d9yq3lPRNLzVCnwrIy9TLXbI0CcKfYgpCcUYzM+63cqNs69/k94i7iPQXIDBjG51VUBnI4CSutOWQmY0X0QWKjkXVXPjeqoqb3GpEiI88acjrh3t8dS5tUQGmB3i2LFOP0+YHI+VPTy4SMFp+fJw/oR4O0+9xTZ23WMEbVxzZPBPblQ== X-Mailgun-Sending-Ip: 69.72.42.5 X-Mailgun-Sid: WyJmNzU0NSIsIjY1OTM0QGRlYmJ1Z3MuZ251Lm9yZyIsIjA4NTQ3YSJd Received: from wilsonb.com (wilsonb.com [104.199.203.42]) by 0af60cf557a8 with SMTP id 651ec9c22abed766dca95b4e (version=TLS1.3, cipher=TLS_AES_128_GCM_SHA256); Thu, 05 Oct 2023 14:35:46 GMT Received: from localhost (i114-182-69-148.s41.a007.ap.plala.or.jp [114.182.69.148]) by wilsonb.com (Postfix) with ESMTPSA id E697EA0E4E; Thu, 5 Oct 2023 14:35:44 +0000 (UTC) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=wilsonb.com; s=201703; t=1696516545; bh=hGYrFfybGeBonamGSiIKTNgt959S0V3cfGdxJMWfBok=; h=Date:To:Cc:Subject:From:References:In-Reply-To:From; b=mwFgcNlsQD4QOJU8niSLJ3aKzYznT9dS6IAc0BFUbJ5qVX9WvUlFi68Jhri/Y1PvX lxwljTuPS7djYof0M/CaHC8vefxKO6Q8LpMn51g6ES4kxAcHNf1DpgM2TpZvnVvmqU dFbhb9K2dJDTnr1vFsavTOqt81lRI0CE3o5jJo9WyTIbs9vveXDZGR784LIPaqKClt xYxsx4kO9TkuyMqzVaK5YKLHJwWn4ZlQlZlNsVy6tIi5D6Nw+jdeOu6i3s7l5kGEjR SExozqw2d25OexJIr38pn7KIQY5K9XFktuzHlIZrwHinKyepMLcvT0x0mpjmwxOF5Z PBQakVbjp+EvdRjs06XYHXDBmO29/fjy/pldZfCgRguLIQnY/yEV+SyDaEbScHKuqW ee0knoOBxTewPnv/jrYzVKGms5gARbrD3NOIn42CadqUrxqXx4iMbWfs8IsuF2bCc4 d2WZItsyF8IQ3fzsN9o80s9JvuyJRVUfy3+4JmYPr7NSKl8jLHEGqOLxizJj7ucx2s aZHrWurKEfvSfwcAwYXlmKU/y46gPmsvMn108cn2dGEsE1XrXBKm3lZYLm5Lu89NcB 4tUc/nifQfFz39u1jN0HBlQcWv0GgNQt+GaFkjVkTvqrJr5wZiQHITLzc9cWOBEeeQ LIdqCY/C9oBkVumKb+cM5LnU= Date: Thu, 05 Oct 2023 23:35:41 +0900 From: "B. Wilson" References: <20230914052721.27820-1-elaexuotee@wilsonb.com> <87wmw16xtq.fsf@gnu.org> In-Reply-To: <87wmw16xtq.fsf@gnu.org> Message-Id: <38GLEJ3MZ0JX3.2SNYY1FUB5OYX@wilsonb.com> User-Agent: mblaze/1.2 MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: quoted-printable X-Spam-Score: 0.0 (/) X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: debbugs-submit-bounces@debbugs.gnu.org Sender: "Debbugs-submit" X-Spam-Score: -1.0 (-) Thanks for taking a look. > Is this a binary VM image dump? >=20 > If so, is there source available, a way to bootstrap it? The binary is the source, per se. The author hand-wrote x86_64 opcodes in h= ex, which is what dmp.txt contains. This is "compiled" by using xxd to write th= ose bytes out to a file. Then system.fs is just a blob of Forth source that get= s appended to the binary. It's kind of magical that this scheme works at all, but that's Forth for ya= =2E > Please use a gexp here for #:builder and instead of the (assoc-ref = =E2=80=A6) > expressions above, use: >=20 > #~(begin > ;; =E2=80=A6 > (let* ((sforth.dmp #$(package-source this-package)) > (system.fs #$(origin =E2=80=A6))) > =E2=80=A6)) >=20 > > + (home-page "https://dacvs.neocities.org/SF/") > > + (synopsis "Forth programming language for x86-64 desktop computers= ") Ah, nice. Thanks. Will do. > Please add a =E2=80=98supported-systems=E2=80=99 field so the package is = clearly marked > as unsupported on architectures other than x86_64. Perfect. I didn't realize we had such a field. Thanks! From unknown Fri Aug 15 21:21:13 2025 X-Loop: help-debbugs@gnu.org Subject: [bug#65934] [PATCH] gnu: Add smithforth. Resent-From: "B. Wilson" Original-Sender: "Debbugs-submit" Resent-CC: guix-patches@gnu.org Resent-Date: Thu, 05 Oct 2023 15:03:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 65934 X-GNU-PR-Package: guix-patches X-GNU-PR-Keywords: patch To: Ludovic =?UTF-8?Q?Court=C3=A8s?= Cc: 65934@debbugs.gnu.org Received: via spool by 65934-submit@debbugs.gnu.org id=B65934.16965181433431 (code B ref 65934); Thu, 05 Oct 2023 15:03:02 +0000 Received: (at 65934) by debbugs.gnu.org; 5 Oct 2023 15:02:23 +0000 Received: from localhost ([127.0.0.1]:48150 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1qoPrr-0000tG-17 for submit@debbugs.gnu.org; Thu, 05 Oct 2023 11:02:23 -0400 Received: from m42-5.mailgun.net ([69.72.42.5]:38024) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1qoPrm-0000sy-Uv for 65934@debbugs.gnu.org; Thu, 05 Oct 2023 11:02:21 -0400 DKIM-Signature: a=rsa-sha256; v=1; c=relaxed/relaxed; d=mg.wilsonb.com; q=dns/txt; s=krs; t=1696518115; x=1696525315; h=Content-Type: MIME-Version: Message-Id: In-Reply-To: References: From: From: Subject: Subject: Cc: To: To: Date: Sender: Sender; bh=4IizRhABsA+lSVcc/PE9halqbdiRS4rIba082/lz1FI=; b=GTayd8gCd32V+z6hIknMjNRSR+yhjnL3YXEnC3Tj/i3OPZTN7iKxs1wW0D4X1CgMXFhAjxUoeb3rModX8WWZmZ6hy1JxZjAp0Kr+Yo2nADuDE0PhsfqQfNRo+XB057nF7xk9GUgE3j48PMWeBnhGSf3Ma4a+pawwIHR6NPdWAdScmdqDgVYcZc+DRLD1pWAQ1Pa7FTqqkKgthcvpzX5LcRqOQW7P3Extfy8peZxfjOfpJicfIUsLj3WL9PTn5dzEvWYBWBMDyNXwu29YhdT3vwCxu1v1Oxgo1EXUmqVwnlA20Fl/WFP0qh4aEIERYW7CRBfY3uyzS9ba+sKXGzZKyQ== X-Mailgun-Sending-Ip: 69.72.42.5 X-Mailgun-Sid: WyJmNzU0NSIsIjY1OTM0QGRlYmJ1Z3MuZ251Lm9yZyIsIjA4NTQ3YSJd Received: from wilsonb.com (wilsonb.com [104.199.203.42]) by 0af60cf557a8 with SMTP id 651ecfe22abed766dccdd27c (version=TLS1.3, cipher=TLS_AES_128_GCM_SHA256); Thu, 05 Oct 2023 15:01:54 GMT Received: from localhost (i114-182-69-148.s41.a007.ap.plala.or.jp [114.182.69.148]) by wilsonb.com (Postfix) with ESMTPSA id E9273A0E4E; Thu, 5 Oct 2023 15:01:52 +0000 (UTC) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=wilsonb.com; s=201703; t=1696518113; bh=4IizRhABsA+lSVcc/PE9halqbdiRS4rIba082/lz1FI=; h=Date:To:Cc:Subject:From:References:In-Reply-To:From; b=HYQjjhw9b7a7jxd/vVXueH36ZAOkJ1wpgdIN/rTTq2bJx0IWhHMCpc0I9svuxruoq hbxIwzzH7K2axlZ935GmCFHWhFXLSSsktBeHoqNPdt9WWdhqO+GpRZ/TPrha//nPsS 3CZ2GLVUIeoSno9YtKqKxSHzOwh1FdYINlSTyR6AqVGTGIX+8qFgGBPNGfg0IEqGWS 3eNmnMedcMrsw3y76COm6g+z1TQt/i7lO/LAisKO2ZLsj2bMtNqPgkxgK6WJblgRB1 B/ubwNNcFnf8Jvf4Wrmqf4AsQm0DPgR9NDwCPRaYxTwS4pwrn8dHDj4v93I4y3RIfL 0jPwh9K4jVtIV/R5myxdbKWF7fcUDO3Fb9a0zVxsod4Mh6Xj7KnoAvnPgLBbBDRRw2 AwPz4zm66/tA/aq/F3ez0nA7B9bHYkoiRrIpa13OoPoA8faPASvdjmC6JM6l2mcmXO kMkAI9QRX1PyaUmXDMmpIFAzqxTTDFlzdxdI3/a9ZBkcTBHQkYrMgsHIhhPSukxQ0M m11pnCs/O8MddFDFU2tbq5yG6a+K8Iw+QAFTTfqeTzipsLFGu1CYLNzfyVTwsBGG39 yinKEtQaYiM6UinmP3DDCFAQ3hHcFes3Uz845GaJHxQRlBGna3KsgJ8HZzmtcYtROZ lFwqT8Ceq3udCb9MJJ470IaI= Date: Fri, 06 Oct 2023 00:01:51 +0900 From: "B. Wilson" References: <20230914052721.27820-1-elaexuotee@wilsonb.com> <87wmw16xtq.fsf@gnu.org> In-Reply-To: <87wmw16xtq.fsf@gnu.org> Message-Id: <3NL1U5UBSLFFK.2486N8UEFYJ8E@wilsonb.com> User-Agent: mblaze/1.2 MIME-Version: 1.0 Content-Type: multipart/mixed; boundary="----_=_70f50a680cdc52d667ad691c_=_" X-Spam-Score: 0.0 (/) X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: debbugs-submit-bounces@debbugs.gnu.org Sender: "Debbugs-submit" X-Spam-Score: -1.0 (-) This is a multipart message in MIME format. ------_=_70f50a680cdc52d667ad691c_=_ Content-Disposition: attachment; filename=0001-gnu-Add-smithforth.patch Content-Type: text/x-patch Content-Transfer-Encoding: quoted-printable =46rom de5655662415acb600f9074c6efe70d3949ac21e Mon Sep 17 00:00:00 2001 =46rom: "B. Wilson" =44ate: Thu, 14 Sep 2023 14:26:49 +0900 =53ubject: [PATCH] gnu: Add smithforth. =0A* gnu/packages/forth (smithforth): New variable. =2D-- =20gnu/packages/forth.scm | 60 +++++++++++++++++++++++++++++++++++++++--- =201 file changed, 57 insertions(+), 3 deletions(-) =0Adiff --git a/gnu/packages/forth.scm b/gnu/packages/forth.scm =69ndex 8cb6ac8391..6e8d8cdc4c 100644 =2D-- a/gnu/packages/forth.scm =2B++ b/gnu/packages/forth.scm =40@ -1,6 +1,7 @@ =20;;; GNU Guix --- Functional package management for GNU =20;;; Copyright =C2=A9 2016 Nikita =20;;; Copyright =C2=A9 2016 Sou Bunnbu =2B;;; Copyright =C2=A9 2023 B. Wilson =20;;; =20;;; This file is part of GNU Guix. =20;;; =40@ -18,11 +19,14 @@ =20;;; along with GNU Guix. If not, see . =20= =20(define-module (gnu packages forth) =2B #:use-module (guix build-system gnu) =2B #:use-module (guix build-system trivial) =2B #:use-module (guix download) =2B #:use-module (guix gexp) =20 #:use-module ((guix licenses) #:prefix license:) =20 #:use-module (guix packages) =2D #:use-module (guix download) =2D #:use-module (guix build-system gnu) =2D #:use-module (gnu packages m4)) =2B #:use-module (gnu packages m4) =2B #:use-module (gnu packages vim)) =20= =20(define-public gforth =20 (package =40@ -58,3 +62,53 @@ (define-public gforth =20included.") =20 (home-page "https://www.gnu.org/software/gforth/") =20 (license license:gpl3+))) =2B =2B(define-public smithforth =2B (package =2B (name "smithforth") =2B (version "220711") =2B (source =2B (origin =2B (method url-fetch) =2B (uri (string-append "https://dacvs.neocities.org/SF/SForth" =2B version "dmp.txt")) =2B (sha256 =2B (base32 "0a39pv7529llsa3f48fmvwvlcp3f9v8qkn5ziw2l6kxf0qvli3lm"= =29))) =2B (build-system trivial-build-system) =2B (native-inputs (list xxd)) =2B (arguments =2B (list =2B #:modules '((guix build utils)) =2B #:builder =2B #~(begin =2B (use-modules (guix build utils) =2B (ice-9 textual-ports)) =2B (let* ((sforth.dmp #$(package-source this-package)) =2B (system.fs #$(origin =2B (method url-fetch) =2B (uri (string-append =2B "https://dacvs.neocities.org/S= =46/system" =2B version "fs.txt")) =2B (sha256 =2B (base32 =2B "17v1pp64s6n8q8w3kg48nd7zdcx2208y4s= =76r5fpfms5lkyzg7z1m")))) =2B (xxd (string-append (assoc-ref %build-inputs "= =78xd") =2B "/bin/xxd")) =2B (bin (string-append (assoc-ref %outputs "out")= =20"/bin"))) =2B (copy-file sforth.dmp "sforth.dmp") =2B (substitute* "sforth.dmp" (("#.*$") "\n")) =2B (with-output-to-file "sforth" =2B (lambda _ =2B (invoke xxd "-p" "-r" "sforth.dmp") =2B (call-with-input-file system.fs =2B (lambda (port) (display (get-string-all port))))) =2B #:binary #t) =2B (chmod "sforth" #o755) =2B (install-file "sforth" bin))))) =2B (home-page "https://dacvs.neocities.org/SF/") =2B (synopsis "Forth programming language for x86-64 desktop computers")= =0A+ (description "SmithForth is an implementation of the Forth programm= =69ng =2Blanguage for x86-64 desktop computers. SmithForth is a text interpreter = =74hat =2Bruns in a Linux text console.") =2B (supported-systems '("x86_64-linux")) =2B (license license:expat-0))) =0Abase-commit: 2afa9353a0f69dabf4ddec54b58b60308092c794 =2D-=20 =32.41.0 =0A= ------_=_70f50a680cdc52d667ad691c_=_-- From unknown Fri Aug 15 21:21:13 2025 MIME-Version: 1.0 X-Mailer: MIME-tools 5.505 (Entity 5.505) X-Loop: help-debbugs@gnu.org From: help-debbugs@gnu.org (GNU bug Tracking System) To: "B. Wilson" Subject: bug#65934: closed (Re: bug#65934: [PATCH] gnu: Add smithforth.) Message-ID: References: <87leccx0a9.fsf_-_@gnu.org> <20230914052721.27820-1-elaexuotee@wilsonb.com> X-Gnu-PR-Message: they-closed 65934 X-Gnu-PR-Package: guix-patches X-Gnu-PR-Keywords: patch Reply-To: 65934@debbugs.gnu.org Date: Sun, 08 Oct 2023 21:39:02 +0000 Content-Type: multipart/mixed; boundary="----------=_1696801142-20362-1" This is a multi-part message in MIME format... ------------=_1696801142-20362-1 Content-Disposition: inline Content-Transfer-Encoding: quoted-printable Content-Type: text/plain; charset="utf-8" Your bug report #65934: [PATCH] gnu: Add smithforth. which was filed against the guix-patches package, has been closed. The explanation is attached below, along with your original report. If you require more details, please reply to 65934@debbugs.gnu.org. --=20 65934: https://debbugs.gnu.org/cgi/bugreport.cgi?bug=3D65934 GNU Bug Tracking System Contact help-debbugs@gnu.org with problems ------------=_1696801142-20362-1 Content-Type: message/rfc822 Content-Disposition: inline Content-Transfer-Encoding: 7bit Received: (at 65934-done) by debbugs.gnu.org; 8 Oct 2023 21:38:53 +0000 Received: from localhost ([127.0.0.1]:58818 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1qpbUD-0005I3-6f for submit@debbugs.gnu.org; Sun, 08 Oct 2023 17:38:53 -0400 Received: from eggs.gnu.org ([2001:470:142:3::10]:36850) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1qpbUB-0005Hn-5m for 65934-done@debbugs.gnu.org; Sun, 08 Oct 2023 17:38:51 -0400 Received: from fencepost.gnu.org ([2001:470:142:3::e]) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_256_GCM_SHA384:256) (Exim 4.90_1) (envelope-from ) id 1qpbTk-0006lw-Oj; Sun, 08 Oct 2023 17:38:25 -0400 DKIM-Signature: v=1; a=rsa-sha256; q=dns/txt; c=relaxed/relaxed; d=gnu.org; s=fencepost-gnu-org; h=MIME-Version:Date:References:In-Reply-To:Subject:To: From; bh=knzI6qJFooez7H2eCdrBU/4tfBEKTy/oQEOuZvA3ww8=; b=VvT13Y0YGGZp5yP/AUaL Ng9GMk/yV9oOFPIqMLHgFEFgzWyTC36E050QdsS2ZISQ2cQgGxWcQgr1G2K5YenmpYhWmZdzSRgSh 8aXE1b+0qcUdAcOzA6ld/T5sL1kUFHwPhbKlyHRuMEgBGDg2C/r+Zzjy+XRhSuN/2rYvyhKaHExqn 3X0PEWf22Hlpe2saf3wqZrcfW9q46ShEYpMH3n/XCP+iYZkCWrOlj9sTw0VyysUhl+XdJCpH6XjcP LcmMnPjUDSaorPt1HFyQDLQjF+vRFfpwgDV6Orq5GmXGjcKMti5o3CwZsFgQfUUf2x7yebe+g4UE9 mlP4Z9Ebo4n9+w==; From: =?utf-8?Q?Ludovic_Court=C3=A8s?= To: "B. Wilson" Subject: Re: bug#65934: [PATCH] gnu: Add smithforth. In-Reply-To: <3NL1U5UBSLFFK.2486N8UEFYJ8E@wilsonb.com> (B. Wilson's message of "Fri, 06 Oct 2023 00:01:51 +0900") References: <20230914052721.27820-1-elaexuotee@wilsonb.com> <87wmw16xtq.fsf@gnu.org> <3NL1U5UBSLFFK.2486N8UEFYJ8E@wilsonb.com> Date: Sun, 08 Oct 2023 23:38:22 +0200 Message-ID: <87leccx0a9.fsf_-_@gnu.org> User-Agent: Gnus/5.13 (Gnus v5.13) MIME-Version: 1.0 Content-Type: text/plain; charset=utf-8 Content-Transfer-Encoding: quoted-printable X-Spam-Score: -2.3 (--) X-Debbugs-Envelope-To: 65934-done Cc: 65934-done@debbugs.gnu.org X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: debbugs-submit-bounces@debbugs.gnu.org Sender: "Debbugs-submit" X-Spam-Score: -3.3 (---) Hi, "B. Wilson" skribis: > From de5655662415acb600f9074c6efe70d3949ac21e Mon Sep 17 00:00:00 2001 > From: "B. Wilson" > Date: Thu, 14 Sep 2023 14:26:49 +0900 > Subject: [PATCH] gnu: Add smithforth. > > * gnu/packages/forth (smithforth): New variable. Applied, thanks! Ludo=E2=80=99. ------------=_1696801142-20362-1 Content-Type: message/rfc822 Content-Disposition: inline Content-Transfer-Encoding: 7bit Received: (at submit) by debbugs.gnu.org; 14 Sep 2023 05:27:49 +0000 Received: from localhost ([127.0.0.1]:36520 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1qgetJ-0001Gk-C2 for submit@debbugs.gnu.org; Thu, 14 Sep 2023 01:27:49 -0400 Received: from lists.gnu.org ([2001:470:142::17]:51348) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1qgetE-0001GU-R7 for submit@debbugs.gnu.org; Thu, 14 Sep 2023 01:27:48 -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 1qget3-0002wW-5I for guix-patches@gnu.org; Thu, 14 Sep 2023 01:27:33 -0400 Received: from m42-5.mailgun.net ([69.72.42.5]) by eggs.gnu.org with esmtps (TLS1.2:ECDHE_RSA_AES_128_GCM_SHA256:128) (Exim 4.90_1) (envelope-from ) id 1qgesy-0004bw-7w for guix-patches@gnu.org; Thu, 14 Sep 2023 01:27:31 -0400 DKIM-Signature: a=rsa-sha256; v=1; c=relaxed/relaxed; d=mg.wilsonb.com; q=dns/txt; s=krs; t=1694669247; x=1694676447; h=Content-Transfer-Encoding: Content-Type: MIME-Version: Message-ID: Date: Subject: Subject: Cc: To: To: From: From: Sender: Sender; bh=iO4KZvNCcF8REEHV4RznrmbW8Bq4+YcorJmpKrDulYc=; b=48mNlapRQ0J3K0xoBam2rRVppFWtOCtDtsIPJbRqqHsDUkQ9GXJCb172NP6IoMErQ+8XMhPYNwv6U9AX7e/p8kb1R9V7P6bv674NN7hnwhWFw6YGXL01jvkc4dKH1sk5wdfKnt9X4qCauO8jUYhn3GfRu1aHsgF1+f4qYYqBQOo06GXpChuU3D+kdujPOAvQ32/VpVdCZSV2kRBpJcXxcG2cqEFc4uyi3RDOK1dcb8ouVR6yI+d+q7kWlgdJ95+Vcxzm2/4gykK1xeajYMZO3KECJrFLCJs5p7r/uImAs7D0jQcdVoFReoNcHZszmmvlldFdcRxpRyGYOBiHBgqZ1w== X-Mailgun-Sending-Ip: 69.72.42.5 X-Mailgun-Sid: WyI5MmEzMyIsImd1aXgtcGF0Y2hlc0BnbnUub3JnIiwiMDg1NDdhIl0= Received: from wilsonb.com (wilsonb.com [104.199.203.42]) by ffcf8ad72342 with SMTP id 650299bfb39ab82ace084c6d (version=TLS1.3, cipher=TLS_AES_128_GCM_SHA256); Thu, 14 Sep 2023 05:27:27 GMT Received: from localhost (199.147.145.153.ap.dti.ne.jp [153.145.147.199]) by wilsonb.com (Postfix) with ESMTPSA id 1B8CEA0586; Thu, 14 Sep 2023 05:27:24 +0000 (UTC) DKIM-Signature: v=1; a=rsa-sha256; c=relaxed/relaxed; d=wilsonb.com; s=201703; t=1694669244; bh=iO4KZvNCcF8REEHV4RznrmbW8Bq4+YcorJmpKrDulYc=; h=From:To:Cc:Subject:Date:From; b=9BatndNMQTPz+IiRMBPIn8Rb1ct/E0VVopc8RheUXtH+8spmX9Y54e9rUkNQd2ipL Rl2xfUV/AfCW4VqVMXAJJ3WkX4xYdSCMQTXhyBAh4pNHt7nSgb8yJZpZe29UK7qAwB fDJim3VIF4ZhMnHfMakJSYmjoOitx35LXI9IGWEqBAFITI8L/z0Soy0oAlUIGxgSX9 slklK+Hl4bLIe7KtmL5gKEAoiQIJ76PTrwt4gVTa5tBEkqO33s4r0KHJjaZP0N18ai SCO7qvNHB/R3gU+khwmLpcj8JuXC7l4gHkH9DQ2o4nBCBT5NrN3l5gZo4k8xXHQ8rp rnswsSrEQ0DPanWReFXeJPwZgEKolnPLNyb8Rpo5GVpQ9RwBcK6+X12smHbK4HvWWt Rr/V2CPmOt4MM20WnyzLj633vY/a/vbk2cS8OhmW+lFcr8kiXxluPE5fHWzVd5vjLM g67FQSQOFuCQIsVKBJdY3uy2CRq+em4id3Of23jTfO1KFfS5Wo+DbfzGAgjUulKzU1 nMPl9/IBpAVVYDMbhC6z7kv0CwkT+ZGM2+YVN+CqvNGRXZolHs5h3rLB7LB56C8UKw 2/k4RC5rVo2Vell+3fXYsJN/x/aiWPUS6zSRnINyy12SkcmwAU0N2sLi+TBp28S2/z cDG+M2G9+p/IiBfrQLhjAS7c= From: "B. Wilson" To: guix-patches@gnu.org Subject: [PATCH] gnu: Add smithforth. Date: Thu, 14 Sep 2023 14:27:09 +0900 Message-ID: <20230914052721.27820-1-elaexuotee@wilsonb.com> X-Mailer: git-send-email 2.41.0 MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit Received-SPF: pass client-ip=69.72.42.5; envelope-from=bounce+686de0.08547a-guix-patches=gnu.org@mg.wilsonb.com; helo=m42-5.mailgun.net X-Spam_score_int: -7 X-Spam_score: -0.8 X-Spam_bar: / X-Spam_report: (-0.8 / 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_BL_SPAMCOP_NET=1.347, RCVD_IN_DNSWL_NONE=-0.0001, RCVD_IN_MSPIKE_H4=0.001, RCVD_IN_MSPIKE_WL=0.001, SPF_HELO_NONE=0.001, SPF_PASS=-0.001 autolearn=no autolearn_force=no X-Spam_action: no action X-Spam-Score: 2.2 (++) X-Spam-Report: Spam detection software, running on the system "debbugs.gnu.org", has NOT identified this incoming email as spam. The original message has been attached to this so you can view it or label similar future email. If you have any questions, see the administrator of that system for details. Content preview: * gnu/packages/forth (smithforth): New variable. --- gnu/packages/forth.scm | 55 +++++++++++++++++++++++++++++++++++++++++- 1 file changed, 54 insertions(+), 1 deletion(-) diff --git a/gnu/packages/forth.scm b/gnu/packages/forth.scm index 8cb6ac8391..9910243ac1 100644 --- a/gnu/packages/forth.scm +++ b/gnu/packages/forth.scm @@ -1,6 +1,7 @@ ;;; GNU Guix --- Functional p [...] Content analysis details: (2.2 points, 10.0 required) pts rule name description ---- ---------------------- -------------------------------------------------- 1.2 RCVD_IN_BL_SPAMCOP_NET RBL: Received via a relay in bl.spamcop.net [Blocked - see ] -0.0 SPF_HELO_PASS SPF: HELO matches SPF record 1.0 SPF_SOFTFAIL SPF: sender does not match SPF record (softfail) X-Debbugs-Envelope-To: submit Cc: "B. Wilson" X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list List-Id: List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: debbugs-submit-bounces@debbugs.gnu.org Sender: "Debbugs-submit" X-Spam-Score: 1.2 (+) X-Spam-Report: Spam detection software, running on the system "debbugs.gnu.org", has NOT identified this incoming email as spam. The original message has been attached to this so you can view it or label similar future email. If you have any questions, see the administrator of that system for details. Content preview: * gnu/packages/forth (smithforth): New variable. --- gnu/packages/forth.scm | 55 +++++++++++++++++++++++++++++++++++++++++- 1 file changed, 54 insertions(+), 1 deletion(-) diff --git a/gnu/packages/forth.scm b/gnu/packages/forth.scm index 8cb6ac8391..9910243ac1 100644 --- a/gnu/packages/forth.scm +++ b/gnu/packages/forth.scm @@ -1,6 +1,7 @@ ;;; GNU Guix --- Functional p [...] Content analysis details: (1.2 points, 10.0 required) pts rule name description ---- ---------------------- -------------------------------------------------- 1.2 RCVD_IN_BL_SPAMCOP_NET RBL: Received via a relay in bl.spamcop.net [Blocked - see ] -0.0 SPF_HELO_PASS SPF: HELO matches SPF record 1.0 SPF_SOFTFAIL SPF: sender does not match SPF record (softfail) -1.0 MAILING_LIST_MULTI Multiple indicators imply a widely-seen list manager * gnu/packages/forth (smithforth): New variable. --- gnu/packages/forth.scm | 55 +++++++++++++++++++++++++++++++++++++++++- 1 file changed, 54 insertions(+), 1 deletion(-) diff --git a/gnu/packages/forth.scm b/gnu/packages/forth.scm index 8cb6ac8391..9910243ac1 100644 --- a/gnu/packages/forth.scm +++ b/gnu/packages/forth.scm @@ -1,6 +1,7 @@ ;;; GNU Guix --- Functional package management for GNU ;;; Copyright © 2016 Nikita ;;; Copyright © 2016 Sou Bunnbu +;;; Copyright © 2023 B. Wilson ;;; ;;; This file is part of GNU Guix. ;;; @@ -22,7 +23,9 @@ (define-module (gnu packages forth) #:use-module (guix packages) #:use-module (guix download) #:use-module (guix build-system gnu) - #:use-module (gnu packages m4)) + #:use-module (guix build-system trivial) + #:use-module (gnu packages m4) + #:use-module (gnu packages vim)) (define-public gforth (package @@ -58,3 +61,53 @@ (define-public gforth included.") (home-page "https://www.gnu.org/software/gforth/") (license license:gpl3+))) + +(define-public smithforth + (package + (name "smithforth") + (version "220711") + (source + (origin + (method url-fetch) + (uri (string-append "https://dacvs.neocities.org/SF/SForth" + version "dmp.txt")) + (sha256 + (base32 "0a39pv7529llsa3f48fmvwvlcp3f9v8qkn5ziw2l6kxf0qvli3lm")))) + (build-system trivial-build-system) + (inputs + `(("system.fs" + ,(origin + (method url-fetch) + (uri (string-append "https://dacvs.neocities.org/SF/system" + version "fs.txt")) + (sha256 + (base32 + "17v1pp64s6n8q8w3kg48nd7zdcx2208y4svr5fpfms5lkyzg7z1m")))))) + (native-inputs (list xxd)) + (arguments + `(#:modules ((guix build utils)) + #:builder + (begin + (use-modules (guix build utils) + (ice-9 textual-ports)) + (let* ((sforth.dmp (assoc-ref %build-inputs "source")) + (system.fs (assoc-ref %build-inputs "system.fs")) + (xxd (string-append (assoc-ref %build-inputs "xxd") + "/bin/xxd")) + (bin (string-append (assoc-ref %outputs "out") "/bin"))) + (copy-file sforth.dmp "sforth.dmp") + (substitute* "sforth.dmp" (("#.*$") "\n")) + (with-output-to-file "sforth" + (lambda _ + (invoke xxd "-p" "-r" "sforth.dmp") + (call-with-input-file system.fs + (lambda (port) (display (get-string-all port))))) + #:binary #t) + (chmod "sforth" #o755) + (install-file "sforth" bin))))) + (home-page "https://dacvs.neocities.org/SF/") + (synopsis "Forth programming language for x86-64 desktop computers") + (description "SmithForth is an implementation of the Forth programming +language for x86-64 desktop computers. SmithForth is a text interpreter that +runs in a Linux text console.") + (license license:expat-0))) -- 2.41.0 ------------=_1696801142-20362-1--