Ekdohibs
/
ocaml
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Typo dans execve et execvp 

git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@1378 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
master
Xavier Leroy 1997-03-13 14:41:10 +00:00
parent 64ee63cf8a
commit 4dd2dc233e
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
otherlibs/threads/threadUnix.ml
View File

@ -28,12 +28,12 @@ let execv proc args =
let execve proc args env = let execve proc args env =
Thread.critical_section := true; Thread.critical_section := true;
Unix.setitimer ITIMER_VIRTUAL {it_interval = 0.0; it_value = 0.0}; Unix.setitimer ITIMER_VIRTUAL {it_interval = 0.0; it_value = 0.0};
Unix.execv proc args Unix.execve proc args
let execvp proc args = let execvp proc args =
Thread.critical_section := true; Thread.critical_section := true;
Unix.setitimer ITIMER_VIRTUAL {it_interval = 0.0; it_value = 0.0}; Unix.setitimer ITIMER_VIRTUAL {it_interval = 0.0; it_value = 0.0};
Unix.execv proc args Unix.execvp proc args
let wait () = let wait () =
Thread.wait_pid (-1) Thread.wait_pid (-1)