about summary refs log tree commit diff stats
path: root/html/apps/calls.subx.html
diff options
context:
space:
mode:
authorKartik Agaram <vc@akkartik.com>2020-09-11 00:59:56 -0700
committerKartik Agaram <vc@akkartik.com>2020-09-11 00:59:56 -0700
commit91a5f3e10300fd84db26690095329592de0942d7 (patch)
tree892f8d2f339f834ff6a8269e1fe098750c99090d /html/apps/calls.subx.html
parent3a4be20aba860bb62db3271b8e157bcc807514b0 (diff)
downloadmu-91a5f3e10300fd84db26690095329592de0942d7.tar.gz
6774
Diffstat (limited to 'html/apps/calls.subx.html')
-rw-r--r--html/apps/calls.subx.html4
1 files changed, 2 insertions, 2 deletions
diff --git a/html/apps/calls.subx.html b/html/apps/calls.subx.html
index a963b135..b1d13705 100644
--- a/html/apps/calls.subx.html
+++ b/html/apps/calls.subx.html
@@ -332,7 +332,7 @@ if ('onhashchange' in window) {
 <span id="L271" class="LineNr"> 271 </span>    <span class="subxS1Comment"># . if (eax != false) break</span>
 <span id="L272" class="LineNr"> 272 </span>    3d/compare-eax-and 0/imm32/false
 <span id="L273" class="LineNr"> 273 </span>    0f 85/jump-if-!= $parse-line:end/disp32
-<span id="L274" class="Folded"> 274 </span><span class="Folded">+-- 40 lines: #?     # dump word-slice --------------------------------------------------------------------------------------------------------------------------------------------------</span>
+<span id="L274" class="Folded"> 274 </span><span class="Folded">+-- 40 lines: #?     # dump word-slice -----------------------------------------------------------------------------------------------------------------------------------------------------------------------------</span>
 <span id="L314" class="LineNr"> 314 </span><span class="Constant">$parse-line:write-word</span>:
 <span id="L315" class="LineNr"> 315 </span>    <span class="subxComment"># write-int(words, word-slice-&gt;start)</span>
 <span id="L316" class="LineNr"> 316 </span>    <span class="subxS2Comment"># . . push args</span>
@@ -688,7 +688,7 @@ if ('onhashchange' in window) {
 <span id="L666" class="LineNr"> 666 </span>    e8/call <a href='../115write-byte.subx.html#L81'>flush</a>/disp32
 <span id="L667" class="LineNr"> 667 </span>    <span class="subxS2Comment"># . . discard args</span>
 <span id="L668" class="LineNr"> 668 </span>    81 0/subop/add %esp 4/imm32
-<span id="L669" class="Folded"> 669 </span><span class="Folded">+-- 33 lines: #?     # dump _test-output-stream -----------------------------------------------------------------------------------------------------------------------------------------</span>
+<span id="L669" class="Folded"> 669 </span><span class="Folded">+-- 33 lines: #?     # dump _test-output-stream --------------------------------------------------------------------------------------------------------------------------------------------------------------------</span>
 <span id="L702" class="LineNr"> 702 </span>    <span class="subxS1Comment"># . check-next-stream-line-equal(_test-output-stream, &quot;# . (foo %eax)&quot;, msg)</span>
 <span id="L703" class="LineNr"> 703 </span>    <span class="subxS2Comment"># . . push args</span>
 <span id="L704" class="LineNr"> 704 </span>    68/push <span class="Constant">&quot;F - <a href='calls.subx.html#L612'>test-subx-calls-processes-calls</a>: comment&quot;</span>/imm32
/span>). # # To run: # $ git clone https://github.com/akkartik/mu # $ cd mu # $ ./mu continuation2.mu # # Expected output: # 1 # 2 # 3 def main [ local-scope l:&:list:num <- copy 0 l <- push 3, l l <- push 2, l l <- push 1, l k:continuation <- call-with-continuation-mark create-yielder, l { x:num, done?:bool <- call k break-if done? $print x 10/newline loop } ] def create-yielder l:&:list:num -> n:num, done?:bool [ local-scope load-inputs return-continuation-until-mark done? <- equal l, 0/nil return-if done?, 0/false n <- first l l <- rest l ]