On Tue, Mar 12, 2019 at 10:19:51PM +0200, Efraim Flashner wrote:
> * gnu/packages/perl6.scm (nqp): New variable.
> ---
>  gnu/packages/perl6.scm | 68 ++++++++++++++++++++++++++++++++++++++++++
>  1 file changed, 68 insertions(+)
> 
> diff --git a/gnu/packages/perl6.scm b/gnu/packages/perl6.scm
> index 7e92c865aa..344bb4efda 100644
> --- a/gnu/packages/perl6.scm
> +++ b/gnu/packages/perl6.scm
> @@ -19,6 +19,7 @@
>  (define-module (gnu packages perl6)
>    #:use-module ((guix licenses) #:prefix license:)
>    #:use-module (guix download)
> +  #:use-module (guix git-download)
>    #:use-module (guix packages)
>    #:use-module (guix build-system perl)
>    #:use-module (gnu packages bdw-gc)
> @@ -91,3 +92,70 @@ exceptions, continuations, runtime loading of code, big integers and interfacing
>  with native libraries.
>  @end itemize")
>      (license license:artistic2.0)))
> +
> +(define-public nqp
> +  (package
> +    (name "nqp")
> +    (version "2018.12")
> +    (source
> +      (origin
> +        (method git-fetch)
> +        (uri (git-reference
> +               (url "https://github.com/perl6/nqp.git")
> +               (commit version)))
> +        (file-name (git-file-name name version))

This should be downloaded from here: https://rakudo.perl6.org/downloads/nqp/

> +        (sha256
> +         (base32
> +          "1bwvyfyhirqi46p0j5m1ri98rxbfks8wc5amiaqwqyqq7x1l25xd"))
> +        (modules '((guix build utils)))
> +        (snippet
> +         '(begin
> +            (delete-file-recursively "3rdparty") #t))))
> +    (build-system perl-build-system)
> +    (arguments
> +     '(#:phases
> +       (modify-phases %standard-phases
> +         (add-after 'patch-source-shebangs 'patch-more-shebangs
> +           (lambda _
> +             (substitute* '("tools/build/install-jvm-runner.pl.in"
> +                            "tools/build/gen-js-cross-runner.pl"
> +                            "tools/build/gen-js-runner.pl"
> +                            "tools/build/install-js-runner.pl"
> +                            "tools/build/install-moar-runner.pl"
> +                            "tools/build/gen-moar-runner.pl"
> +                            "t/nqp/111-spawnprocasync.t"
> +                            "t/nqp/113-run-command.t")
> +               (("/bin/sh") (which "sh")))
> +             #t))
> +         (add-after 'unpack 'patch-source-date
> +           (lambda _
> +             (substitute* "tools/build/gen-version.pl"
> +               (("gmtime") "gmtime(0)"))
> +             #t))
> +         (add-after 'unpack 'remove-failing-test
> +           ;; One subtest fails for unknown reasons

can we delete/skip just the one subtest?

> +           (lambda _
> +             (delete-file "t/nqp/019-file-ops.t")
> +             #t))
> +         (replace 'configure
> +           (lambda* (#:key inputs outputs #:allow-other-keys)
> +             (let ((out  (assoc-ref outputs "out"))
> +                   (moar (assoc-ref inputs "moarvm")))
> +               (invoke "perl" "Configure.pl"
> +                       "--backends=moar"
> +                       "--with-moar" (string-append moar "/bin/moar")
> +                       "--prefix" out)))))))
> +    (inputs
> +     `(("moarvm" ,moarvm)))
> +    (home-page "https://github.com/perl6/nqp")
> +    (synopsis "Not Quite Perl")
> +    (description "This is \"Not Quite Perl\" -- a lightweight Perl 6-like
> +environment for virtual machines.  The key feature of NQP is that it's designed
> +to be a very small environment (as compared with, say, perl6 or Rakudo) and is
> +focused on being a high-level way to create compilers and libraries for virtual
> +machines like MoarVM, the JVM, and others.
> +
> +Unlike a full-fledged implementation of Perl 6, NQP strives to have as small a
> +runtime footprint as it can, while still providing a Perl 6 object model and
> +regular expression engine for the virtual machine.")
> +    (license license:artistic2.0)))
> -- 
> 2.21.0
> 

-- 
Efraim Flashner   <efraim@flashner.co.il>   אפרים פלשנר
GPG key = A28B F40C 3E55 1372 662D  14F7 41AA E7DC CA3D 8351
Confidentiality cannot be guaranteed on emails sent or received unencrypted