guix-devel
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: [PATCH 05/15] gnu: Add chez-matchable.


From: Ludovic Courtès
Subject: Re: [PATCH 05/15] gnu: Add chez-matchable.
Date: Mon, 17 Oct 2016 15:54:40 +0200
User-agent: Gnus/5.13 (Gnus v5.13) Emacs/25.1 (gnu/linux)

Federico Beffa <address@hidden> skribis:

> From 5821d3e41e37df01492141f128a0a09b5e70498f Mon Sep 17 00:00:00 2001
> From: Federico Beffa <address@hidden>
> Date: Sun, 16 Oct 2016 16:08:33 +0200
> Subject: [PATCH 05/15] gnu: Add chez-matchable.
>
> * gnu/packages/chez.scm (chez-matchable): New variable.

[...]

> +;; Help function for Chez Scheme to add the current path to
> +;; CHEZSCHEMELIBDIRS.
> +(define chez-configure
> +  '(lambda _
> +     (let ((chez-env (getenv "CHEZSCHEMELIBDIRS")))
> +       (setenv "CHEZSCHEMELIBDIRS"
> +               (if chez-env
> +                   (string-append ".:" chez-env)
> +                   "."))
> +       #t)))

Would it make sense to define a chez-build-system?

> +;; Help function to define make flags for some Chez Scheme custom make
> +;; files.
> +(define (chez-make-flags name version)
> +  `(let ((out (assoc-ref %outputs "out")))
> +     (list (string-append "PREFIX=" out)
> +           (string-append "DOCDIR=" out "/share/doc/"
> +                          ,name "-" ,version))))
> +
> +(define-public chez-matchable
> +  (package
> +    (name "chez-matchable")
> +    (version "20160306")
> +    (source
> +     (origin
> +       (method url-fetch)
> +       (uri (string-append
> +             "https://github.com/fedeinthemix/chez-matchable/archive";

It’s a good idea to define ‘home-page’ above and reuse it here.

> +    (description "This package provides a superset of the popular
> +Scheme 'match' package by Andrew Wright, written in fully portable
> +'syntax-rules' and thus preserving hygiene.")

@code{match} and @code{syntax-rules}.

Otherwise LGTM, thanks!

Ludo’.



reply via email to

[Prev in Thread] Current Thread [Next in Thread]