build: Really enable Guile warnings.

* build-aux/compile-all.scm (compile-options): Rename to...
(warnings): ... this.  Add 'unsupported-warning'.
(compile-file*): Pass '(#:warnings ...) as #:opts.
This commit is contained in:
Ludovic Courtès 2016-01-31 21:59:01 +01:00
parent b8638f0347
commit 689b658db8
1 changed files with 3 additions and 2 deletions

View File

@ -21,7 +21,8 @@
(ice-9 threads) (ice-9 threads)
(guix build utils)) (guix build utils))
(define compile-options '(format unbound-variable arity-mismatch)) (define warnings
'(unsupported-warning format unbound-variable arity-mismatch))
(define host (getenv "host")) (define host (getenv "host"))
@ -70,7 +71,7 @@
(lambda () (lambda ()
(compile-file file (compile-file file
#:output-file go #:output-file go
#:opts compile-options))))) #:opts `(#:warnings ,warnings))))))
(match (command-line) (match (command-line)
((_ . files) ((_ . files)