let chdir dir =
  reset_filesys_cache ();
  Sys.chdir dir