<html><head> <link rel="stylesheet" href="style.css" type="text/css"> <meta content="text/html; charset=iso-8859-1" http-equiv="Content-Type"> <link rel="Start" href="index.html"> <link title="Index of types" rel=Appendix href="index_types.html"> <link title="Index of exceptions" rel=Appendix href="index_exceptions.html"> <link title="Index of values" rel=Appendix href="index_values.html"> <link title="Index of modules" rel=Appendix href="index_modules.html"> <link title="Index of module types" rel=Appendix href="index_module_types.html"> <link title="Binary" rel="Chapter" href="Binary.html"> <link title="Bproto" rel="Chapter" href="Bproto.html"> <link title="Db" rel="Chapter" href="Db.html"> <link title="Graph" rel="Chapter" href="Graph.html"> <link title="Monitor_sig" rel="Chapter" href="Monitor_sig.html"> <link title="Ocamlviz" rel="Chapter" href="Ocamlviz.html"> <link title="Ocamlviz_threads" rel="Chapter" href="Ocamlviz_threads.html"> <link title="Protocol" rel="Chapter" href="Protocol.html"> <link title="Timemap" rel="Chapter" href="Timemap.html"><title>Monitor_sig.Monitor</title> </head> <body> <code class="code"><span class="keyword">sig</span><br> <span class="keyword">module</span> <span class="constructor">Point</span> :<br> <span class="keyword">sig</span><br> <span class="keyword">type</span> t<br> <span class="keyword">val</span> create : string <span class="keywordsign">-></span> <span class="constructor">Monitor_sig</span>.<span class="constructor">Monitor</span>.<span class="constructor">Point</span>.t<br> <span class="keyword">val</span> kill : <span class="constructor">Monitor_sig</span>.<span class="constructor">Monitor</span>.<span class="constructor">Point</span>.t <span class="keywordsign">-></span> unit<br> <span class="keyword">val</span> observe : <span class="constructor">Monitor_sig</span>.<span class="constructor">Monitor</span>.<span class="constructor">Point</span>.t <span class="keywordsign">-></span> unit<br> <span class="keyword">val</span> observe_calls : string <span class="keywordsign">-></span> (<span class="keywordsign">'</span>a <span class="keywordsign">-></span> <span class="keywordsign">'</span>b <span class="keywordsign">-></span> <span class="keywordsign">'</span>c) <span class="keywordsign">-></span> <span class="keywordsign">'</span>a <span class="keywordsign">-></span> <span class="keywordsign">'</span>b <span class="keywordsign">-></span> <span class="keywordsign">'</span>c<br> <span class="keyword">val</span> observe_calls2 : string <span class="keywordsign">-></span> (<span class="keywordsign">'</span>a <span class="keywordsign">-></span> <span class="keywordsign">'</span>b <span class="keywordsign">-></span> <span class="keywordsign">'</span>c) <span class="keywordsign">-></span> <span class="keywordsign">'</span>a <span class="keywordsign">-></span> <span class="keywordsign">'</span>b <span class="keywordsign">-></span> <span class="keywordsign">'</span>c<br> <span class="keyword">val</span> observe_calls_rec : string <span class="keywordsign">-></span> ((<span class="keywordsign">'</span>a <span class="keywordsign">-></span> <span class="keywordsign">'</span>b) <span class="keywordsign">-></span> <span class="keywordsign">'</span>a <span class="keywordsign">-></span> <span class="keywordsign">'</span>b) <span class="keywordsign">-></span> <span class="keywordsign">'</span>a <span class="keywordsign">-></span> <span class="keywordsign">'</span>b<br> <span class="keyword">val</span> observe_calls_rec2 :<br> string <span class="keywordsign">-></span> ((<span class="keywordsign">'</span>a <span class="keywordsign">-></span> <span class="keywordsign">'</span>b <span class="keywordsign">-></span> <span class="keywordsign">'</span>c) <span class="keywordsign">-></span> <span class="keywordsign">'</span>a <span class="keywordsign">-></span> <span class="keywordsign">'</span>b <span class="keywordsign">-></span> <span class="keywordsign">'</span>c) <span class="keywordsign">-></span> <span class="keywordsign">'</span>a <span class="keywordsign">-></span> <span class="keywordsign">'</span>b <span class="keywordsign">-></span> <span class="keywordsign">'</span>c<br> <span class="keyword">end</span><br> <span class="keyword">module</span> <span class="constructor">Tag</span> :<br> <span class="keyword">sig</span><br> <span class="keyword">module</span> <span class="constructor">WeakHash</span> :<br> <span class="keyword">sig</span><br> <span class="keyword">type</span> t<br> <span class="keyword">type</span> data<br> <span class="keyword">val</span> create : int <span class="keywordsign">-></span> <span class="constructor">Monitor_sig</span>.<span class="constructor">Monitor</span>.<span class="constructor">Tag</span>.<span class="constructor">WeakHash</span>.t<br> <span class="keyword">val</span> clear : <span class="constructor">Monitor_sig</span>.<span class="constructor">Monitor</span>.<span class="constructor">Tag</span>.<span class="constructor">WeakHash</span>.t <span class="keywordsign">-></span> unit<br> <span class="keyword">val</span> merge :<br> <span class="constructor">Monitor_sig</span>.<span class="constructor">Monitor</span>.<span class="constructor">Tag</span>.<span class="constructor">WeakHash</span>.t <span class="keywordsign">-></span><br> <span class="constructor">Monitor_sig</span>.<span class="constructor">Monitor</span>.<span class="constructor">Tag</span>.<span class="constructor">WeakHash</span>.data <span class="keywordsign">-></span><br> <span class="constructor">Monitor_sig</span>.<span class="constructor">Monitor</span>.<span class="constructor">Tag</span>.<span class="constructor">WeakHash</span>.data<br> <span class="keyword">val</span> add :<br> <span class="constructor">Monitor_sig</span>.<span class="constructor">Monitor</span>.<span class="constructor">Tag</span>.<span class="constructor">WeakHash</span>.t <span class="keywordsign">-></span><br> <span class="constructor">Monitor_sig</span>.<span class="constructor">Monitor</span>.<span class="constructor">Tag</span>.<span class="constructor">WeakHash</span>.data <span class="keywordsign">-></span> unit<br> <span class="keyword">val</span> remove :<br> <span class="constructor">Monitor_sig</span>.<span class="constructor">Monitor</span>.<span class="constructor">Tag</span>.<span class="constructor">WeakHash</span>.t <span class="keywordsign">-></span><br> <span class="constructor">Monitor_sig</span>.<span class="constructor">Monitor</span>.<span class="constructor">Tag</span>.<span class="constructor">WeakHash</span>.data <span class="keywordsign">-></span> unit<br> <span class="keyword">val</span> find :<br> <span class="constructor">Monitor_sig</span>.<span class="constructor">Monitor</span>.<span class="constructor">Tag</span>.<span class="constructor">WeakHash</span>.t <span class="keywordsign">-></span><br> <span class="constructor">Monitor_sig</span>.<span class="constructor">Monitor</span>.<span class="constructor">Tag</span>.<span class="constructor">WeakHash</span>.data <span class="keywordsign">-></span><br> <span class="constructor">Monitor_sig</span>.<span class="constructor">Monitor</span>.<span class="constructor">Tag</span>.<span class="constructor">WeakHash</span>.data<br> <span class="keyword">val</span> find_all :<br> <span class="constructor">Monitor_sig</span>.<span class="constructor">Monitor</span>.<span class="constructor">Tag</span>.<span class="constructor">WeakHash</span>.t <span class="keywordsign">-></span><br> <span class="constructor">Monitor_sig</span>.<span class="constructor">Monitor</span>.<span class="constructor">Tag</span>.<span class="constructor">WeakHash</span>.data <span class="keywordsign">-></span><br> <span class="constructor">Monitor_sig</span>.<span class="constructor">Monitor</span>.<span class="constructor">Tag</span>.<span class="constructor">WeakHash</span>.data list<br> <span class="keyword">val</span> mem :<br> <span class="constructor">Monitor_sig</span>.<span class="constructor">Monitor</span>.<span class="constructor">Tag</span>.<span class="constructor">WeakHash</span>.t <span class="keywordsign">-></span><br> <span class="constructor">Monitor_sig</span>.<span class="constructor">Monitor</span>.<span class="constructor">Tag</span>.<span class="constructor">WeakHash</span>.data <span class="keywordsign">-></span> bool<br> <span class="keyword">val</span> iter :<br> (<span class="constructor">Monitor_sig</span>.<span class="constructor">Monitor</span>.<span class="constructor">Tag</span>.<span class="constructor">WeakHash</span>.data <span class="keywordsign">-></span> unit) <span class="keywordsign">-></span><br> <span class="constructor">Monitor_sig</span>.<span class="constructor">Monitor</span>.<span class="constructor">Tag</span>.<span class="constructor">WeakHash</span>.t <span class="keywordsign">-></span> unit<br> <span class="keyword">val</span> fold :<br> (<span class="constructor">Monitor_sig</span>.<span class="constructor">Monitor</span>.<span class="constructor">Tag</span>.<span class="constructor">WeakHash</span>.data <span class="keywordsign">-></span> <span class="keywordsign">'</span>a <span class="keywordsign">-></span> <span class="keywordsign">'</span>a) <span class="keywordsign">-></span><br> <span class="constructor">Monitor_sig</span>.<span class="constructor">Monitor</span>.<span class="constructor">Tag</span>.<span class="constructor">WeakHash</span>.t <span class="keywordsign">-></span> <span class="keywordsign">'</span>a <span class="keywordsign">-></span> <span class="keywordsign">'</span>a<br> <span class="keyword">val</span> count : <span class="constructor">Monitor_sig</span>.<span class="constructor">Monitor</span>.<span class="constructor">Tag</span>.<span class="constructor">WeakHash</span>.t <span class="keywordsign">-></span> int<br> <span class="keyword">val</span> stats :<br> <span class="constructor">Monitor_sig</span>.<span class="constructor">Monitor</span>.<span class="constructor">Tag</span>.<span class="constructor">WeakHash</span>.t <span class="keywordsign">-></span><br> int * int * int * int * int * int<br> <span class="keyword">end</span><br> <span class="keyword">type</span> t<br> <span class="keyword">val</span> create :<br> ?size:bool <span class="keywordsign">-></span><br> ?count:bool <span class="keywordsign">-></span><br> ?fct_size:(<span class="constructor">Monitor_sig</span>.<span class="constructor">Monitor</span>.<span class="constructor">Tag</span>.<span class="constructor">WeakHash</span>.t <span class="keywordsign">-></span> <span class="constructor">Int64</span>.t) <span class="keywordsign">-></span><br> ?period:int <span class="keywordsign">-></span> string <span class="keywordsign">-></span> <span class="constructor">Monitor_sig</span>.<span class="constructor">Monitor</span>.<span class="constructor">Tag</span>.t<br> <span class="keyword">val</span> kill : <span class="constructor">Monitor_sig</span>.<span class="constructor">Monitor</span>.<span class="constructor">Tag</span>.t <span class="keywordsign">-></span> unit<br> <span class="keyword">val</span> set_period : <span class="constructor">Monitor_sig</span>.<span class="constructor">Monitor</span>.<span class="constructor">Tag</span>.t <span class="keywordsign">-></span> int <span class="keywordsign">-></span> unit<br> <span class="keyword">val</span> mark : <span class="constructor">Monitor_sig</span>.<span class="constructor">Monitor</span>.<span class="constructor">Tag</span>.t <span class="keywordsign">-></span> <span class="keywordsign">'</span>a <span class="keywordsign">-></span> <span class="keywordsign">'</span>a<br> <span class="keyword">end</span><br> <span class="keyword">module</span> <span class="constructor">Time</span> :<br> <span class="keyword">sig</span><br> <span class="keyword">type</span> t<br> <span class="keyword">val</span> elapsed_time : unit <span class="keywordsign">-></span> float<br> <span class="keyword">val</span> create : string <span class="keywordsign">-></span> <span class="constructor">Monitor_sig</span>.<span class="constructor">Monitor</span>.<span class="constructor">Time</span>.t<br> <span class="keyword">val</span> kill : <span class="constructor">Monitor_sig</span>.<span class="constructor">Monitor</span>.<span class="constructor">Time</span>.t <span class="keywordsign">-></span> unit<br> <span class="keyword">val</span> start : <span class="constructor">Monitor_sig</span>.<span class="constructor">Monitor</span>.<span class="constructor">Time</span>.t <span class="keywordsign">-></span> unit<br> <span class="keyword">val</span> stop : <span class="constructor">Monitor_sig</span>.<span class="constructor">Monitor</span>.<span class="constructor">Time</span>.t <span class="keywordsign">-></span> unit<br> <span class="keyword">val</span> time : string <span class="keywordsign">-></span> (<span class="keywordsign">'</span>a <span class="keywordsign">-></span> <span class="keywordsign">'</span>b) <span class="keywordsign">-></span> <span class="keywordsign">'</span>a <span class="keywordsign">-></span> <span class="keywordsign">'</span>b<br> <span class="keyword">end</span><br> <span class="keyword">module</span> <span class="constructor">Value</span> :<br> <span class="keyword">sig</span><br> <span class="keyword">val</span> observe_int_fct :<br> ?weak:bool <span class="keywordsign">-></span> ?period:int <span class="keywordsign">-></span> string <span class="keywordsign">-></span> (unit <span class="keywordsign">-></span> int) <span class="keywordsign">-></span> unit<br> <span class="keyword">val</span> observe_int : ?weak:bool <span class="keywordsign">-></span> ?period:int <span class="keywordsign">-></span> string <span class="keywordsign">-></span> int <span class="keywordsign">-></span> unit<br> <span class="keyword">val</span> observe_float_fct :<br> ?weak:bool <span class="keywordsign">-></span> ?period:int <span class="keywordsign">-></span> string <span class="keywordsign">-></span> (unit <span class="keywordsign">-></span> float) <span class="keywordsign">-></span> unit<br> <span class="keyword">val</span> observe_float :<br> ?weak:bool <span class="keywordsign">-></span> ?period:int <span class="keywordsign">-></span> string <span class="keywordsign">-></span> float <span class="keywordsign">-></span> unit<br> <span class="keyword">val</span> observe_bool_fct :<br> ?weak:bool <span class="keywordsign">-></span> ?period:int <span class="keywordsign">-></span> string <span class="keywordsign">-></span> (unit <span class="keywordsign">-></span> bool) <span class="keywordsign">-></span> unit<br> <span class="keyword">val</span> observe_bool : ?weak:bool <span class="keywordsign">-></span> ?period:int <span class="keywordsign">-></span> string <span class="keywordsign">-></span> bool <span class="keywordsign">-></span> unit<br> <span class="keyword">val</span> observe_string_fct :<br> ?weak:bool <span class="keywordsign">-></span> ?period:int <span class="keywordsign">-></span> string <span class="keywordsign">-></span> (unit <span class="keywordsign">-></span> string) <span class="keywordsign">-></span> unit<br> <span class="keyword">val</span> observe_string :<br> ?weak:bool <span class="keywordsign">-></span> ?period:int <span class="keywordsign">-></span> string <span class="keywordsign">-></span> string <span class="keywordsign">-></span> unit<br> <span class="keyword">val</span> observe_int_ref :<br> ?period:int <span class="keywordsign">-></span> string <span class="keywordsign">-></span> int <span class="constructor">Pervasives</span>.ref <span class="keywordsign">-></span> int <span class="constructor">Pervasives</span>.ref<br> <span class="keyword">val</span> observe_float_ref :<br> ?period:int <span class="keywordsign">-></span> string <span class="keywordsign">-></span> float <span class="constructor">Pervasives</span>.ref <span class="keywordsign">-></span> float <span class="constructor">Pervasives</span>.ref<br> <span class="keyword">val</span> observe_bool_ref :<br> ?period:int <span class="keywordsign">-></span> string <span class="keywordsign">-></span> bool <span class="constructor">Pervasives</span>.ref <span class="keywordsign">-></span> bool <span class="constructor">Pervasives</span>.ref<br> <span class="keyword">val</span> observe_string_ref :<br> ?period:int <span class="keywordsign">-></span><br> string <span class="keywordsign">-></span> string <span class="constructor">Pervasives</span>.ref <span class="keywordsign">-></span> string <span class="constructor">Pervasives</span>.ref<br> <span class="keyword">end</span><br> <span class="keyword">module</span> <span class="constructor">Tree</span> :<br> <span class="keyword">sig</span><br> <span class="keyword">val</span> observe :<br> ?period:int <span class="keywordsign">-></span> string <span class="keywordsign">-></span> (unit <span class="keywordsign">-></span> <span class="constructor">Protocol</span>.variant) <span class="keywordsign">-></span> unit<br> <span class="keyword">end</span><br> <span class="keyword">module</span> <span class="constructor">Hashtable</span> :<br> <span class="keyword">sig</span> <span class="keyword">type</span> <span class="keywordsign">'</span>a t <span class="keyword">val</span> observe : ?period:int <span class="keywordsign">-></span> string <span class="keywordsign">-></span> <span class="keywordsign">'</span>a <span class="keywordsign">-></span> <span class="keywordsign">'</span>a <span class="keyword">end</span><br> <span class="keyword">val</span> to_send : unit <span class="keywordsign">-></span> string<br> <span class="keyword">val</span> declare_tags : unit <span class="keywordsign">-></span> string<br> <span class="keyword">val</span> log : (<span class="keywordsign">'</span>a, <span class="constructor">Format</span>.formatter, unit, unit) <span class="constructor">Pervasives</span>.format4 <span class="keywordsign">-></span> <span class="keywordsign">'</span>a<br> <span class="keyword">val</span> wait_for_connected_clients : int <span class="keywordsign">-></span> unit<br> <span class="keyword">val</span> wait_for_killed_clients : unit <span class="keywordsign">-></span> unit<br> <span class="keyword">val</span> set_nb_clients : int <span class="keywordsign">-></span> unit<br> <span class="keyword">end</span></code></body></html>