diff options
author | Mathieu Lirzin <mthl@gnu.org> | 2016-06-15 15:30:15 +0200 |
---|---|---|
committer | Mathieu Lirzin <mthl@gnu.org> | 2016-06-16 02:12:33 +0200 |
commit | b103ab7eae3246f19c410c7d8cf82329836e63ce (patch) | |
tree | 373cecdb224ff67f9ae0cd553f106071b027352e /tests/hello-subset.scm | |
parent | 7d7251a974b27a8ef4137efa8b80232aca1c96e7 (diff) | |
download | cuirass-b103ab7eae3246f19c410c7d8cf82329836e63ce.tar cuirass-b103ab7eae3246f19c410c7d8cf82329836e63ce.tar.gz |
Change <job-spec> and <job> semantics.
Diffstat (limited to 'tests/hello-subset.scm')
-rw-r--r-- | tests/hello-subset.scm | 33 |
1 files changed, 33 insertions, 0 deletions
diff --git a/tests/hello-subset.scm b/tests/hello-subset.scm new file mode 100644 index 0000000..3330142 --- /dev/null +++ b/tests/hello-subset.scm @@ -0,0 +1,33 @@ +;;;; hello-subset.scm - job specification test for hello subset. +;;; +;;; Copyright © 2016 Mathieu Lirzin <mthl@gnu.org> +;;; +;;; This file is part of Cuirass. +;;; +;;; Cuirass is free software; you can redistribute it and/or modify it +;;; under the terms of the GNU General Public License as published by +;;; the Free Software Foundation; either version 3 of the License, or (at +;;; your option) any later version. +;;; +;;; Cuirass is distributed in the hope that it will be useful, but +;;; WITHOUT ANY WARRANTY; without even the implied warranty of +;;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the +;;; GNU General Public License for more details. +;;; +;;; 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) + (string-append (dirname (current-filename)) "/" file)) + +(make-job-spec + #:name "guix" + #:url "git://git.savannah.gnu.org/guix.git" + #:branch "master" + #:file (local-file "gnu-system.scm") + #:proc 'hydra-jobs + #:arguments '((subset . "hello"))) |