diff options
Diffstat (limited to 'src/StringUtils.ml')
-rw-r--r-- | src/StringUtils.ml | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/src/StringUtils.ml b/src/StringUtils.ml index 7c77a8d1..2e0e18f7 100644 --- a/src/StringUtils.ml +++ b/src/StringUtils.ml @@ -90,4 +90,6 @@ let to_snake_case (s : string) : string = let _ = assert (to_camel_case "hello_world" = "HelloWorld"); assert (to_snake_case "HelloWorld36Hello" = "hello_world36_hello"); - assert (to_snake_case "HELLO" = "hello") + assert (to_snake_case "HELLO" = "hello"); + assert (to_snake_case "T1" = "t1"); + assert (to_camel_case "list" = "List") |