aboutsummaryrefslogtreecommitdiff
path: root/test
diff options
context:
space:
mode:
Diffstat (limited to 'test')
-rw-r--r--test/test_parser.ml9
1 files changed, 9 insertions, 0 deletions
diff --git a/test/test_parser.ml b/test/test_parser.ml
index 5fa9e6a..e18f055 100644
--- a/test/test_parser.ml
+++ b/test/test_parser.ml
@@ -38,6 +38,15 @@ let relations_suite =
; ( "Can use ; as a separator"
, `Quick
, test_parse "user (2): id uuidv4; purchases (5): id uuidv4" )
+ ; ( "Supports nested relations"
+ , `Quick
+ , test_parse
+ "user (2): id uuidv4; purchases (5): id uuidv4; receipts (5): id purchases.id" )
+ ; ( "Supports multiple relations"
+ , `Quick
+ , test_parse
+ "buyer (2): id uuidv4; seller (5): id uuidv4; purchases (5): buyer buyer.id, \
+ seller seller.id" )
; ( "Supports multiple newlines"
, `Quick
, test_parse "user (2): id uuidv4\n\n\n\n\npurchases (5): id uuidv4" )