diff options
Diffstat (limited to '')
-rw-r--r-- | tests/unit/vcomponent/geo.scm | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/tests/unit/vcomponent/geo.scm b/tests/unit/vcomponent/geo.scm new file mode 100644 index 00000000..2cc8ab28 --- /dev/null +++ b/tests/unit/vcomponent/geo.scm @@ -0,0 +1,12 @@ +(define-module (test geo) + :use-module (srfi srfi-64) + :use-module (srfi srfi-64 test-error) + :use-module (srfi srfi-71) + :use-module (srfi srfi-88) + :use-module (vcomponent geo)) + +(test-assert (geo? (geo x: 10 y: 20))) +(test-error 'wrong-type-arg + (geo)) + +'((vcomponent geo)) |