1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-05-20 11:40:18 +02:00

Only test when 'threads are provided.

This commit is contained in:
Marius Vollmer 2005-03-02 20:55:17 +00:00
parent 1f834c95da
commit d8d925f310

View file

@ -20,8 +20,8 @@
(use-modules (ice-9 threads)
(test-suite lib))
(with-test-prefix "parallel"
(if (provided? 'threads)
(with-test-prefix "parallel"
(pass-if "no forms"
(call-with-values
(lambda ()
@ -51,4 +51,4 @@
(lambda (x y z)
(and (equal? x 1)
(equal? y 2)
(equal? z 3))))))
(equal? z 3)))))))