Caml1999I031 Ht&Thread!t8@@@A@@@@@*thread.mliRrrRrx@@@@ @A@&create@@!a@!b@@@@ @@@@@@@@WW@@&A@$self@$unitF@@@@@@@@@0e1e@@:B@"id@#@@@#intA@@@@@@DhEh @@NC@ $Exit #exnG@@@A&_none_@@A@[DB@$exit@5@@@9@@@@@@dx 8 8ex 8 O@@nE@$kill@W@@@K@@@@@@v{  w|  @0ocaml.deprecated}|  ~|  @;Not implemented, do not use|  |  @@|  |  @@@@@|  @@F@%delay@%floatD@@@w@@@@@@D  D  @@G@$join@@@@@@@@@@I  I  @@H@%yield@@@@@@@@@@M * *M * B@@I@)wait_read@$Unix*file_descr@@@@@@@@@ZDD[l@0ocaml.deprecated[lq[l@ %This function no longer does anything[l[l@@[l[l@@@@@[ln@@J@*wait_write@.*file_descr@@@@@@@@@ _44 `]@0ocaml.deprecated`]b`]r@ %This function no longer does anything`]t`]@@`]s `]@@@@@"`]_@@+K@/wait_timed_read@Z*file_descr@@@@@@@$boolE@@@@@@@@>d%%?d%[@@HL@0wait_timed_write@w*file_descr@@@@@@@@@@@@@@@YgZg@@cM@&select@$listI*file_descr@@@@@@@*file_descr@@@@@@@*file_descr@@@@@@@@@@0*file_descr@@@@@@<*file_descr@@@@@@ߠH*file_descr@@@@@@@@@@@@@@@@@ru P@@N@(wait_pid@@@@@@@.process_status@@@@@@@@|AA|Ap@@O@'sigmask@ 3sigprocmask_command@@@@@@@@@@@@@@@@@@@@@@@P@+wait_signal@@@@@@@@@@@@@@@Q@ "default_uncaught_exception_handler @@@@@@@@@@$66%6j@@.R@>set_uncaught_exception_handler @@@@@@@@@@@@@@@@=>!@@GS@@pZ&Thread0˫.9v)Aɠ$Unix0sAmў/Stdlib__Complex0EU!|u]h.50Stdlib__Bigarray0J Zf;RӠ&Stdlib0yӶ~*8CamlinternalFormatBasics0cEXyRrw?Rrx@@8@@@A@@@@@BRrr@)ocaml.docS= The type of thread handles. PSyyQSy@@@@@@@@@h@@@A@@P@f % {1 Thread creation and termination} aUbU@@@@@@0`__`````@_+%@A&create mWnW@б@б@А!a@B@|W}W@@А!b@B@#WW@@@ @@(@@б@А!a.WW@@г]!tWW@@ @@@=@@@-@@@@@@@@CW @@@W@h  [Thread.create funct arg] creates a new thread of control, in which the function application [funct arg] is executed concurrently with the other threads of the program. The application of [Thread.create] returns the handle of the newly created thread. The new thread terminates when the application [funct arg] returns, either normally or by raising the {!Thread.Exit} exception or by raising any other uncaught exception. In the last case, the uncaught exception is printed on standard error, but not propagated back to the parent thread. Similarly, the result of the application [funct arg] is discarded and not directly accessible to the parent thread. Xct@@@@@@@A@@W$self ee@б@г&$unitee@@ @@@0@pk,@A@@г!tee@@ @@@@@@@@@@@e @ 7 Return the handle for the thread currently executing. ff@@@@@@@ B@@%"idhh@б@г̠!t h h@@ @@@0        @>S,@A@@гà#inthh @@ @@@@@@@@@@@$h @␠ Return the identifier of the given thread. A thread identifier is an integer that identifies uniquely the thread. It can be used to build data structures indexed by threads. 0i  1k@@@@@@@HC@@%$ExitB=m>m@ @@@ABm@ \ Exception that can be raised by user code to initiate termination of the current thread. Compared to calling the {!Thread.exit} function, raising the {!Thread.Exit} exception will trigger {!Fun.finally} finalizers and catch-all exception handlers. It is the recommended way to terminate threads prematurely. @since 4.14.0 NnOv 4 6@@@@@@@fD@@@_@0POOPPPPP@EZ3@A@$exit^x 8 <_x 8 @@б@г $unitix 8 Cjx 8 G@@ @@@0kjjkkkkk@71@A@@гѠ$unitxx 8 Kyx 8 O@@ @@@@@@@@@@@x 8 8 @A 7 Terminate prematurely the currently executing thread. y P Py P @@@@@@@E@@%$kill{  {  @б@гh!t{  {  @@ @@@0@>S,@A@@г$unit{  {  @@ @@@@@@@@@@@{  |  @0ocaml.deprecated|  |  @;Not implemented, do not use|  |  @@|  |  @@@@@|  @  This function was supposed to terminate prematurely the thread whose handle is given. It is not currently implemented due to problems with cleanup handlers on many POSIX 1003.1c implementations. It always raises the [Invalid_argument] exception. }  @  @@@@@@@F@('@&=)8 {1 Suspending threads} B  B  @@@@@@0@Mb;@A%delayD  D  @б@г%float D   D  @@ @@@@@гr$unitD  D  @@ @@@'@@@@@*@@@$D   @␠ [delay d] suspends the execution of the calling thread for [d] seconds. The other program threads continue to run during this time. 0E  1G  @@@@@@@HG@@=$join<I  =I  @б@г !tGI  HI  @@ @@@0IHHIIIII@VQ,@A@@г$unitVI  WI  @@ @@@@@@@@@@@aI   @ a [join th] suspends the execution of the calling thread until the thread [th] has terminated. mJ  nK  (@@@@@@@H@@%%yieldyM * .zM * 3@б@гݠ$unitM * 6M * :@@ @@@0@>S,@A@@г점$unitM * >M * B@@ @@@@@@@@@@@M * * @\ Re-schedule the calling thread without suspending it. This function can be used to give scheduling hints, telling the scheduler that now is a good time to switch to other threads. N C CQ @@@@@@@I@@% / {1 Waiting for file descriptors or processes} SS<@@@@@@0@5J#@Aѐ The functions below are leftovers from an earlier, VM-based threading system. The {!Unix} module provides equivalent functionality, in a more general and more standard-conformant manner. It is recommended to use {!Unix} functions directly. U>>XB@@@@@@)wait_readZDHZDQ@б@г$Unix*file_descr$UnixZDTZDc@@@@@ .@@гL$unitZDgZDk@@ @@@ ;@@@@@ >@@@ZDD[l@0ocaml.deprecated[lq[l@ %This function no longer does anything[l[l@@[l[l@@@@@[ln@Ԑ This function does nothing in the current implementation of the threading library and can be removed from all user programs. "\#]2@@@@@@@:J@('@&i)*wait_write._48/_4B@б@гX*file_descr$Unix<_4E=_4T@@ @@@ 0>==>>>>>@qG@A@@г$unitK_4XL_4\@@ @@@ @@@@@ @@@V_44W`]@0ocaml.deprecated]`]b^`]r@ %This function no longer does anythingh`]ti`]@@k`]sl`]@@@@@n`]_@, This function does nothing in the current implementation of the threading library and can be removed from all user programs. za{b#@@@@@@@K@('@&=)/wait_timed_readd%)d%8@б@г*file_descr$Unixd%;d%J@@ @@@ 0@YqG@A@@б@гW%floatd%Nd%S@@ @@@ @@г$boold%Wd%[@@ @@@ @@@@@ !@@@'@@ $* @@@d%%@~ See {!Thread.wait_timed_write}.e\\e\@@@@@@@L@@70wait_timed_writegg@б@г*file_descr$Unixgg@@ @@@ 0@Sk/@A@@б@г%floatgg@@ @@@ @@гӠ$boolgg@@ @@@ @@@@@ !@@@'@@ $* @@@g@А  Suspend the execution of the calling thread until at least one character or EOF is available for reading ([wait_timed_read]) or one character can be written without blocking ([wait_timed_write]) on the given Unix file descriptor. Wait for at most the amount of time given as second argument (in seconds). Return [true] if the file descriptor is ready for input/output and [false] if the timeout expired. The same functionality can be achieved with {!Unix.select}. hp@@@@@@@6M@@7&select*r+r@б@гʠ$list5s6s@г^*file_descr$UnixBsCs@@ @@@ 0DCCDDDDD@]u9@A@@@ @@@  @@б@г$listXsYs@г*file_descr$Unixesfs@@ @@@ #@@@@@@ ( @@б@г$listytzt@г*file_descr$Unixtt@@ @@@ D@@@@@@ I @@б@гL%floattt@@ @@@ X@@Вг?$listu u "@г*file_descr$Unixu u @@ @@@ u@@@@@@ z @@г_$listu 5u 9@г*file_descr$Unixu %u 4@@ @@@ @@@@@@  @@г$listu Lu P@г*file_descr$Unixu <u K@@ @@@ @@@@@@  @@@H) @@ Q@@@n@@ ðq @@@@@ ư#@@@@@ ɰ&@@@@@ ̰)@@@r,@Ԑ Same function as {!Unix.select}. Suspend the execution of the calling thread until input/output becomes possible on the given Unix file descriptors. The arguments and results have the same meaning as for {!Unix.select}. "vQQ#z*?@@@@@@@:N@;@(wait_pid.|AE/|AM@б@г㠐#int9|AP:|AS@@ @@@ 0;::;;;;;@,@A@@Вг#intK|AWL|AZ@@ @@@ @@гx.process_status$Unix\|A]]|Ap@@ @@@ #@@@@@ ( @@@.@@ +1 @@@l|AA@*  Same function as {!Unix.waitpid}. [wait_pid p] suspends the execution of the calling thread until the process specified by the process identifier [p] terminates. Returns the pid of the child caught and its termination status, as per {!Unix.wait}. x}qqyHz@@@@@@@O@@>; {1 Management of signals} |||@@@@@@0@Nc#@A  Signal handling follows the POSIX thread model: signals generated by a thread are delivered to that thread; signals generated externally are delivered to one of the threads that does not block it. Each thread possesses a set of blocked signals, which can be modified using {!Thread.sigmask}. This set is inherited at thread creation time. Per-thread signal masks are supported only by the system thread library under Unix, but not under Win32, nor by the VM thread library. H@@@@@@'sigmask@б@г3sigprocmask_command$Unix@@ @@@ ,@@б@гV$list@гu#int@@ @@@ E@@@@@@ J @@гr$list@г#int@@ @@@ a@@@@@@ f @@@#@@ i*@@@C@@ lF@@@@  [sigmask cmd sigs] changes the set of blocked signals for the calling thread. If [cmd] is [SIG_SETMASK], blocked signals are set to those in the list [sigs]. If [cmd] is [SIG_BLOCK], the signals in [sigs] are added to the set of blocked signals. If [cmd] is [SIG_UNBLOCK], the signals in [sigs] are removed from the set of blocked signals. [sigmask] returns the set of previously blocked signals for the thread. 9@@@@@@@P@,@+wait_signal@б@г$list@гѠ#int'(@@ @@@ 0)(()))))@6@A@@@ @@@  @@г堐#int;<@@ @@@ @@@@@ @@@F @ d [wait_signal sigs] suspends the execution of the calling thread until the process receives one of the signals specified in the list [sigs]. It then returns the number of the signal received. Signal handlers attached to the signals in [sigs] will not be invoked. The signals [sigs] are expected to be blocked before calling [wait_signal]. RS@@@@@@@jQ@@*h9 {1 Uncaught exceptions} cd4@@@@@@0baabbbbb@:Y#@A "default_uncaught_exception_handlero6:p6\@б@г4#exnz6_{6b@@ @@@ @@гࠐ$unit6f6j@@ @@@ '@@@@@ *@@@66 @P u [Thread.default_uncaught_exception_handler] will print the thread's id, exception and backtrace (if available). kk@@@@@@@R@@=>set_uncaught_exception_handler @б@б@гq#exn @@ @@@ 0@XS.@A@@г$unit@@ @@@ @@@@@ @@г/$unit!@@ @@@ @@@@@ "  @@@ @ [Thread.set_uncaught_exception_handler fn] registers [fn] as the handler for uncaught exceptions. If the newly set uncaught exception handler raise an exception, {!default_uncaught_exception_handler} will be called. "" @@@@@@@S@@6@A@N@:@@B@}@iB@@@j@6 @@N@:@@@t@@@t:@@0@_v<@A@ H************************************************************************ A@@!A@L@ H &BMM'BM@ H OCaml ,C-C@ H 2D3D3@ H Xavier Leroy and Pascal Cuoq, projet Cristal, INRIA Rocquencourt 8E449E4@ H >F?F@ H Copyright 1995 Institut National de Recherche en Informatique et DGEG@ H en Automatique. JHKHg@ H PIhhQIh@ H All rights reserved. This file is distributed under the terms of VJWJ@ H the GNU Lesser General Public License version 2.1, with the \K]KN@ H special exception on linking described in the file LICENSE. bLOOcLO@ H hMiM@ H************************************************************************nNoN5@ 5* Lightweight threads for Posix [1003.1c] and Win32. t>* The type of thread handles. ' &* {1 Thread creation and termination}  * [Thread.create funct arg] creates a new thread of control, in which the function application [funct arg] is executed concurrently with the other threads of the program. The application of [Thread.create] returns the handle of the newly created thread. The new thread terminates when the application [funct arg] returns, either normally or by raising the {!Thread.Exit} exception or by raising any other uncaught exception. In the last case, the uncaught exception is printed on standard error, but not propagated back to the parent thread. Similarly, the result of the application [funct arg] is discarded and not directly accessible to the parent thread. Ǡ 8* Return the handle for the thread currently executing.  * Return the identifier of the given thread. A thread identifier is an integer that identifies uniquely the thread. It can be used to build data structures indexed by threads. S ]* Exception that can be raised by user code to initiate termination of the current thread. Compared to calling the {!Thread.exit} function, raising the {!Thread.Exit} exception will trigger {!Fun.finally} finalizers and catch-all exception handlers. It is the recommended way to terminate threads prematurely. @since 4.14.0 8 8* Terminate prematurely the currently executing thread.  * This function was supposed to terminate prematurely the thread whose handle is given. It is not currently implemented due to problems with cleanup handlers on many POSIX 1003.1c implementations. It always raises the [Invalid_argument] exception. 9* {1 Suspending threads}  * [delay d] suspends the execution of the calling thread for [d] seconds. The other program threads continue to run during this time. b b* [join th] suspends the execution of the calling thread until the thread [th] has terminated. ( * Re-schedule the calling thread without suspending it. This function can be used to give scheduling hints, telling the scheduler that now is a good time to switch to other threads.  0* {1 Waiting for file descriptors or processes} ࠠ * The functions below are leftovers from an earlier, VM-based threading system. The {!Unix} module provides equivalent functionality, in a more general and more standard-conformant manner. It is recommended to use {!Unix} functions directly. Ҡ * This function does nothing in the current implementation of the threading library and can be removed from all user programs.  * This function does nothing in the current implementation of the threading library and can be removed from all user programs. * !* See {!Thread.wait_timed_write}.۠ * Suspend the execution of the calling thread until at least one character or EOF is available for reading ([wait_timed_read]) or one character can be written without blocking ([wait_timed_write]) on the given Unix file descriptor. Wait for at most the amount of time given as second argument (in seconds). Return [true] if the file descriptor is ready for input/output and [false] if the timeout expired. The same functionality can be achieved with {!Unix.select}.  * Same function as {!Unix.select}. Suspend the execution of the calling thread until input/output becomes possible on the given Unix file descriptors. The arguments and results have the same meaning as for {!Unix.select}.  * Same function as {!Unix.waitpid}. [wait_pid p] suspends the execution of the calling thread until the process specified by the process identifier [p] terminates. Returns the pid of the child caught and its termination status, as per {!Unix.wait}. 8<* {1 Management of signals} * * Signal handling follows the POSIX thread model: signals generated by a thread are delivered to that thread; signals generated externally are delivered to one of the threads that does not block it. Each thread possesses a set of blocked signals, which can be modified using {!Thread.sigmask}. This set is inherited at thread creation time. Per-thread signal masks are supported only by the system thread library under Unix, but not under Win32, nor by the VM thread library.  * [sigmask cmd sigs] changes the set of blocked signals for the calling thread. If [cmd] is [SIG_SETMASK], blocked signals are set to those in the list [sigs]. If [cmd] is [SIG_BLOCK], the signals in [sigs] are added to the set of blocked signals. If [cmd] is [SIG_UNBLOCK], the signals in [sigs] are removed from the set of blocked signals. [sigmask] returns the set of previously blocked signals for the thread.  e* [wait_signal sigs] suspends the execution of the calling thread until the process receives one of the signals specified in the list [sigs]. It then returns the number of the signal received. Signal handlers attached to the signals in [sigs] will not be invoked. The signals [sigs] are expected to be blocked before calling [wait_signal]. j:* {1 Uncaught exceptions} \ v* [Thread.default_uncaught_exception_handler] will print the thread's id, exception and backtrace (if available). $ * [Thread.set_uncaught_exception_handler fn] registers [fn] as the handler for uncaught exceptions. If the newly set uncaught exception handler raise an exception, {!default_uncaught_exception_handler} will be called. @<,../../ocamlc)-nostdlib"-I,../../stdlib"-I4../../otherlibs/unix"-c"-w'+33..39+-warn-error"+A"-g*-bin-annot,-safe-stringҐ H/home/barsac/ci/builds/workspace/step-by-step-build/otherlibs/systhreads @03=<ػ\0@@@8CamlinternalFormatBasics0cEXy