07/10: build: Really enable Guile warnings.

[Ludovic Courtès]

civodul pushed a commit to branch master
in repository guix.

commit 689b658db8770fd5af08bd00050e2b81c749379b
Author: Ludovic Courtès <address@hidden>
Date:   Sun Jan 31 21:59:01 2016 +0100

    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.
---
 build-aux/compile-all.scm |    5 +++--
 1 files changed, 3 insertions(+), 2 deletions(-)

diff --git a/build-aux/compile-all.scm b/build-aux/compile-all.scm
index e0877db..f1704dc 100644
--- a/build-aux/compile-all.scm
+++ b/build-aux/compile-all.scm
@@ -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)