path_strip_extension

path without the extension of its last component and the dot before it. A path with no extension is returned unchanged. The result points into path.

path_strip_extension :: (path: string) -> string

assert(path_strip_extension("dir/name.ext") == "dir/name");
assert(path_strip_extension("dir.d/name") == "dir.d/name");