diff options
| author | Pjotr Prins | 2023-08-19 12:27:34 +0200 |
|---|---|---|
| committer | Pjotr Prins | 2023-08-19 12:27:34 +0200 |
| commit | dcc41148727ec5f68fbeb0504a295981728327a1 (patch) | |
| tree | 67982ada1c32c7f17421f178b41745b050d32e4e /test | |
| parent | afd3d25530401569a5953dc1c411f43a56ebd02c (diff) | |
| download | gn-guile-dcc41148727ec5f68fbeb0504a295981728327a1.tar.gz | |
Adding test infrastructure and reorganizing modules
Diffstat (limited to 'test')
| -rw-r--r-- | test/runner.scm | 8 |
1 files changed, 7 insertions, 1 deletions
diff --git a/test/runner.scm b/test/runner.scm index 0123d9a..45f2b0c 100644 --- a/test/runner.scm +++ b/test/runner.scm @@ -10,7 +10,13 @@ (test-begin "runner") -(test-assert "Make sure species-meta contains a link to tomato" +(test-assert "species-meta is expected contain a link to tomato" (assoc "tomato" (cdr (assoc "links" (get-species-meta))))) +(test-assert "tomato-meta should have a document link" + (assoc "doc" (get-expanded-taxon-meta "tomato"))) + +(test-equal "tomato-data should have a description" + (assoc-ref (get-expanded-taxon-data "tomato") "description") "type of plant species with edible, often red, berry fruit") + (test-end "runner") |