~ruther/guix-local: build: Really enable Guile warnings.

689b658db8770fd5af08bd00050e2b81c749379b — Ludovic Courtès 10 years ago b8638f0

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.

patch browse .tar.gz

1 files changed, 3 insertions(+), 2 deletions(-)

M build-aux/compile-all.scm

M build-aux/compile-all.scm => build-aux/compile-all.scm +3 -2

@@ 21,7 21,8 @@
              (ice-9 threads)
              (guix build utils))
 
-(define compile-options '(format unbound-variable arity-mismatch))
+(define warnings
+  '(unsupported-warning format unbound-variable arity-mismatch))
 
 (define host (getenv "host"))
 


@@ 70,7 71,7 @@
       (lambda ()
         (compile-file file
                       #:output-file go
-                      #:opts compile-options)))))
+                      #:opts `(#:warnings ,warnings))))))
 
 (match (command-line)
   ((_ . files)