puck/zilch
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

(zilch lang rust): Enforce that required parameters are set

Browse source 
Change-Id: I6a6a6964dcc713504ec57f40981a601696a573af
This commit is contained in:
puck 2025-07-03 18:57:48 +00:00
parent 7272d1546b
commit 154ba9be1c
1 changed files with 3 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

3
lang/rust/src/rust.sld
View file

@ -157,8 +157,11 @@
(set! args (cons "-L" (cons #~,(string-append "all=" #$k) args))) (set! args (cons "-L" (cons #~,(string-append "all=" #$k) args)))
(set! args (cons "-L" (cons #~,(string-append (car k) "=" #$(cdr k)) args))))) (set! args (cons "-L" (cons #~,(string-append (car k) "=" #$(cdr k)) args)))))
(rustc-params-search-path params))) (rustc-params-search-path params)))
(unless (rustc-params-crate-type params) (error "crate-type unset"))
(set! args (cons "--crate-type" (cons (symbol->string (rustc-params-crate-type params)) args))) (set! args (cons "--crate-type" (cons (symbol->string (rustc-params-crate-type params)) args)))
(unless (rustc-params-crate-name params) (error "crate-name unset"))
(set! args (cons "--crate-name" (cons (rustc-params-crate-name params) args))) (set! args (cons "--crate-name" (cons (rustc-params-crate-name params) args)))
(unless (rustc-params-edition params) (error "edition unset"))
(set! args (cons "--edition" (cons (rustc-params-edition params) args))) (set! args (cons "--edition" (cons (rustc-params-edition params) args)))
(define-values (new-args outputs) (rustc-emits-as-list (rustc-params-emits params) args '())) (define-values (new-args outputs) (rustc-emits-as-list (rustc-params-emits params) args '()))