Если вы просто хотите запустить программу и не общаться с ней, используйте Sys.command
.
let exit_code = Sys.command "c:\\path\\to\\executable.exe /argument" in
(* if exit_code=0, the command succeeded. Otherwise it failed. *)
В более сложных случаях вам необходимо использовать функции в модуле Unix
. Несмотря на название, большинство из них работают под Windows. Например, если вам нужно получить вывод из команды:
let ch = Unix.open_process_in "c:\\path\\to\\executable.exe /argument" in
try
while true do
let line = input_line ch in …
done
with End_of_file ->
let status = close_process_in ch in …