diff --git a/tests/basic/test_repomap.py b/tests/basic/test_repomap.py index 8380faeaa..88f6cf89d 100644 --- a/tests/basic/test_repomap.py +++ b/tests/basic/test_repomap.py @@ -451,8 +451,27 @@ module.exports = { ), "ocaml": ( "test.ml", - 'let greet name =\n Printf.printf "Hello, %s!\\n" name\n', - "greet", # Key symbol to check + """(* Module definition *) +module Greeter = struct + type person = { + name: string; + age: int + } + + let create_person name age = + {name; age} + + let greet person = + Printf.printf "Hello, %s! You are %d years old.\\n" + person.name person.age +end + +(* Outside the module *) +let () = + let person = Greeter.create_person "Alice" 30 in + Greeter.greet person +""", + "Greeter", # Key symbol to check ), "php": ( "test.php",