From 2a664a47c73e232b6ff0d261833e2561d4abc4d0 Mon Sep 17 00:00:00 2001 From: Marc Coquand Date: Tue, 26 Dec 2023 10:46:11 -0600 Subject: Support list --- test/test_parser.ml | 3 +++ 1 file changed, 3 insertions(+) (limited to 'test/test_parser.ml') diff --git a/test/test_parser.ml b/test/test_parser.ml index abb0a40..80e9d12 100644 --- a/test/test_parser.ml +++ b/test/test_parser.ml @@ -20,6 +20,9 @@ let rows_suite = ; "Supports names", `Quick, test_parse "purchases (1): name _name" ; "Supports const", `Quick, test_parse "purchases (1): name \"hello\"" ; "Supports ints with min/max", `Quick, test_parse "purchases (1): name _int(1,20)" + ; ( "Supports a list of potential values" + , `Quick + , test_parse "purchases (1): name (\"a\",\"b\",\"c\")" ) ; ( "Supports setting amount of fixture to generate" , `Quick , test_parse "purchases (5): name _int(1,20)" ) -- cgit v1.2.3