let forpack_flags_of_pathname m = !forpack_flags_of_pathname m