[bug#78688,rust-team,2/3] gnu: rust bootstrap: Set #:disallowed-references.
Commit Message
* gnu/packages/rust.scm (rust-1.55, rust-1.75, rust)
(make-rust-sysroot/implementation): Set #:disallowed-references to the rust in
the native-inputs.
Change-Id: Ifa30f316e3777b748b067ba0ea5a7ee558a05eb2
---
gnu/packages/rust.scm | 7 +++++++
1 file changed, 7 insertions(+)
@@ -560,6 +560,7 @@ (define-public rust-1.55
(build-system gnu-build-system)
(arguments
(list
+ #:disallowed-references (list (this-package-native-input "rust"))
#:validate-runpath? #f
;; Only the final Rust is tested, not the intermediate bootstrap ones,
;; for performance and simplicity.
@@ -1091,6 +1092,8 @@ (define-public rust-1.75
(arguments
(if (supported-package? rust-bootstrap-1.74)
(substitute-keyword-arguments (package-arguments base-rust)
+ ((#:disallowed-references _ '())
+ (list rust-bootstrap-1.74))
((#:phases phases)
#~(modify-phases #$phases
(add-after 'unpack 'add-cc-shim-to-path
@@ -1398,6 +1401,8 @@ (define-public rust
(substitute-keyword-arguments
(strip-keyword-arguments '(#:tests?)
(package-arguments base-rust))
+ ((#:disallowed-references _ '())
+ (list (this-package-native-input "rust")))
((#:phases phases)
#~(modify-phases #$phases
(add-after 'unpack 'relax-gdb-auto-load-safe-path
@@ -1770,6 +1775,8 @@ (define make-rust-sysroot/implementation
(arguments
(substitute-keyword-arguments (package-arguments base-rust)
((#:tests? _ #f) #f) ; This package for cross-building.
+ ((#:disallowed-references _ '())
+ (list (this-package-native-input "rust")))
((#:phases phases)
#~(modify-phases #$phases
(add-after 'unpack 'unbundle-xz