about summary refs log blame commit diff stats
path: root/html/074console.mu.html
blob: f362e5bdface4a5e447fd72c7ae8033c55fa1b82 (plain) (tree)
class="nt">span> t <span id="L63" class="LineNr">63 </span> l:&amp;:<a href='same-fringe.mu.html#L9'>tree</a>:_elem <span class="Special">&lt;-</span> get *t, <span class="Constant">left:offset</span> <span id="L64" class="LineNr">64 </span> <a href='same-fringe.mu.html#L59'>traverse</a> l <span id="L65" class="LineNr">65 </span> r:&amp;:<a href='same-fringe.mu.html#L9'>tree</a>:_elem <span class="Special">&lt;-</span> get *t, <span class="Constant">right:offset</span> <span id="L66" class="LineNr">66 </span> <a href='same-fringe.mu.html#L59'>traverse</a> r <span id="L67" class="LineNr">67 </span> <span class="muControl">return-if</span> l <span id="L68" class="LineNr">68 </span> <span class="muControl">return-if</span> r <span id="L69" class="LineNr">69 </span> <span class="Comment"># leaf</span> <span id="L70" class="LineNr">70 </span> v:_elem <span class="Special">&lt;-</span> get *t, <span class="Constant">val:offset</span> <span id="L71" class="LineNr">71 </span> <span class="muControl">return-continuation-until-mark</span> <span class="Constant">100/mark</span>, v,<span class="Constant"> false/not-done</span> <span id="L72" class="LineNr">72 </span>] <span id="L73" class="LineNr">73 </span> <span id="L74" class="LineNr">74 </span><span class="Comment"># details</span> <span id="L75" class="LineNr">75 </span> <span id="L76" class="LineNr">76 </span><span class="muRecipe">def</span> new-tree x:_elem<span class="muRecipe"> -&gt; </span>result:&amp;:<a href='same-fringe.mu.html#L9'>tree</a>:_elem [ <span id="L77" class="LineNr">77 </span> <span class="Constant">local-scope</span> <span id="L78" class="LineNr">78 </span> <span class="Constant">load-inputs</span> <span id="L79" class="LineNr">79 </span> result <span class="Special">&lt;-</span> new <span class="Delimiter">{</span>(tree _elem): type<span class="Delimiter">}</span> <span id="L80" class="LineNr">80 </span> put *result, <span class="Constant">val:offset</span>, x <span id="L81" class="LineNr">81 </span>] <span id="L82" class="LineNr">82 </span> <span id="L83" class="LineNr">83 </span><span class="muRecipe">def</span> new-tree l:&amp;:<a href='same-fringe.mu.html#L9'>tree</a>:_elem, r:&amp;:<a href='same-fringe.mu.html#L9'>tree</a>:_elem<span class="muRecipe"> -&gt; </span>result:&amp;:<a href='same-fringe.mu.html#L9'>tree</a>:_elem [ <span id="L84" class="LineNr">84 </span> <span class="Constant">local-scope</span> <span id="L85" class="LineNr">85 </span> <span class="Constant">load-inputs</span> <span id="L86" class="LineNr">86 </span> result <span class="Special">&lt;-</span> new <span class="Delimiter">{</span>(tree _elem): type<span class="Delimiter">}</span> <span id="L87" class="LineNr">87 </span> put *result, <span class="Constant">left:offset</span>, l <span id="L88" class="LineNr">88 </span> put *result, <span class="Constant">right:offset</span>, r <span id="L89" class="LineNr">89 </span>] </pre> </body> </html> <!-- vim: set foldmethod=manual : -->