33/137: gnu: Add rust-windows-x86-64-msvc-0.39.

[guix-commits]

efraim pushed a commit to branch rust-team
in repository guix.

commit 8e8537aba029a50f961f05ae28383ca4f7d57f28
Author: Jaeme Sifat <jaeme@runbox.com>
AuthorDate: Mon Oct 30 22:52:12 2023 -0400

    gnu: Add rust-windows-x86-64-msvc-0.39.
    
    This patch also replaces the snippet code with gexps.
    
    * gnu/packages/crates-io.scm (rust-windows-x86-64-msvc-0.39): New variable.
    
    Change-Id: Ic1e6691e11acaa419d1e6a8fb9403f7648a61a0e
    Signed-off-by: Efraim Flashner <efraim@flashner.co.il>
---
 gnu/packages/crates-io.scm | 19 +++++++++++++++++--
 1 file changed, 17 insertions(+), 2 deletions(-)

diff --git a/gnu/packages/crates-io.scm b/gnu/packages/crates-io.scm
index 0cf19e6620..9ef8651323 100644
--- a/gnu/packages/crates-io.scm
+++ b/gnu/packages/crates-io.scm
@@ -89502,7 +89502,7 @@ windows crate.")
                (base32
                 "12ipr1knzj2rwjygyllfi5mkd0ihnbi3r61gag5n2jgyk5bmyl8s"))
               (snippet
-               '(delete-file "lib/windows.0.48.0.lib"))))
+               #~(delete-file "lib/windows.0.48.0.lib"))))
     (build-system cargo-build-system)
     (arguments (list #:skip-build? #t))
     (home-page "https://github.com/microsoft/windows-rs";)
@@ -89524,9 +89524,24 @@ windows crate.")
                (base32
                 "1w5r0q0yzx827d10dpjza2ww0j8iajqhmb54s735hhaj66imvv4s"))
               (snippet
-               '(delete-file "lib/windows.lib"))))
+               #~(delete-file "lib/windows.lib"))))
     (arguments (list #:skip-build? #t))))
 
+(define-public rust-windows-x86-64-msvc-0.39
+  (package
+    (inherit rust-windows-x86-64-msvc-0.42)
+    (name "rust-windows-x86-64-msvc")
+    (version "0.39.0")
+    (source
+     (origin
+       (method url-fetch)
+       (uri (crate-uri "windows_x86_64_msvc" version))
+       (file-name (string-append name "-" version ".tar.gz"))
+       (sha256
+        (base32 "02g8fy1sv8g0p4fi2yk62j9a5zwhcfknp9vwg1ifkjp97a440kay"))
+        (snippet
+         #~(delete-file "lib/windows.lib"))))))
+
 (define-public rust-windows-x86-64-msvc-0.36
   (package
     (inherit rust-windows-x86-64-msvc-0.42)