Evaluate derivations in a separate process.

This fixes a bug where different Guix branches gave the same
derivations.

1 files changed, 14 insertions, 18 deletions

diff --git a/tests/guix-jobs.scm b/tests/guix-jobs.scm
index 9196147..470305f 100644
--- a/tests/guix-jobs.scm
+++ b/tests/guix-jobs.scm
@@ -17,24 +17,20 @@
 ;;; You should have received a copy of the GNU General Public License
 ;;; along with Cuirass.  If not, see <http://www.gnu.org/licenses/>.
 
-(use-modules (cuirass job))
-
-;; In the common case jobs will be defined relative to the repository.
-;; However for testing purpose use local gnu-system.scm instead.
 (define (local-file file)
+  ;; In the common case jobs will be defined relative to the repository.
+  ;; However for testing purpose use local gnu-system.scm instead.
   (string-append (dirname (current-filename)) "/" file))
 
-(list (make-job-spec
-       #:name "guix"
-       #:url "git://git.savannah.gnu.org/guix.git"
-       #:load-path "."
-       #:branch "master"
-       #:file (local-file "gnu-system.scm")
-       #:proc 'hydra-jobs)
-      (make-job-spec
-       #:name "guix"
-       #:url "git://git.savannah.gnu.org/guix.git"
-       #:load-path "."
-       #:tag "v0.10.0"
-       #:file (local-file "gnu-system.scm")
-       #:proc 'hydra-jobs))
+`(((#:name . "guix")
+   (#:url . "git://git.savannah.gnu.org/guix.git")
+   (#:load-path . ".")
+   (#:branch . "master")
+   (#:file . ,(local-file "gnu-system.scm"))
+   (#:proc . hydra-jobs))
+  ((#:name . "guix")
+   (#:url . "git://git.savannah.gnu.org/guix.git")
+   (#:load-path . ".")
+   (#:tag . "v0.10.0")
+   (#:file . ,(local-file "gnu-system.scm"))
+   (#:proc . hydra-jobs)))