summary refs log tree commit diff
path: root/tests/lint.scm
diff options
context:
space:
mode:
authorLudovic Courtès <ludo@gnu.org>2015-04-12 23:14:19 +0200
committerLudovic Courtès <ludo@gnu.org>2015-04-13 00:02:59 +0200
commit002c57c6f7d51077e4796106177456ebb564e25a (patch)
treee0f1d13fbc7481bac013b9c1c7426dbe056e6317 /tests/lint.scm
parent866f469eddb6a28cfdbc3b2eec3d3a6a241f7168 (diff)
downloadguix-002c57c6f7d51077e4796106177456ebb564e25a.tar.gz
lint: Add a 'derivation' checker.
* guix/scripts/lint.scm (check-derivation): New procedure.
  (%checkers): Add 'derivation' checker.
* tests/lint.scm ("derivation: invalid arguments"): New test.
Diffstat (limited to 'tests/lint.scm')
-rw-r--r--tests/lint.scm10
1 files changed, 10 insertions, 0 deletions
diff --git a/tests/lint.scm b/tests/lint.scm
index ab89a58ae6..2807eba1cc 100644
--- a/tests/lint.scm
+++ b/tests/lint.scm
@@ -319,6 +319,16 @@ requests."
          (check-patch-file-names pkg)))
      "patch not found")))
 
+(test-assert "derivation: invalid arguments"
+  (->bool
+   (string-contains
+    (with-warnings
+      (let ((pkg (dummy-package "x"
+                   (arguments
+                    '(#:imported-modules (invalid-module))))))
+        (check-derivation pkg)))
+    "failed to create derivation")))
+
 (test-assert "home-page: wrong home-page"
   (->bool
    (string-contains