GNU bug report logs - #76909
[PATCH] gnu: Add freeforth2.

Previous Next

To add a comment to this bug, you must first unarchive it, by sending
a message to control AT debbugs.gnu.org, with unarchive 76909 in the body.
You can then email your comments to 76909 AT debbugs.gnu.org in the normal way.

Toggle the display of automated, internal messages from the tracker.

Message #5 received at submit <at> debbugs.gnu.org (full text, mbox):

From: iyzsong <at> envs.net
To: guix-patches <at> gnu.org
Cc: 宋文武 <iyzsong <at> member.fsf.org>
Subject: [PATCH] gnu: Add freeforth2.
Date: Mon, 10 Mar 2025 12:19:06 +0800

From: 宋文武 <iyzsong <at> member.fsf.org>

* gnu/packages/forth.scm (freeforth2): New variable.

Change-Id: I7f505a2f6ba9146008061778e582032c95b62298
---
 gnu/packages/forth.scm | 43 +++++++++++++++++++++++++++++++++++++++++-
 1 file changed, 42 insertions(+), 1 deletion(-)

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 <nikita <at> n0.is>
-;;; Copyright © 2016 Sou Bunnbu <iyzsong <at> gmail.com>
+;;; Copyright © 2016, 2025 宋文武 <iyzsong <at> envs.net>
 ;;; Copyright © 2023 B. Wilson <elaexuotee <at> wilsonb.com>
 ;;;
 ;;; 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")

base-commit: 9866d32e173050ba99dc520b0a4d5aacb85e3fa0
-- 
2.48.1

Message #10 received at 76909-done <at> debbugs.gnu.org (full text, mbox):

From: 宋文武 <iyzsong <at> envs.net>
To: 76909-done <at> debbugs.gnu.org
Cc: 宋文武 <iyzsong <at> member.fsf.org>
Subject: Re: [bug#76909] [PATCH] gnu: Add freeforth2.
Date: Tue, 11 Mar 2025 11:05:23 +0800

Pushed, close.

Previous Next

GNU bug tracking system
Copyright (C) 1999 Darren O. Benham, 1997,2003 nCipher Corporation Ltd, 1994-97 Ian Jackson.