aboutsummaryrefslogtreecommitdiff
path: root/test/test_parser.ml
diff options
context:
space:
mode:
authorMarc Coquand <marc@mccd.space>2023-12-26 10:08:23 -0600
committerMarc Coquand <marc@mccd.space>2023-12-26 10:08:23 -0600
commitd96e1839eb800bf26bcc38272072d98af69f5d83 (patch)
tree1570f7f47ba4e39acf4caebfce6eaf4a6575bc97 /test/test_parser.ml
parent2bb4215b957d912058d490c16ee64320e3724037 (diff)
downloadfixgen-d96e1839eb800bf26bcc38272072d98af69f5d83.tar.gz
fixgen-d96e1839eb800bf26bcc38272072d98af69f5d83.tar.bz2
fixgen-d96e1839eb800bf26bcc38272072d98af69f5d83.zip
Support const keyword
Diffstat (limited to '')
-rw-r--r--test/test_parser.ml1
1 files changed, 1 insertions, 0 deletions
diff --git a/test/test_parser.ml b/test/test_parser.ml
index 5a56e6a..abb0a40 100644
--- a/test/test_parser.ml
+++ b/test/test_parser.ml
@@ -18,6 +18,7 @@ let rows_suite =
, `Quick
, test_parse "user (1): id _uuidv4\npurchases (1): id _uuidv4" )
; "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 setting amount of fixture to generate"
, `Quick