let get_mod src =
  let stat = Path.stat ~follow:true src in
  stat.File.Stat.mtime |> Float.to_int