all messages for Guix-related lists mirrored at yhetil.org
 help / color / mirror / code / Atom feed
* [bug#71359] [PATCH] gnu: Add unsyntax.
@ 2024-06-04  9:22 Andrew Whatson via Guix-patches via
  2024-07-21  3:00 ` Zheng Junjie
  0 siblings, 1 reply; 4+ messages in thread
From: Andrew Whatson via Guix-patches via @ 2024-06-04  9:22 UTC (permalink / raw)
  To: 71359; +Cc: Andrew Whatson

* 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 <Morgan.J.Smith@outlook.com>
 ;;; Copyright © 2022 jgart <jgart@dismail.de>
 ;;; Copyright © 2022 Robby Zambito <contact@robbyzambito.me>
-;;; Copyright © 2023 Andrew Whatson <whatson@tailcall.au>
+;;; Copyright © 2023, 2024 Andrew Whatson <whatson@tailcall.au>
 ;;; Copyright © 2023 Juliana Sims <juli@incana.org>
 ;;; Copyright © 2023 Maxim Cournoyer <maxim.cournoyer@gmail.com>
 ;;; Copyright © 2024 Skylar Hill <stellarskylark@posteo.net>
@@ -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






^ permalink raw reply related	[flat|nested] 4+ messages in thread

* [bug#71359] [PATCH] gnu: Add unsyntax.
  2024-06-04  9:22 [bug#71359] [PATCH] gnu: Add unsyntax Andrew Whatson via Guix-patches via
@ 2024-07-21  3:00 ` Zheng Junjie
  2024-12-18 17:26   ` Ludovic Courtès
  0 siblings, 1 reply; 4+ messages in thread
From: Zheng Junjie @ 2024-07-21  3:00 UTC (permalink / raw)
  To: 71359; +Cc: whatson

[-- Attachment #1: Type: text/plain, Size: 5343 bytes --]

Andrew Whatson via Guix-patches via <guix-patches@gnu.org> writes:

> * 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 <Morgan.J.Smith@outlook.com>
>  ;;; Copyright © 2022 jgart <jgart@dismail.de>
>  ;;; Copyright © 2022 Robby Zambito <contact@robbyzambito.me>
> -;;; Copyright © 2023 Andrew Whatson <whatson@tailcall.au>
> +;;; Copyright © 2023, 2024 Andrew Whatson <whatson@tailcall.au>
>  ;;; Copyright © 2023 Juliana Sims <juli@incana.org>
>  ;;; Copyright © 2023 Maxim Cournoyer <maxim.cournoyer@gmail.com>
>  ;;; Copyright © 2024 Skylar Hill <stellarskylark@posteo.net>
> @@ -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")

HOME-PAGE should move before SYNOPSIS.

> +      (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))

why must add chibi-scheme to propagated-inputs? If necessary, please add a comment to indicate this

> +      (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

[-- Attachment #2: signature.asc --]
[-- Type: application/pgp-signature, Size: 832 bytes --]

^ permalink raw reply	[flat|nested] 4+ messages in thread

* [bug#71359] [PATCH] gnu: Add unsyntax.
  2024-07-21  3:00 ` Zheng Junjie
@ 2024-12-18 17:26   ` Ludovic Courtès
  2024-12-30  4:13     ` Andrew Whatson via Guix-patches via
  0 siblings, 1 reply; 4+ messages in thread
From: Ludovic Courtès @ 2024-12-18 17:26 UTC (permalink / raw)
  To: whatson; +Cc: Zheng Junjie, 71359

Hi Andrew,

Friendly reminder that we’re awaiting feedback from you on this patch.

  https://issues.guix.gnu.org/71359

Ludo’.

Zheng Junjie <zhengjunjie@iscas.ac.cn> skribis:

> Andrew Whatson via Guix-patches via <guix-patches@gnu.org> writes:
>
>> * 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 <Morgan.J.Smith@outlook.com>
>>  ;;; Copyright © 2022 jgart <jgart@dismail.de>
>>  ;;; Copyright © 2022 Robby Zambito <contact@robbyzambito.me>
>> -;;; Copyright © 2023 Andrew Whatson <whatson@tailcall.au>
>> +;;; Copyright © 2023, 2024 Andrew Whatson <whatson@tailcall.au>
>>  ;;; Copyright © 2023 Juliana Sims <juli@incana.org>
>>  ;;; Copyright © 2023 Maxim Cournoyer <maxim.cournoyer@gmail.com>
>>  ;;; Copyright © 2024 Skylar Hill <stellarskylark@posteo.net>
>> @@ -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")
>
> HOME-PAGE should move before SYNOPSIS.
>
>> +      (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))
>
> why must add chibi-scheme to propagated-inputs? If necessary, please add a comment to indicate this
>
>> +      (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




^ permalink raw reply	[flat|nested] 4+ messages in thread

* [bug#71359] [PATCH] gnu: Add unsyntax.
  2024-12-18 17:26   ` Ludovic Courtès
@ 2024-12-30  4:13     ` Andrew Whatson via Guix-patches via
  0 siblings, 0 replies; 4+ messages in thread
From: Andrew Whatson via Guix-patches via @ 2024-12-30  4:13 UTC (permalink / raw)
  To: Ludovic Courtès, Zheng Junjie; +Cc: 71359

[-- Attachment #1: Type: text/plain, Size: 690 bytes --]

On 19/12/24 03:26, Ludovic Courtès wrote:
> 
> Friendly reminder that we’re awaiting feedback from you on this
> patch.
> 
> https://issues.guix.gnu.org/71359

Thanks & apologies!  A revised patch is attached, and feedback addressed
below.

> Zheng Junjie <zhengjunjie@iscas.ac.cn> skribis:
> 
>> HOME-PAGE should move before SYNOPSIS.

Done.

>> why must add chibi-scheme to propagated-inputs? If necessary,
>> please add a comment to indicate this

Unsyntax was installing scripts invoking "chibi-scheme" instead of an
absolute path, making it a propagated input was a quick-and-dirty
solution.  The latest version patches these properly, so chibi-scheme
doesn't need to be propagated.

[-- Attachment #2: 0001-gnu-Add-unsyntax-v2.patch --]
[-- Type: text/x-patch, Size: 5695 bytes --]

From efb0b0c166c67c04604db3ae8973c4b98eca6f63 Mon Sep 17 00:00:00 2001
Message-ID: <efb0b0c166c67c04604db3ae8973c4b98eca6f63.1735531500.git.whatson@tailcall.au>
From: Andrew Whatson <whatson@tailcall.au>
Date: Mon, 30 Dec 2024 14:04:24 +1000
Subject: [PATCH] gnu: Add unsyntax.

* gnu/packages/scheme.scm (unsyntax): New variable.

Change-Id: Ieda13177e5ce1d58e569cf417192231b4aa3cfe7
---
 gnu/packages/scheme.scm | 68 ++++++++++++++++++++++++++++++++++++++++-
 1 file changed, 67 insertions(+), 1 deletion(-)

diff --git a/gnu/packages/scheme.scm b/gnu/packages/scheme.scm
index 490a09aa1c..a8647a53cc 100644
--- a/gnu/packages/scheme.scm
+++ b/gnu/packages/scheme.scm
@@ -20,7 +20,7 @@
 ;;; Copyright © 2022 Morgan Smith <Morgan.J.Smith@outlook.com>
 ;;; Copyright © 2022 jgart <jgart@dismail.de>
 ;;; Copyright © 2022 Robby Zambito <contact@robbyzambito.me>
-;;; Copyright © 2023 Andrew Whatson <whatson@tailcall.au>
+;;; Copyright © 2023, 2024 Andrew Whatson <whatson@tailcall.au>
 ;;; Copyright © 2023, 2024 Juliana Sims <juli@incana.org>
 ;;; Copyright © 2023 Maxim Cournoyer <maxim.cournoyer@gmail.com>
 ;;; Copyright © 2024 Skylar Hill <stellarskylark@posteo.net>
@@ -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)
@@ -82,16 +83,19 @@ (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 readline)
   #: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))
@@ -620,6 +624,68 @@ (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))
+      (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)))))
+                 (add-before 'configure 'patch-exec-paths
+                   (lambda _
+                     ;; Fix hard-coded references to chibi-scheme, using the
+                     ;; configured interpreter path instead.  This avoids the need
+                     ;; for chibi-scheme as a propagated input.
+                     (substitute* '("src/compile-unsyntax.in"
+                                    "src/expand-unsyntax.in"
+                                    "src/unsyntax-scheme.in")
+                       (("chibi-scheme") "'@CHIBI_SCHEME@'")))))))
+      (native-inputs
+       (list autoconf automake libtool git gnulib help2man perl texinfo))
+      (inputs
+       (list chibi-scheme))
+      (home-page "https://www.unsyntax.org")
+      (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: 78ff8320809723de9c22e106e1b998d7e53279ff
-- 
2.47.1


^ permalink raw reply related	[flat|nested] 4+ messages in thread

end of thread, other threads:[~2024-12-30  4:15 UTC | newest]

Thread overview: 4+ messages (download: mbox.gz follow: Atom feed
-- links below jump to the message on this page --
2024-06-04  9:22 [bug#71359] [PATCH] gnu: Add unsyntax Andrew Whatson via Guix-patches via
2024-07-21  3:00 ` Zheng Junjie
2024-12-18 17:26   ` Ludovic Courtès
2024-12-30  4:13     ` Andrew Whatson via Guix-patches via

Code repositories for project(s) associated with this external index

	https://git.savannah.gnu.org/cgit/guix.git

This is an external index of several public inboxes,
see mirroring instructions on how to clone and mirror
all data and code used by this external index.