<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="Fetch" rel="Chapter" href="Fetch.html"><title>Fetch</title> </head> <body> <code class="code"><span class="keyword">sig</span><br> <span class="keyword">type</span> protocol = string<br> <span class="keyword">exception</span> <span class="constructor">Error</span> <span class="keyword">of</span> exn<br> <span class="keyword">exception</span> <span class="constructor">Not_implemented</span><br> <span class="keyword">exception</span> <span class="constructor">Unknown_protocol</span> <span class="keyword">of</span> <span class="constructor">Fetch</span>.protocol<br> <span class="keyword">exception</span> <span class="constructor">Bad_URI</span><br> <span class="keyword">type</span> uri = string<br> <span class="keyword">val</span> supported_protocols : unit <span class="keywordsign">-></span> <span class="constructor">Fetch</span>.protocol list<br> <span class="keyword">val</span> get_protocol : <span class="constructor">Fetch</span>.uri <span class="keywordsign">-></span> <span class="constructor">Fetch</span>.protocol<br> <span class="keyword">type</span> open_flag = <span class="constructor">O_RDONLY</span> <span class="keywordsign">|</span> <span class="constructor">O_WRONLY</span> <span class="keywordsign">|</span> <span class="constructor">O_RDWR</span> <span class="keywordsign">|</span> <span class="constructor">O_CREAT</span> <span class="keywordsign">|</span> <span class="constructor">O_TRUNC</span><br> <span class="keyword">type</span> seek_command = <span class="constructor">SEEK_SET</span> <span class="keywordsign">|</span> <span class="constructor">SEEK_CUR</span> <span class="keywordsign">|</span> <span class="constructor">SEEK_END</span><br> <span class="keyword">type</span> file_perm = int<br> <span class="keyword">type</span> file_descr<br> <span class="keyword">type</span> file_kind = <span class="constructor">S_REG</span> <span class="keywordsign">|</span> <span class="constructor">S_DIR</span><br> <span class="keyword">val</span> openfile :<br> <span class="constructor">Fetch</span>.uri <span class="keywordsign">-></span> <span class="constructor">Fetch</span>.open_flag list <span class="keywordsign">-></span> <span class="constructor">Fetch</span>.file_perm <span class="keywordsign">-></span> <span class="constructor">Fetch</span>.file_descr<br> <span class="keyword">val</span> close : <span class="constructor">Fetch</span>.file_descr <span class="keywordsign">-></span> unit<br> <span class="keyword">val</span> read : <span class="constructor">Fetch</span>.file_descr <span class="keywordsign">-></span> string <span class="keywordsign">-></span> int <span class="keywordsign">-></span> int <span class="keywordsign">-></span> int<br> <span class="keyword">val</span> write : <span class="constructor">Fetch</span>.file_descr <span class="keywordsign">-></span> string <span class="keywordsign">-></span> int <span class="keywordsign">-></span> int <span class="keywordsign">-></span> int<br> <span class="keyword">val</span> lseek : <span class="constructor">Fetch</span>.file_descr <span class="keywordsign">-></span> int <span class="keywordsign">-></span> <span class="constructor">Fetch</span>.seek_command <span class="keywordsign">-></span> int<br> <span class="keyword">val</span> ls : <span class="constructor">Fetch</span>.uri <span class="keywordsign">-></span> (<span class="constructor">Fetch</span>.uri * <span class="constructor">Fetch</span>.file_kind) list<br> <span class="keyword">val</span> basename : string <span class="keywordsign">-></span> string<br> <span class="keyword">val</span> cp : <span class="constructor">Fetch</span>.uri <span class="keywordsign">-></span> <span class="constructor">Fetch</span>.uri <span class="keywordsign">-></span> unit<br> <span class="keyword">val</span> is_alive : <span class="constructor">Fetch</span>.uri <span class="keywordsign">-></span> bool<br> <span class="keyword">end</span></code></body></html>