(define-module (srfi srfi-64)
  #:export (test-begin ;; must be listed first, since in Kawa (at least) it is "magic".
            test-end test-assert test-eqv test-eq test-equal
            test-approximate test-assert test-error test-apply test-with-runner
            test-match-nth test-match-all test-match-any test-match-name
            test-skip test-expect-fail test-read-eval-string
            test-runner-group-path test-group test-group-with-cleanup
            test-result-ref test-result-set! test-result-clear test-result-remove
            test-result-kind test-passed?
            test-log-to-file
                                                  ; Misc test-runner functions
            test-runner? test-runner-reset test-runner-null
            test-runner-simple test-runner-current test-runner-factory test-runner-get
            test-runner-create test-runner-test-name
            ;; test-runner field setter and getter functions - see %test-record-define:
            test-runner-pass-count test-runner-pass-count!
            test-runner-fail-count test-runner-fail-count!
            test-runner-xpass-count test-runner-xpass-count!
            test-runner-xfail-count test-runner-xfail-count!
            test-runner-skip-count test-runner-skip-count!
            test-runner-group-stack test-runner-group-stack!
            test-runner-on-test-begin test-runner-on-test-begin!
            test-runner-on-test-end test-runner-on-test-end!
            test-runner-on-group-begin test-runner-on-group-begin!
            test-runner-on-group-end test-runner-on-group-end!
            test-runner-on-final test-runner-on-final!
            test-runner-on-bad-count test-runner-on-bad-count!
            test-runner-on-bad-end-name test-runner-on-bad-end-name!
            test-result-alist test-result-alist!
            test-runner-aux-value test-runner-aux-value!
            ;; default/simple call-back functions, used in default test-runner,
            ;; but can be called to construct more complex ones.
            test-on-group-begin-simple test-on-group-end-simple
            test-on-bad-count-simple test-on-bad-end-name-simple
            test-on-final-simple test-on-test-end-simple
            test-on-final-simple))

(cond-expand-provide (current-module) '(srfi-64))

;; Load Per Bothner's original SRFI-64 implementation.
(load-from-path "srfi/srfi-64.upstream.scm")
'>spice.scm</a></div><div class='content'><table class='list nowrap'><tr class='nohover'><th class='left'>Age</th><th class='left'>Commit message (<a href='/guix/log/gnu/services/spice.scm?id=3168796a3f38a362a9f8378b8953d24117e54c30&amp;showmsg=1'>Expand</a>)</th><th class='left'>Author</th></tr>
<tr><td><span title='2017-01-25 14:05:37 +0100'>2017-01-25</span></td><td><a href='/guix/commit/gnu/services/spice.scm?id=e57bd0bed86caac304e5f37c5653e6b13858c7c5'>services: Fix 'mkdir-p' in activation scripts.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/services/cups.scm (%cups-activation): Import (guix build utils).
* gnu/services/mail.scm (opensmtpd-activation): Idem.
* gnu/services/networking.scm (ntp-service-activation): Idem.
* gnu/services/spice.scm (spice-vdagent-activation): Idem.
* gnu/services/ssh.scm (openssh-activation): Idem.
  (dropbear-activation): Idem.
* gnu/services/vpn.scm (%openvpn-activation): Idem.

Signed-off-by: Ludovic Courtès &lt;ludo@gnu.org&gt;
</span></span></td><td>Clément Lassieur</td></tr>
<tr><td><span title='2016-09-10 13:10:06 +0200'>2016-09-10</span></td><td><a href='/guix/commit/gnu/services/spice.scm?id=9e41130b14ad32c4e1fa756f95d806703056cb60'>system: Use 'file-append' to denote file names.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/services/avahi.scm, gnu/services/base.scm,
gnu/services/databases.scm, gnu/services/dbus.scm,
gnu/services/desktop.scm, gnu/services/dict.scm,
gnu/services/mail.scm, gnu/services/networking.scm,
gnu/services/sddm.scm, gnu/services/spice.scm,
gnu/services/ssh.scm, gnu/services/web.scm,
gnu/services/xorg.scm, gnu/system.scm: Replace the
 #~(string-append #$pkg "/bin/foo") idiom with
 (file-append pkg "/bin/foo").
</span></span></td><td>Ludovic Courtès</td></tr>
<tr><td><span title='2016-08-05 21:48:43 +0200'>2016-08-05</span></td><td><a href='/guix/commit/gnu/services/spice.scm?id=00f469056893ae80fecefee44e09d6904b613de4'>services: Add spice vdagent service.</a><span class='msg-avail'>...<span class='msg-tooltip'>* gnu/services/spice.scm: New file.
* gnu/local.mk (GNU_SYSTEM_MODULES): Add it.
* doc/guix.texi (Various Services): New subheading.
</span></span></td><td>David Craven</td></tr>