let
is_valid path =
try
PathOperation
.is_valid (s2f path)
with
FilePathInvalidFilename
->
false