bug#68305: closed ([PATCH] gnu: Add guile-srfi-197.)

[GNU bug Tracking System]

Your message dated Sat, 13 Jan 2024 10:40:48 +0100
with message-id <87zfx9h8pr.fsf@gnu.org>
and subject line Re: [bug#68305] [PATCH v2] gnu: Add guile-srfi-197.
has caused the debbugs.gnu.org bug report #68305,
regarding [PATCH] gnu: Add guile-srfi-197.
to be marked as done.

(If you believe you have received this mail in error, please contact
help-debbugs@gnu.org.)


-- 
68305: https://debbugs.gnu.org/cgi/bugreport.cgi?bug=68305
GNU Bug Tracking System
Contact help-debbugs@gnu.org with problems
> --- Begin Message ---
>
>
>
> Subject: 
>
> [PATCH] gnu: Add guile-srfi-197.
>
>
>
>
> Date: 
>
> Sun,  7 Jan 2024 16:09:44 +0100
>
>
>
>
> * gnu/packages/guile-xyz.scm (guile-srfi-197): New variable.
>
> Change-Id: Ifcdc264e6a03e88e7614d79792fbe6ca9c8e519c
> ---
>  gnu/packages/guile-xyz.scm | 56 ++++++++++++++++++++++++++++++++++++++
>  1 file changed, 56 insertions(+)
>
> diff --git a/gnu/packages/guile-xyz.scm b/gnu/packages/guile-xyz.scm
> index 75e3754046..ff3104a407 100644
> --- a/gnu/packages/guile-xyz.scm
> +++ b/gnu/packages/guile-xyz.scm
> @@ -3840,6 +3840,62 @@ (define-public guile-srfi-189
>  or errors (Left).")
>        (license license:expat))))
>  
> +(define-public guile-srfi-197
> +  (let ((commit "d31b8be86460bf837cccf2737a1b9b9c01788573")
> +        (revision "0"))
> +    (package
> +      (name "guile-srfi-197")
> +      (version (git-version "0" revision commit))
> +      (source
> +       (origin
> +         (method git-fetch)
> +         (uri (git-reference
> +               (url 
> "https://github.com/scheme-requests-for-implementation/srfi-197";)
> +               (commit commit)))
> +         (sha256
> +          (base32
> +           "1c1jjzqgavjwfzs352wssdbjga5ymv4g3lkl0zxhjw7pfrr5xx1m"))
> +         (file-name (git-file-name name version))))
> +      (build-system guile-build-system)
> +      (arguments
> +       (list
> +        #:source-directory "src"
> +        #:phases
> +        #~(modify-phases %standard-phases
> +            (add-after 'unpack 'create-module
> +              (λ _
> +                (use-modules (ice-9 textual-ports))
> +                (mkdir-p "src/srfi")
> +                (call-with-output-file "src/srfi/srfi-197.scm"
> +                  (λ (port)
> +                    (write '(define-module (srfi srfi-197)
> +                              #:use-module (scheme base)
> +                              #:export (chain
> +                                        chain-and
> +                                        chain-when
> +                                        chain-lambda
> +                                        nest
> +                                        nest-reverse))
> +                           port)
> +                    (call-with-input-file "srfi-197-syntax-case.scm"
> +                      (λ (in-port)
> +                        (display (get-string-all in-port) port)))))))
> +            (add-after 'install 'check-installed
> +              (λ _
> +                (define-values (scm go) (target-guile-scm+go #$output))
> +                (invoke "guile" "-L" scm "-C" go
> +                        "--use-srfi=197" "./test.scm"))))))
> +      (native-inputs
> +       (list guile-3.0))
> +      (home-page "https://srfi.schemers.org/srfi-197/";)
> +      (synopsis "Pipeline operators for Guile")
> +      (description
> +       "This library provides a reference implementation for SRFI-197.  This
> +SRFI defines a family of chain and nest pipeline operators, which can rewrite
> +nested expressions like (a b (c d (e f g))) as a sequence of operations:
> +(chain g (e f _) (c d _) (a b _)).")
> +      (license license:expat))))
> +
>  (define-public guile-srfi-232
>    (package
>      (name "guile-srfi-232")
>
> base-commit: b212e6934643e085f168a5364cb593f61aa616ba
> -- 
> 2.41.0
>
>
>
>
> --- End Message ---
> --- Begin Message ---
>
>
>
> Subject: 
>
> Re: [bug#68305] [PATCH v2] gnu: Add guile-srfi-197.
>
>
>
>
> Date: 
>
> Sat, 13 Jan 2024 10:40:48 +0100
>
>
>
>
> User-agent: 
>
> Gnus/5.13 (Gnus v5.13)
>
>
>
>
> > * gnu/packages/guile-xyz.scm (guile-srfi-197): New variable.
>
> Applied, thanks!
>
> Mathieu
>
>
> --- End Message ---