gnu: rdmd: Update to 2.073.0.

* gnu/packages/ldc.scm (rdmd): Remove local variable "commit".
  [version]: Modify.
  [source]: Modify.

gnu/packages/ldc.scm

@@ -37,45 +37,42 @@
   #:use-module (gnu packages zip))
 
 (define-public rdmd
-  (let ((commit "da0a2e0a379b08294015eec9d531f1e5dd4226f0"))
+  (package
-    (package
+    (name "rdmd")
-      (name "rdmd")
+    (version "2.073.0")
-      (version (string-append "v2.070.0-1." (string-take commit 7)))
+    (source (origin
-      (source (origin
+      (method url-fetch)
-        (method git-fetch)
+      (uri (string-append "https://github.com/dlang/tools/archive/v" version ".tar.gz"))
-        (uri (git-reference
+      (file-name (string-append name "-" version ".tar.gz"))
-              (url "https://github.com/D-Programming-Language/tools.git")
+      (sha256
-              (commit commit)))
+       (base32
-        (file-name (string-append name "-" version "-checkout"))
+        "01if3ivnb7g2myfhymp4d9346s4vmvcl82i1kxfs5iza45almh7v"))))
-        (sha256
+    (build-system gnu-build-system)
-         (base32
+    (arguments
-          "1pcx5lyqzrip86f4vv60x292rpvnwsq2hvl1znm9x9rn68f34m45"))))
+     '(#:phases
-      (build-system gnu-build-system)
+       (modify-phases %standard-phases
-      (arguments
+         (delete 'configure)
-       '(#:phases
+         (delete 'check) ; There is no Makefile, so there's no 'make check'.
-         (modify-phases %standard-phases
+         (replace
-           (delete 'configure)
+          'build
-           (delete 'check) ; There is no Makefile, so there's no 'make check'.
+          (lambda _
-           (replace
+            (zero? (system* "ldc2" "rdmd.d"))))
-            'build
+         (replace
-            (lambda _
+          'install
-              (zero? (system* "ldc2" "rdmd.d"))))
+          (lambda* (#:key outputs #:allow-other-keys)
-           (replace
+            (let ((bin (string-append (assoc-ref outputs "out") "/bin")))
-            'install
+              (install-file "rdmd" bin)))))))
-            (lambda* (#:key outputs #:allow-other-keys)
+    (native-inputs
-              (let ((bin (string-append (assoc-ref outputs "out") "/bin")))
+     `(("ldc" ,ldc)))
-                (install-file "rdmd" bin)))))))
+    (home-page "https://github.com/D-Programming-Language/tools/")
-      (native-inputs
+    (synopsis "Specialized equivalent to 'make' for the D language")
-       `(("ldc" ,ldc)))
+    (description
-      (home-page "https://github.com/D-Programming-Language/tools/")
+     "rdmd is a companion to the dmd compiler that simplifies the typical
-      (synopsis "Specialized equivalent to 'make' for the D language")
-      (description
-       "rdmd is a companion to the dmd compiler that simplifies the typical
 edit-compile-link-run or edit-make-run cycle to a rapid edit-run cycle.  Like
 make and other tools, rdmd uses the relative dates of the files involved to
 minimize the amount of work necessary.  Unlike make, rdmd tracks dependencies
 and freshness without requiring additional information from the user.")
-      (license license:boost1.0))))
+    (license license:boost1.0)))
 
 (define-public ldc-bootstrap
   (package