Crs_cli_test.Tests_helpersval parse_file :
path:Volgo.Vcs.Path_in_repo.t ->
file_contents:Base.string ->
Cr_comment.t Base.listIn the tests we want to avoid test CRs to be mistaken for actual CRs, thus we perform some dynamic string substitutions. Test CRs are prefixed by the '$' symbol. For example:
(* $CR user1 for user2: This is a test CR. *)parse_file ~path ~file_contents first removes the '$' prefixes, and then parse the contents using the regular code path to extract CRs from file.
The provided path is not accessed on disk, we simply use it to build locations for the resulting CRs. The contents is solely read from file_contents.