blob: 0123d9ab10f1b35e9fbe5acd8e272b72bc43b26e (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
|
;; Run with
;;
;; guile -L . --debug test/runner.scm
(define-module (test-runner)
#:use-module (ice-9 match)
#:use-module (srfi srfi-64)
#:use-module (gn data species)
)
(test-begin "runner")
(test-assert "Make sure species-meta contains a link to tomato"
(assoc "tomato" (cdr (assoc "links" (get-species-meta)))))
(test-end "runner")
|
