diff options
author | Ludovic Courtès <ludo@gnu.org> | 2012-06-27 23:58:07 +0200 |
---|---|---|
committer | Ludovic Courtès <ludo@gnu.org> | 2012-06-27 23:58:07 +0200 |
commit | 208f7cd155abdf07ae4f858aeeb26892eb08df88 (patch) | |
tree | a6fc59bd1ae85e9f2929ee2079cc90539193e476 /tests/builders.scm | |
parent | 72d869634bd22d978af13f5a8c89ddff27140422 (diff) | |
download | patches-208f7cd155abdf07ae4f858aeeb26892eb08df88.tar patches-208f7cd155abdf07ae4f858aeeb26892eb08df88.tar.gz |
Abstract build systems.
* Makefile.am (MODULES): Add `guix/build-system.scm' and
`guix/build-system/gnu.scm'. Remove `guix/gnu-build-system.scm'.
* guix/build-system.scm: New file.
* guix/gnu-build-system.scm: Rename to...
* guix/build-system/gnu.scm: ... this.
(gnu-build-system): New variable.
* tests/builders.scm: Adjust `use-module' clauses.
("gnu-build-system"): New test.
Diffstat (limited to 'tests/builders.scm')
-rw-r--r-- | tests/builders.scm | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/tests/builders.scm b/tests/builders.scm index 851baa9ebf..17bae2c754 100644 --- a/tests/builders.scm +++ b/tests/builders.scm @@ -19,7 +19,8 @@ (define-module (test-builders) #:use-module (guix http) - #:use-module (guix gnu-build-system) + #:use-module (guix build-system) + #:use-module (guix build-system gnu) #:use-module (guix store) #:use-module (guix utils) #:use-module (guix derivations) @@ -41,6 +42,10 @@ (and (build-derivations %store (list drv-path)) (file-exists? (derivation-path->output-path drv-path))))) +(test-assert "gnu-build-system" + (and (build-system? gnu-build-system) + (eq? gnu-build (build-system-builder gnu-build-system)))) + (test-assert "gnu-build" (let* ((url "http://ftp.gnu.org/gnu/hello/hello-2.8.tar.gz") (hash (nix-base32-string->bytevector |