Add test cases for statement batches

yetanalytics · Aug 27, 2024 · 4935036 · 4935036
1 parent d4747a6
commit 4935036
Showing 1 changed file with 13 additions and 0 deletions.
diff --git a/test/xapi_schema/spec_test.cljc b/test/xapi_schema/spec_test.cljc
@@ -626,3 +626,16 @@
                       "verb" {"id" "http://adlnet.gov/expapi/verbs/voided"
                               "display" {"en-US" "voided"}}
                       "object" {"id" "http://example.com/activities/1"}})))
+
+(deftest statements-test
+  (testing "generic statememt batch"
+    (should-satisfy+ ::xs/statements
+                     [simple-statement]
+                     [simple-statement long-statement]
+                     []))
+  (testing "LRS retrieval statement batch"
+    (should-satisfy+ ::xs/lrs-statements
+                     [simple-statement]
+                     [simple-statement long-statement]
+                     :bad
+                     [])))