08a0eed699
Couple more tweaks to html rendering: a) SubX definitions no longer link redundantly to themselves. This long-standing issue turns out to be tractable to solve for SubX files since the syntax is so simple. b) Fix links to SubX definitions in other directories. I forgot that I have to always generate tags from the directory of the file being linkified. c) Fix link colors. Before we lost all syntax highlighting for functions and Globals. Now they maintain their colors, just add an underline.
108 lines
7.0 KiB
HTML
108 lines
7.0 KiB
HTML
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
|
|
<html>
|
|
<head>
|
|
<meta http-equiv="content-type" content="text/html; charset=UTF-8">
|
|
<title>Mu - channel.mu</title>
|
|
<meta name="Generator" content="Vim/8.0">
|
|
<meta name="plugin-version" content="vim7.4_v2">
|
|
<meta name="syntax" content="none">
|
|
<meta name="settings" content="number_lines,use_css,pre_wrap,no_foldcolumn,expand_tabs,line_ids,prevent_copy=">
|
|
<meta name="colorscheme" content="minimal-light">
|
|
<style type="text/css">
|
|
<!--
|
|
pre { white-space: pre-wrap; font-family: monospace; color: #000000; background-color: #c6c6c6; }
|
|
body { font-size:12pt; font-family: monospace; color: #000000; background-color: #c6c6c6; }
|
|
a { color:inherit; }
|
|
* { font-size:12pt; font-size: 1em; }
|
|
.muControl { color: #804000; }
|
|
.muRecipe { color: #ff8700; }
|
|
.LineNr { }
|
|
.Delimiter { color: #c000c0; }
|
|
.Constant { color: #008787; }
|
|
.Special { color: #ff6060; }
|
|
.Comment { color: #005faf; }
|
|
-->
|
|
</style>
|
|
|
|
<script type='text/javascript'>
|
|
<!--
|
|
|
|
/* function to open any folds containing a jumped-to line before jumping to it */
|
|
function JumpToLine()
|
|
{
|
|
var lineNum;
|
|
lineNum = window.location.hash;
|
|
lineNum = lineNum.substr(1); /* strip off '#' */
|
|
|
|
if (lineNum.indexOf('L') == -1) {
|
|
lineNum = 'L'+lineNum;
|
|
}
|
|
lineElem = document.getElementById(lineNum);
|
|
/* Always jump to new location even if the line was hidden inside a fold, or
|
|
* we corrected the raw number to a line ID.
|
|
*/
|
|
if (lineElem) {
|
|
lineElem.scrollIntoView(true);
|
|
}
|
|
return true;
|
|
}
|
|
if ('onhashchange' in window) {
|
|
window.onhashchange = JumpToLine;
|
|
}
|
|
|
|
-->
|
|
</script>
|
|
</head>
|
|
<body onload='JumpToLine();'>
|
|
<a href='https://github.com/akkartik/mu/blob/master/channel.mu'>https://github.com/akkartik/mu/blob/master/channel.mu</a>
|
|
<pre id='vimCodeElement'>
|
|
<span id="L1" class="LineNr"> 1 </span><span class="Comment"># example program: communicating between routines using channels</span>
|
|
<span id="L2" class="LineNr"> 2 </span>
|
|
<span id="L3" class="LineNr"> 3 </span><span class="muRecipe">def</span> <a href='channel.mu.html#L3'>producer</a> <a href='075channel.mu.html#L40'>sink</a>:&:<a href='075channel.mu.html#L40'>sink</a>:char<span class="muRecipe"> -> </span><a href='075channel.mu.html#L40'>sink</a>:&:<a href='075channel.mu.html#L40'>sink</a>:char [
|
|
<span id="L4" class="LineNr"> 4 </span> <span class="Comment"># produce characters 1 to 5 on a channel</span>
|
|
<span id="L5" class="LineNr"> 5 </span> <span class="Constant">local-scope</span>
|
|
<span id="L6" class="LineNr"> 6 </span> <span class="Constant">load-inputs</span>
|
|
<span id="L7" class="LineNr"> 7 </span> <span class="Comment"># n = 0</span>
|
|
<span id="L8" class="LineNr"> 8 </span> n:char <span class="Special"><-</span> copy<span class="Constant"> 0</span>
|
|
<span id="L9" class="LineNr"> 9 </span> <span class="Delimiter">{</span>
|
|
<span id="L10" class="LineNr">10 </span> done?:bool <span class="Special"><-</span> lesser-than n,<span class="Constant"> 5</span>
|
|
<span id="L11" class="LineNr">11 </span> <span class="muControl">break-unless</span> done?
|
|
<span id="L12" class="LineNr">12 </span> <span class="Comment"># other threads might get between these prints</span>
|
|
<span id="L13" class="LineNr">13 </span> $print <span class="Constant">[produce: ]</span>, n, <span class="Constant">[ </span>
|
|
<span id="L14" class="LineNr">14 </span><span class="Constant">]</span>
|
|
<span id="L15" class="LineNr">15 </span> <a href='075channel.mu.html#L40'>sink</a> <span class="Special"><-</span> <a href='075channel.mu.html#L60'>write</a> <a href='075channel.mu.html#L40'>sink</a>, n
|
|
<span id="L16" class="LineNr">16 </span> n <span class="Special"><-</span> add n,<span class="Constant"> 1</span>
|
|
<span id="L17" class="LineNr">17 </span> <span class="muControl"> loop</span>
|
|
<span id="L18" class="LineNr">18 </span> <span class="Delimiter">}</span>
|
|
<span id="L19" class="LineNr">19 </span> close <a href='075channel.mu.html#L40'>sink</a>
|
|
<span id="L20" class="LineNr">20 </span>]
|
|
<span id="L21" class="LineNr">21 </span>
|
|
<span id="L22" class="LineNr">22 </span><span class="muRecipe">def</span> <a href='channel.mu.html#L22'>consumer</a> <a href='075channel.mu.html#L36'>source</a>:&:<a href='075channel.mu.html#L36'>source</a>:char<span class="muRecipe"> -> </span><a href='075channel.mu.html#L36'>source</a>:&:<a href='075channel.mu.html#L36'>source</a>:char [
|
|
<span id="L23" class="LineNr">23 </span> <span class="Comment"># consume and print integers from a channel</span>
|
|
<span id="L24" class="LineNr">24 </span> <span class="Constant">local-scope</span>
|
|
<span id="L25" class="LineNr">25 </span> <span class="Constant">load-inputs</span>
|
|
<span id="L26" class="LineNr">26 </span> <span class="Delimiter">{</span>
|
|
<span id="L27" class="LineNr">27 </span> <span class="Comment"># read an integer from the channel</span>
|
|
<span id="L28" class="LineNr">28 </span> n:char, eof?:bool, <a href='075channel.mu.html#L36'>source</a> <span class="Special"><-</span> read <a href='075channel.mu.html#L36'>source</a>
|
|
<span id="L29" class="LineNr">29 </span> <span class="muControl">break-if</span> eof?
|
|
<span id="L30" class="LineNr">30 </span> <span class="Comment"># other threads might get between these prints</span>
|
|
<span id="L31" class="LineNr">31 </span> $print <span class="Constant">[consume: ]</span>, n:char, <span class="Constant">[ </span>
|
|
<span id="L32" class="LineNr">32 </span><span class="Constant">]</span>
|
|
<span id="L33" class="LineNr">33 </span> <span class="muControl"> loop</span>
|
|
<span id="L34" class="LineNr">34 </span> <span class="Delimiter">}</span>
|
|
<span id="L35" class="LineNr">35 </span>]
|
|
<span id="L36" class="LineNr">36 </span>
|
|
<span id="L37" class="LineNr">37 </span><span class="muRecipe">def</span> <a href='channel.mu.html#L37'>main</a> [
|
|
<span id="L38" class="LineNr">38 </span> <span class="Constant">local-scope</span>
|
|
<span id="L39" class="LineNr">39 </span> <a href='075channel.mu.html#L36'>source</a>:&:<a href='075channel.mu.html#L36'>source</a>:char, <a href='075channel.mu.html#L40'>sink</a>:&:<a href='075channel.mu.html#L40'>sink</a>:char <span class="Special"><-</span> <a href='075channel.mu.html#L44'>new-channel</a> <span class="Constant">3/capacity</span>
|
|
<span id="L40" class="LineNr">40 </span> <span class="Comment"># create two background 'routines' that communicate by a channel</span>
|
|
<span id="L41" class="LineNr">41 </span> routine1:num <span class="Special"><-</span> <span class="muControl">start-running</span> <a href='channel.mu.html#L3'>producer</a>, <a href='075channel.mu.html#L40'>sink</a>
|
|
<span id="L42" class="LineNr">42 </span> routine2:num <span class="Special"><-</span> <span class="muControl">start-running</span> <a href='channel.mu.html#L22'>consumer</a>, <a href='075channel.mu.html#L36'>source</a>
|
|
<span id="L43" class="LineNr">43 </span> wait-for-routine routine1
|
|
<span id="L44" class="LineNr">44 </span> wait-for-routine routine2
|
|
<span id="L45" class="LineNr">45 </span>]
|
|
</pre>
|
|
</body>
|
|
</html>
|
|
<!-- vim: set foldmethod=manual : -->
|