gnu: image: Add libdicom.

* gnu/packages/image.scm (libdicom): New variable.

Change-Id: Ia47b559ae381c89235e5779734e72163224d815b
Signed-off-by: Ludovic Courtès <ludo@gnu.org>

gnu/packages/image.scm

@@ -74,6 +74,7 @@
   #:use-module (gnu packages cpp)
   #:use-module (gnu packages curl)
   #:use-module (gnu packages compression)
+  #:use-module (gnu packages datastructures)
   #:use-module (gnu packages documentation)
   #:use-module (gnu packages fontutils)
   #:use-module (gnu packages freedesktop)
@@ -245,6 +246,29 @@ code is Valgrind-clean and unit tested.")
     (home-page "https://sourceforge.net/projects/iqa/")
     (license license:bsd-4)))
 
+(define-public libdicom
+  (package
+    (name "libdicom")
+    (version "1.2.0")
+    (source
+     (origin
+       (method git-fetch)
+       (uri (git-reference
+             (url "https://github.com/ImagingDataCommons/libdicom")
+             (commit (string-append "v" version))))
+       (file-name (git-file-name name version))
+       (sha256
+        (base32 "0l1z8riv7lrw65nswq8lvyvnxn5vc06gydwc96gj3ywb1gcqv831"))))
+    (build-system meson-build-system)
+    (inputs (list check uthash))
+    (native-inputs (list pkg-config))
+    (home-page "https://github.com/ImagingDataCommons/libdicom")
+    (synopsis "C library for reading DICOM files")
+    (description
+     "This package is a C library and a set of command-line tools for reading
+DICOM WSI files.")
+    (license license:expat)))
+
 (define-public libpng
   (package
    (name "libpng")