Implemented --dry-run in OCaml