diff options
author | Marc Coquand <marc@mccd.space> | 2023-12-26 15:07:20 -0600 |
---|---|---|
committer | Marc Coquand <marc@mccd.space> | 2023-12-26 15:07:20 -0600 |
commit | f3c5dc866e429c388aa77375d9045698ccfb904e (patch) | |
tree | f077c558ea8cdf3dcbb1f3bc3ec4e34233b9ce9c /test/test_parser.ml | |
parent | 5746c8d2c9ae2a0696eb5c88931e62e0149e6b85 (diff) | |
download | fixgen-f3c5dc866e429c388aa77375d9045698ccfb904e.tar.gz fixgen-f3c5dc866e429c388aa77375d9045698ccfb904e.tar.bz2 fixgen-f3c5dc866e429c388aa77375d9045698ccfb904e.zip |
Support underscore names
Diffstat (limited to '')
-rw-r--r-- | test/test_parser.ml | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/test/test_parser.ml b/test/test_parser.ml index 003086a..5fa9e6a 100644 --- a/test/test_parser.ml +++ b/test/test_parser.ml @@ -18,7 +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 const", `Quick, test_parse "purchases (1): name \"_helloarsent1!@#4\"" ; "Supports ints with min/max", `Quick, test_parse "purchases (1): name int(1,20)" ; ( "Supports a list of potential values" , `Quick @@ -26,6 +26,8 @@ let rows_suite = ; ( "Supports setting amount of fixture to generate" , `Quick , test_parse "purchases (5): name int(1,20)" ) + ; "Supports underscore tables", `Quick, test_parse "purchases_new (5): name int(1,20)" + ; "Supports underscore tables", `Quick, test_parse "purchases_new (5): name int(1,20)" ] |