aboutsummaryrefslogtreecommitdiffhomepage
path: root/tools/win32hack_filename.ml
blob: 74f70686fe3d675e3ef100901934792fa3f6418a (plain)
1
2
3
4
(* The mingw32-ocaml cross-compiler currently uses Filename.dir_sep="/".
   Let's tweak that... *)

let _ = Filename.dir_sep.[0] <- '\\'