We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
1 parent 3821041 commit 16644a4Copy full SHA for 16644a4
src/common/library.ml
@@ -146,7 +146,8 @@ let set_lib_root : string option -> unit = fun dir ->
146
(* [Sys_error] is raised if [pth] does not exist. *)
147
(* We try to create [pth]. *)
148
let target = Filename.quote pth in
149
- let cmd = String.concat " " ["mkdir"; "--parent"; target] in
+ let cmd = String.concat " " ["mkdir"; "-p"; target] in
150
+ (* Use short option to be POSIX compliant. *)
151
match Sys.command cmd with
152
| 0 -> ()
153
| _ ->
0 commit comments