shunit2 package

1 files changed, 47 insertions, 0 deletions

diff --git a/gn/packages/shell.scm b/gn/packages/shell.scm
new file mode 100644
index 0000000..185ac17
--- /dev/null
+++ b/gn/packages/shell.scm
@@ -0,0 +1,47 @@
+(define-module (gn packages shell)
+  #:use-module (guix packages)
+  #:use-module (guix download)
+  #:use-module (guix build-system gnu)
+  #:use-module (gnu packages)
+  #:use-module (guix git-download)
+  #:use-module ((guix licenses) #:prefix license:)
+  )
+
+(define-public shunit2
+  (let ((commit "60dd60bcd1573befe38465010263ab242e55811d"))
+    (package
+      (name "shunit2")
+      (version (string-append "2.1.7-" (string-take commit 7)))
+      (source (origin
+        (method git-fetch)
+        (uri (git-reference
+          (url "https://github.com/kward/shunit2.git")
+          (commit commit)))
+        (file-name (string-append name "-" version "-checkout"))
+        (sha256
+         (base32 "11savxc6qliqv25kv59qak6j7syjv95hbpmq1szn1mzn32g2gc25"))))
+      (build-system gnu-build-system)
+      (arguments
+       `(
+         #:tests? #f ;; no tests-suite
+         #:phases
+         (modify-phases %standard-phases
+                        (delete 'configure)
+                        (delete 'build)
+                        (replace 'install
+                                 (lambda* (#:key outputs #:allow-other-keys)
+                                   (let* ((out (assoc-ref outputs "out"))
+                                          (bin (string-append out "/bin")))
+                                     (write (string-append "****************" bin))
+                                     (copy-file "2.1/src/shunit2" (string-append bin "/shunit2"))
+                                     #t
+                                          ))))
+           ))
+      (home-page "https://code.google.com/archive/p/shunit2/")
+      (synopsis "xUnit based unit testing for Unix shell scripts")
+      (description
+       "shUnit2 is a xUnit unit test framework for Bourne based shell
+scripts, and it is designed to work in a similar manner to JUnit,
+PyUnit, etc. If you have ever had the desire to write a unit test for
+a shell script, shUnit2 can do the job.")
+      (license license:lgpl2.0))))