blob: ddc414dba009169a213b74587db1d920a4a1ea8c (
plain)
1
2
3
4
5
6
7
8
9
|
(set! %load-path (cons (string-append (getenv "HOME") "/src/guile")
%load-path))
(load "../test-suite/guile-test")
(main `("guile-test"
"--test-suite" ,(string-append (getenv "HOME")
"/src/guile/test-suite/tests")
"--log-file" ",,test-suite.log"))
|