let
exists_in_build_dir p =
Pathname
.exists (in_build_dir p)