mirror of
https://github.com/c-cube/ocaml-containers.git
synced 2025-12-06 11:15:31 -05:00
167 lines
No EOL
31 KiB
HTML
167 lines
No EOL
31 KiB
HTML
<html><head>
|
|
<link rel="stylesheet" href="style.css" type="text/css">
|
|
<meta content="text/html; charset=utf-8" http-equiv="Content-Type">
|
|
<meta name="viewport" content="width=device-width, initial-scale=1">
|
|
<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 class methods" rel=Appendix href="index_methods.html">
|
|
<link title="Index of class types" rel=Appendix href="index_class_types.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="CCVector" rel="Chapter" href="CCVector.html">
|
|
<link title="CCHeap" rel="Chapter" href="CCHeap.html">
|
|
<link title="CCList" rel="Chapter" href="CCList.html">
|
|
<link title="CCOpt" rel="Chapter" href="CCOpt.html">
|
|
<link title="CCPair" rel="Chapter" href="CCPair.html">
|
|
<link title="CCFun" rel="Chapter" href="CCFun.html">
|
|
<link title="CCHash" rel="Chapter" href="CCHash.html">
|
|
<link title="CCInt" rel="Chapter" href="CCInt.html">
|
|
<link title="CCBool" rel="Chapter" href="CCBool.html">
|
|
<link title="CCFloat" rel="Chapter" href="CCFloat.html">
|
|
<link title="CCArray" rel="Chapter" href="CCArray.html">
|
|
<link title="CCRef" rel="Chapter" href="CCRef.html">
|
|
<link title="CCSet" rel="Chapter" href="CCSet.html">
|
|
<link title="CCOrd" rel="Chapter" href="CCOrd.html">
|
|
<link title="CCRandom" rel="Chapter" href="CCRandom.html">
|
|
<link title="CCString" rel="Chapter" href="CCString.html">
|
|
<link title="CCHashtbl" rel="Chapter" href="CCHashtbl.html">
|
|
<link title="CCMap" rel="Chapter" href="CCMap.html">
|
|
<link title="CCFormat" rel="Chapter" href="CCFormat.html">
|
|
<link title="CCIO" rel="Chapter" href="CCIO.html">
|
|
<link title="CCInt64" rel="Chapter" href="CCInt64.html">
|
|
<link title="CCChar" rel="Chapter" href="CCChar.html">
|
|
<link title="CCResult" rel="Chapter" href="CCResult.html">
|
|
<link title="CCParse" rel="Chapter" href="CCParse.html">
|
|
<link title="CCArray_slice" rel="Chapter" href="CCArray_slice.html">
|
|
<link title="CCListLabels" rel="Chapter" href="CCListLabels.html">
|
|
<link title="CCArrayLabels" rel="Chapter" href="CCArrayLabels.html">
|
|
<link title="CCEqual" rel="Chapter" href="CCEqual.html">
|
|
<link title="Containers" rel="Chapter" href="Containers.html">
|
|
<link title="CCKTree" rel="Chapter" href="CCKTree.html">
|
|
<link title="CCKList" rel="Chapter" href="CCKList.html">
|
|
<link title="CCLazy_list" rel="Chapter" href="CCLazy_list.html">
|
|
<link title="CCMultiMap" rel="Chapter" href="CCMultiMap.html">
|
|
<link title="CCMultiSet" rel="Chapter" href="CCMultiSet.html">
|
|
<link title="CCTrie" rel="Chapter" href="CCTrie.html">
|
|
<link title="CCFlatHashtbl" rel="Chapter" href="CCFlatHashtbl.html">
|
|
<link title="CCCache" rel="Chapter" href="CCCache.html">
|
|
<link title="CCPersistentHashtbl" rel="Chapter" href="CCPersistentHashtbl.html">
|
|
<link title="CCDeque" rel="Chapter" href="CCDeque.html">
|
|
<link title="CCFQueue" rel="Chapter" href="CCFQueue.html">
|
|
<link title="CCBV" rel="Chapter" href="CCBV.html">
|
|
<link title="CCMixtbl" rel="Chapter" href="CCMixtbl.html">
|
|
<link title="CCMixmap" rel="Chapter" href="CCMixmap.html">
|
|
<link title="CCRingBuffer" rel="Chapter" href="CCRingBuffer.html">
|
|
<link title="CCIntMap" rel="Chapter" href="CCIntMap.html">
|
|
<link title="CCPersistentArray" rel="Chapter" href="CCPersistentArray.html">
|
|
<link title="CCMixset" rel="Chapter" href="CCMixset.html">
|
|
<link title="CCGraph" rel="Chapter" href="CCGraph.html">
|
|
<link title="CCHashSet" rel="Chapter" href="CCHashSet.html">
|
|
<link title="CCBitField" rel="Chapter" href="CCBitField.html">
|
|
<link title="CCHashTrie" rel="Chapter" href="CCHashTrie.html">
|
|
<link title="CCWBTree" rel="Chapter" href="CCWBTree.html">
|
|
<link title="CCRAL" rel="Chapter" href="CCRAL.html">
|
|
<link title="CCSimple_queue" rel="Chapter" href="CCSimple_queue.html">
|
|
<link title="CCImmutArray" rel="Chapter" href="CCImmutArray.html">
|
|
<link title="CCHet" rel="Chapter" href="CCHet.html">
|
|
<link title="CCZipper" rel="Chapter" href="CCZipper.html">
|
|
<link title="CCPool" rel="Chapter" href="CCPool.html">
|
|
<link title="CCLock" rel="Chapter" href="CCLock.html">
|
|
<link title="CCSemaphore" rel="Chapter" href="CCSemaphore.html">
|
|
<link title="CCThread" rel="Chapter" href="CCThread.html">
|
|
<link title="CCBlockingQueue" rel="Chapter" href="CCBlockingQueue.html">
|
|
<link title="CCTimer" rel="Chapter" href="CCTimer.html">
|
|
<link title="CCUnix" rel="Chapter" href="CCUnix.html">
|
|
<link title="CCSexp" rel="Chapter" href="CCSexp.html">
|
|
<link title="CCSexp_lex" rel="Chapter" href="CCSexp_lex.html"><title>Containers doc : CCPool</title>
|
|
</head>
|
|
<body>
|
|
<code class="code"><span class="keyword">sig</span><br>
|
|
<span class="keyword">type</span> <span class="keywordsign">'</span>a state = <span class="constructor">Done</span> <span class="keyword">of</span> <span class="keywordsign">'</span>a <span class="keywordsign">|</span> <span class="constructor">Waiting</span> <span class="keywordsign">|</span> <span class="constructor">Failed</span> <span class="keyword">of</span> exn<br>
|
|
<span class="keyword">module</span> <span class="keyword">type</span> <span class="constructor">PARAM</span> = <span class="keyword">sig</span> <span class="keyword">val</span> min_size : int <span class="keyword">val</span> max_size : int <span class="keyword">end</span><br>
|
|
<span class="keyword">exception</span> <span class="constructor">Stopped</span><br>
|
|
<span class="keyword">module</span> <span class="constructor">Make</span> :<br>
|
|
<span class="keyword">functor</span> (<span class="constructor">P</span> : <span class="constructor">PARAM</span>) <span class="keywordsign">-></span><br>
|
|
<span class="keyword">sig</span><br>
|
|
<span class="keyword">val</span> run : (unit <span class="keywordsign">-></span> <span class="keywordsign">'</span>a) <span class="keywordsign">-></span> unit<br>
|
|
<span class="keyword">val</span> run1 : (<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> unit<br>
|
|
<span class="keyword">val</span> run2 : (<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> unit<br>
|
|
<span class="keyword">val</span> run3 : (<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>d) <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> unit<br>
|
|
<span class="keyword">val</span> set_exn_handler : (exn <span class="keywordsign">-></span> unit) <span class="keywordsign">-></span> unit<br>
|
|
<span class="keyword">val</span> active : unit <span class="keywordsign">-></span> bool<br>
|
|
<span class="keyword">val</span> stop : unit <span class="keywordsign">-></span> unit<br>
|
|
<span class="keyword">module</span> <span class="constructor">Fut</span> :<br>
|
|
<span class="keyword">sig</span><br>
|
|
<span class="keyword">type</span> <span class="keywordsign">'</span>a t<br>
|
|
<span class="keyword">type</span> <span class="keywordsign">'</span>a future = <span class="keywordsign">'</span>a <span class="constructor">CCPool</span>.<span class="constructor">Make</span>.<span class="constructor">Fut</span>.t<br>
|
|
<span class="keyword">val</span> return : <span class="keywordsign">'</span>a <span class="keywordsign">-></span> <span class="keywordsign">'</span>a <span class="constructor">CCPool</span>.<span class="constructor">Make</span>.<span class="constructor">Fut</span>.t<br>
|
|
<span class="keyword">val</span> fail : exn <span class="keywordsign">-></span> <span class="keywordsign">'</span>a <span class="constructor">CCPool</span>.<span class="constructor">Make</span>.<span class="constructor">Fut</span>.t<br>
|
|
<span class="keyword">val</span> make : (unit <span class="keywordsign">-></span> <span class="keywordsign">'</span>a) <span class="keywordsign">-></span> <span class="keywordsign">'</span>a <span class="constructor">CCPool</span>.<span class="constructor">Make</span>.<span class="constructor">Fut</span>.t<br>
|
|
<span class="keyword">val</span> make1 : (<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="constructor">CCPool</span>.<span class="constructor">Make</span>.<span class="constructor">Fut</span>.t<br>
|
|
<span class="keyword">val</span> make2 : (<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="constructor">CCPool</span>.<span class="constructor">Make</span>.<span class="constructor">Fut</span>.t<br>
|
|
<span class="keyword">val</span> get : <span class="keywordsign">'</span>a <span class="constructor">CCPool</span>.<span class="constructor">Make</span>.<span class="constructor">Fut</span>.t <span class="keywordsign">-></span> <span class="keywordsign">'</span>a<br>
|
|
<span class="keyword">val</span> state : <span class="keywordsign">'</span>a <span class="constructor">CCPool</span>.<span class="constructor">Make</span>.<span class="constructor">Fut</span>.t <span class="keywordsign">-></span> <span class="keywordsign">'</span>a <span class="constructor">CCPool</span>.state<br>
|
|
<span class="keyword">val</span> is_done : <span class="keywordsign">'</span>a <span class="constructor">CCPool</span>.<span class="constructor">Make</span>.<span class="constructor">Fut</span>.t <span class="keywordsign">-></span> bool<br>
|
|
<span class="keyword">val</span> on_success : <span class="keywordsign">'</span>a <span class="constructor">CCPool</span>.<span class="constructor">Make</span>.<span class="constructor">Fut</span>.t <span class="keywordsign">-></span> (<span class="keywordsign">'</span>a <span class="keywordsign">-></span> unit) <span class="keywordsign">-></span> unit<br>
|
|
<span class="keyword">val</span> on_failure : <span class="keywordsign">'</span>a <span class="constructor">CCPool</span>.<span class="constructor">Make</span>.<span class="constructor">Fut</span>.t <span class="keywordsign">-></span> (exn <span class="keywordsign">-></span> unit) <span class="keywordsign">-></span> unit<br>
|
|
<span class="keyword">val</span> on_finish :<br>
|
|
<span class="keywordsign">'</span>a <span class="constructor">CCPool</span>.<span class="constructor">Make</span>.<span class="constructor">Fut</span>.t <span class="keywordsign">-></span> (<span class="keywordsign">'</span>a <span class="constructor">CCPool</span>.state <span class="keywordsign">-></span> unit) <span class="keywordsign">-></span> unit<br>
|
|
<span class="keyword">val</span> flat_map :<br>
|
|
(<span class="keywordsign">'</span>a <span class="keywordsign">-></span> <span class="keywordsign">'</span>b <span class="constructor">CCPool</span>.<span class="constructor">Make</span>.<span class="constructor">Fut</span>.t) <span class="keywordsign">-></span><br>
|
|
<span class="keywordsign">'</span>a <span class="constructor">CCPool</span>.<span class="constructor">Make</span>.<span class="constructor">Fut</span>.t <span class="keywordsign">-></span> <span class="keywordsign">'</span>b <span class="constructor">CCPool</span>.<span class="constructor">Make</span>.<span class="constructor">Fut</span>.t<br>
|
|
<span class="keyword">val</span> and_then :<br>
|
|
<span class="keywordsign">'</span>a <span class="constructor">CCPool</span>.<span class="constructor">Make</span>.<span class="constructor">Fut</span>.t <span class="keywordsign">-></span><br>
|
|
(unit <span class="keywordsign">-></span> <span class="keywordsign">'</span>b <span class="constructor">CCPool</span>.<span class="constructor">Make</span>.<span class="constructor">Fut</span>.t) <span class="keywordsign">-></span> <span class="keywordsign">'</span>b <span class="constructor">CCPool</span>.<span class="constructor">Make</span>.<span class="constructor">Fut</span>.t<br>
|
|
<span class="keyword">val</span> sequence_a :<br>
|
|
<span class="keywordsign">'</span>a <span class="constructor">CCPool</span>.<span class="constructor">Make</span>.<span class="constructor">Fut</span>.t array <span class="keywordsign">-></span> <span class="keywordsign">'</span>a array <span class="constructor">CCPool</span>.<span class="constructor">Make</span>.<span class="constructor">Fut</span>.t<br>
|
|
<span class="keyword">val</span> map_a :<br>
|
|
(<span class="keywordsign">'</span>a <span class="keywordsign">-></span> <span class="keywordsign">'</span>b <span class="constructor">CCPool</span>.<span class="constructor">Make</span>.<span class="constructor">Fut</span>.t) <span class="keywordsign">-></span><br>
|
|
<span class="keywordsign">'</span>a array <span class="keywordsign">-></span> <span class="keywordsign">'</span>b array <span class="constructor">CCPool</span>.<span class="constructor">Make</span>.<span class="constructor">Fut</span>.t<br>
|
|
<span class="keyword">val</span> sequence_l :<br>
|
|
<span class="keywordsign">'</span>a <span class="constructor">CCPool</span>.<span class="constructor">Make</span>.<span class="constructor">Fut</span>.t list <span class="keywordsign">-></span> <span class="keywordsign">'</span>a list <span class="constructor">CCPool</span>.<span class="constructor">Make</span>.<span class="constructor">Fut</span>.t<br>
|
|
<span class="keyword">val</span> map_l :<br>
|
|
(<span class="keywordsign">'</span>a <span class="keywordsign">-></span> <span class="keywordsign">'</span>b <span class="constructor">CCPool</span>.<span class="constructor">Make</span>.<span class="constructor">Fut</span>.t) <span class="keywordsign">-></span><br>
|
|
<span class="keywordsign">'</span>a list <span class="keywordsign">-></span> <span class="keywordsign">'</span>b list <span class="constructor">CCPool</span>.<span class="constructor">Make</span>.<span class="constructor">Fut</span>.t<br>
|
|
<span class="keyword">val</span> choose_a : <span class="keywordsign">'</span>a <span class="constructor">CCPool</span>.<span class="constructor">Make</span>.<span class="constructor">Fut</span>.t array <span class="keywordsign">-></span> <span class="keywordsign">'</span>a <span class="constructor">CCPool</span>.<span class="constructor">Make</span>.<span class="constructor">Fut</span>.t<br>
|
|
<span class="keyword">val</span> choose_l : <span class="keywordsign">'</span>a <span class="constructor">CCPool</span>.<span class="constructor">Make</span>.<span class="constructor">Fut</span>.t list <span class="keywordsign">-></span> <span class="keywordsign">'</span>a <span class="constructor">CCPool</span>.<span class="constructor">Make</span>.<span class="constructor">Fut</span>.t<br>
|
|
<span class="keyword">val</span> map :<br>
|
|
(<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="constructor">CCPool</span>.<span class="constructor">Make</span>.<span class="constructor">Fut</span>.t <span class="keywordsign">-></span> <span class="keywordsign">'</span>b <span class="constructor">CCPool</span>.<span class="constructor">Make</span>.<span class="constructor">Fut</span>.t<br>
|
|
<span class="keyword">val</span> map_async :<br>
|
|
(<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="constructor">CCPool</span>.<span class="constructor">Make</span>.<span class="constructor">Fut</span>.t <span class="keywordsign">-></span> <span class="keywordsign">'</span>b <span class="constructor">CCPool</span>.<span class="constructor">Make</span>.<span class="constructor">Fut</span>.t<br>
|
|
<span class="keyword">val</span> app :<br>
|
|
(<span class="keywordsign">'</span>a <span class="keywordsign">-></span> <span class="keywordsign">'</span>b) <span class="constructor">CCPool</span>.<span class="constructor">Make</span>.<span class="constructor">Fut</span>.t <span class="keywordsign">-></span><br>
|
|
<span class="keywordsign">'</span>a <span class="constructor">CCPool</span>.<span class="constructor">Make</span>.<span class="constructor">Fut</span>.t <span class="keywordsign">-></span> <span class="keywordsign">'</span>b <span class="constructor">CCPool</span>.<span class="constructor">Make</span>.<span class="constructor">Fut</span>.t<br>
|
|
<span class="keyword">val</span> app_async :<br>
|
|
(<span class="keywordsign">'</span>a <span class="keywordsign">-></span> <span class="keywordsign">'</span>b) <span class="constructor">CCPool</span>.<span class="constructor">Make</span>.<span class="constructor">Fut</span>.t <span class="keywordsign">-></span><br>
|
|
<span class="keywordsign">'</span>a <span class="constructor">CCPool</span>.<span class="constructor">Make</span>.<span class="constructor">Fut</span>.t <span class="keywordsign">-></span> <span class="keywordsign">'</span>b <span class="constructor">CCPool</span>.<span class="constructor">Make</span>.<span class="constructor">Fut</span>.t<br>
|
|
<span class="keyword">val</span> sleep : float <span class="keywordsign">-></span> unit <span class="constructor">CCPool</span>.<span class="constructor">Make</span>.<span class="constructor">Fut</span>.t<br>
|
|
<span class="keyword">module</span> <span class="constructor">Infix</span> :<br>
|
|
<span class="keyword">sig</span><br>
|
|
<span class="keyword">val</span> ( >>= ) :<br>
|
|
<span class="keywordsign">'</span>a <span class="constructor">CCPool</span>.<span class="constructor">Make</span>.<span class="constructor">Fut</span>.t <span class="keywordsign">-></span><br>
|
|
(<span class="keywordsign">'</span>a <span class="keywordsign">-></span> <span class="keywordsign">'</span>b <span class="constructor">CCPool</span>.<span class="constructor">Make</span>.<span class="constructor">Fut</span>.t) <span class="keywordsign">-></span> <span class="keywordsign">'</span>b <span class="constructor">CCPool</span>.<span class="constructor">Make</span>.<span class="constructor">Fut</span>.t<br>
|
|
<span class="keyword">val</span> ( >> ) :<br>
|
|
<span class="keywordsign">'</span>a <span class="constructor">CCPool</span>.<span class="constructor">Make</span>.<span class="constructor">Fut</span>.t <span class="keywordsign">-></span><br>
|
|
(unit <span class="keywordsign">-></span> <span class="keywordsign">'</span>b <span class="constructor">CCPool</span>.<span class="constructor">Make</span>.<span class="constructor">Fut</span>.t) <span class="keywordsign">-></span> <span class="keywordsign">'</span>b <span class="constructor">CCPool</span>.<span class="constructor">Make</span>.<span class="constructor">Fut</span>.t<br>
|
|
<span class="keyword">val</span> ( >|= ) :<br>
|
|
<span class="keywordsign">'</span>a <span class="constructor">CCPool</span>.<span class="constructor">Make</span>.<span class="constructor">Fut</span>.t <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>b <span class="constructor">CCPool</span>.<span class="constructor">Make</span>.<span class="constructor">Fut</span>.t<br>
|
|
<span class="keyword">val</span> ( <*> ) :<br>
|
|
(<span class="keywordsign">'</span>a <span class="keywordsign">-></span> <span class="keywordsign">'</span>b) <span class="constructor">CCPool</span>.<span class="constructor">Make</span>.<span class="constructor">Fut</span>.t <span class="keywordsign">-></span><br>
|
|
<span class="keywordsign">'</span>a <span class="constructor">CCPool</span>.<span class="constructor">Make</span>.<span class="constructor">Fut</span>.t <span class="keywordsign">-></span> <span class="keywordsign">'</span>b <span class="constructor">CCPool</span>.<span class="constructor">Make</span>.<span class="constructor">Fut</span>.t<br>
|
|
<span class="keyword">end</span><br>
|
|
<span class="keyword">val</span> ( >>= ) :<br>
|
|
<span class="keywordsign">'</span>a <span class="constructor">CCPool</span>.<span class="constructor">Make</span>.<span class="constructor">Fut</span>.t <span class="keywordsign">-></span><br>
|
|
(<span class="keywordsign">'</span>a <span class="keywordsign">-></span> <span class="keywordsign">'</span>b <span class="constructor">CCPool</span>.<span class="constructor">Make</span>.<span class="constructor">Fut</span>.t) <span class="keywordsign">-></span> <span class="keywordsign">'</span>b <span class="constructor">CCPool</span>.<span class="constructor">Make</span>.<span class="constructor">Fut</span>.t<br>
|
|
<span class="keyword">val</span> ( >> ) :<br>
|
|
<span class="keywordsign">'</span>a <span class="constructor">CCPool</span>.<span class="constructor">Make</span>.<span class="constructor">Fut</span>.t <span class="keywordsign">-></span><br>
|
|
(unit <span class="keywordsign">-></span> <span class="keywordsign">'</span>b <span class="constructor">CCPool</span>.<span class="constructor">Make</span>.<span class="constructor">Fut</span>.t) <span class="keywordsign">-></span> <span class="keywordsign">'</span>b <span class="constructor">CCPool</span>.<span class="constructor">Make</span>.<span class="constructor">Fut</span>.t<br>
|
|
<span class="keyword">val</span> ( >|= ) :<br>
|
|
<span class="keywordsign">'</span>a <span class="constructor">CCPool</span>.<span class="constructor">Make</span>.<span class="constructor">Fut</span>.t <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>b <span class="constructor">CCPool</span>.<span class="constructor">Make</span>.<span class="constructor">Fut</span>.t<br>
|
|
<span class="keyword">val</span> ( <*> ) :<br>
|
|
(<span class="keywordsign">'</span>a <span class="keywordsign">-></span> <span class="keywordsign">'</span>b) <span class="constructor">CCPool</span>.<span class="constructor">Make</span>.<span class="constructor">Fut</span>.t <span class="keywordsign">-></span><br>
|
|
<span class="keywordsign">'</span>a <span class="constructor">CCPool</span>.<span class="constructor">Make</span>.<span class="constructor">Fut</span>.t <span class="keywordsign">-></span> <span class="keywordsign">'</span>b <span class="constructor">CCPool</span>.<span class="constructor">Make</span>.<span class="constructor">Fut</span>.t<br>
|
|
<span class="keyword">end</span><br>
|
|
<span class="keyword">end</span><br>
|
|
<span class="keyword">end</span></code></body></html> |