me
/
guix
Archived
1
0
Fork 0
Code

gnu: rust: Allow using custom rust-src for rust-analyzer. 

* gnu/packages/rust.scm (rust)[arguments]: Rewrite 'wrap-rust-analyzer
phase to allow using a custom RUST_SRC_PATH.

Change-Id: Id811bc8d09c0f955ece9c9e6267a0ae96e61f105
Efraim Flashner 2023-11-05 08:55:31 +02:00
parent 4b0fcbd00a
commit 273bd81188
No known key found for this signature in database
GPG Key ID: 41AAE7DCCA3D8351
1 changed files with 13 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
gnu/packages/rust.scm
View File

@ -1030,11 +1030,19 @@ safety and thread safety guarantees.")
(copy-recursively "src" (string-append out dest "/src")))))
(add-after 'install-rust-src 'wrap-rust-analyzer
(lambda* (#:key outputs #:allow-other-keys)
(wrap-program (string-append (assoc-ref outputs "tools")
"/bin/rust-analyzer")
`("RUST_SRC_PATH" ":" =
(,(string-append (assoc-ref outputs "rust-src")
"/lib/rustlib/src/rust/library"))))))))))
(let ((bin (string-append (assoc-ref outputs "tools") "/bin")))
(rename-file (string-append bin "/rust-analyzer")
(string-append bin "/.rust-analyzer-real"))
(call-with-output-file (string-append bin "/rust-analyzer")
(lambda (port)
(format port "#!~a
if test -z \"${RUST_SRC_PATH}\";then export RUST_SRC_PATH=~S;fi;
exec -a \"$0\" \"~a\" \"$@\""
(which "bash")
(string-append (assoc-ref outputs "rust-src")
"/lib/rustlib/src/rust/library")
(string-append bin "/.rust-analyzer-real"))))
(chmod (string-append bin "/rust-analyzer") #o755))))))))
;; Add test inputs.
(native-inputs (cons* `("gdb" ,gdb/pinned)
`("procps" ,procps)