>From 8808f3abda32feca92ec8e2bb403ba705ef4b7b7 Mon Sep 17 00:00:00 2001
From: Roel Janssen <r...@gnu.org>
Date: Fri, 22 Apr 2016 10:02:37 +0200
Subject: [PATCH] gnu: Add filevercmp.

* gnu/packages/bioinformatics.scm (filevercmp): New variable.
---
 gnu/packages/bioinformatics.scm | 28 ++++++++++++++++++++++++++++
 1 file changed, 28 insertions(+)

diff --git a/gnu/packages/bioinformatics.scm b/gnu/packages/bioinformatics.scm
index ade3f14..c81c3a1 100644
--- a/gnu/packages/bioinformatics.scm
+++ b/gnu/packages/bioinformatics.scm
@@ -5172,3 +5172,31 @@ and other combinatorial configurations.\" G Ehrlich - Journal of the ACM (JACM),
 neural networks.  The example program trains and applies a self-organizing map
 to the input tab-separated data.")
       (license license:gpl3))))
+
+(define-public filevercmp
+  (let ((commit "1a9b779b93d0b244040274794d402106907b71b7"))
+    (package
+      (name "filevercmp")
+      (version (string-append "0-1." (string-take commit 7)))
+      (source (origin
+        (method url-fetch)
+        (uri (string-append "https://github.com/ekg/filevercmp/archive/";
+                            commit ".tar.gz"))
+        (file-name (string-append name "-src.tar.gz"))
+        (sha256
+         (base32 "0yp5jswf5j2pqc6517x277s4s6h1ss99v57kxw9gy0jkfl3yh450"))))
+      (build-system gnu-build-system)
+      (arguments
+       `(#:tests? #f ; There are no tests to run.
+         #:phases
+         (modify-phases %standard-phases
+           (delete 'configure) ; There is no configure phase.
+           (replace 'install
+             (lambda* (#:key outputs #:allow-other-keys)
+               (let ((bin (string-append (assoc-ref outputs "out") "/bin")))
+                 (install-file "filevercmp" bin)))))))
+      (home-page "https://github.com/ekg/filevercmp";)
+      (synopsis "This program compares version strings")
+      (description "This program compares version strings.  It intends to be a
+replacement for strverscmp.")
+      (license license:gpl3+))))
-- 
2.5.5

Ricardo Wurmus writes:

> Roel Janssen <r...@gnu.org> writes:
>
>> From f0cb8c476e902e3351988f7c278b3682837c8cce Mon Sep 17 00:00:00 2001
>> From: Roel Janssen <r...@gnu.org>
>> Date: Tue, 22 Mar 2016 15:47:06 +0100
>> Subject: [PATCH 5/8] gnu: Add filevercmp.
>
>> * gnu/packages/bioinformatics.scm (filevercmp): New variable.
>> ---
>>  gnu/packages/bioinformatics.scm | 28 ++++++++++++++++++++++++++++
>>  1 file changed, 28 insertions(+)
>
>> diff --git a/gnu/packages/bioinformatics.scm 
>> b/gnu/packages/bioinformatics.scm
>> index 0abccbc..261660f 100644
>> --- a/gnu/packages/bioinformatics.scm
>> +++ b/gnu/packages/bioinformatics.scm
>> @@ -4923,3 +4923,31 @@ combinatorial configurations.\" G Ehrlich - Journal 
>> of the ACM (JACM),
>>        (synopsis "Program for managing SOM (Self-Organizing Maps) neural 
>> networks")
>>        (description "Program for managing SOM (Self-Organizing Maps) neural 
>> networks.")
>>        (license license:gpl3))))
>> +
>> +(define-public filevercmp
>> +  (let ((commit "1a9b779b93d0b244040274794d402106907b71b7"))
>> +    (package
>> +      (name "filevercmp")
>> +      (version (string-append "0-1." (string-take commit 7)))
>> +      (source (origin
>> +        (method url-fetch)
>> +        (uri (string-append "https://github.com/ekg/filevercmp/archive/";
>> +                            commit ".tar.gz"))
>> +        (file-name "filevercmp-src.tar.gz")
>
> Is this on purpose?  Or should we use “(string-append name "-" version
> ".tar.gz")” instead?

This is on purpose.  There is no released version.  Therefore I gave it
"version" 0, with a "-1" suffix for Guix, and the first seven characters
of commit hash.

The download link includes the full commit hash.

>> +        (sha256
>> +         (base32 "0yp5jswf5j2pqc6517x277s4s6h1ss99v57kxw9gy0jkfl3yh450"))))
>> +      (build-system gnu-build-system)
>> +      (arguments
>> +       `(#:tests? #f ; There are no tests to run.
>> +         #:phases
>> +         (modify-phases %standard-phases
>> +           (delete 'configure) ; There is no configure phase.
>> +           (replace 'install
>> +             (lambda* (#:key outputs #:allow-other-keys)
>> +               (let ((bin (string-append (assoc-ref outputs "out") "/bin")))
>> +                 (install-file "filevercmp" bin)))))))
>> +      (home-page "https://github.com/ekg/filevercmp";)
>> +      (synopsis "Program to compare version strings")
>> +      (description "A program to compare version strings.  It intends to be 
>> a
>> +replacement for strverscmp.")
>
> Please turn the first sentence fragment into a full sentence.

Done.

Reply via email to