From e82dc626685875d56738e733f7e18203f2ac7f9d Mon Sep 17 00:00:00 2001 From: "Kartik K. Agaram" Date: Wed, 27 Dec 2017 20:19:46 -0800 Subject: 4164 --- html/continuation5.mu.html | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) (limited to 'html/continuation5.mu.html') diff --git a/html/continuation5.mu.html b/html/continuation5.mu.html index 65a30cf1..b0b45a3b 100644 --- a/html/continuation5.mu.html +++ b/html/continuation5.mu.html @@ -80,7 +80,7 @@ if ('onhashchange' in window) { 20 l <- push 3, l 21 l <- push 2, l 22 l <- push 1, l -23 k:continuation, x:num, done?:bool <- call-with-continuation-mark 100/mark, create-yielder, l +23 k:continuation, x:num, done?:bool <- call-with-continuation-mark 100/mark, create-yielder, l 24 a:num <- copy 1 25 { 26 ¦ break-if done? @@ -101,10 +101,10 @@ if ('onhashchange' in window) { 41 ¦ n <- first l 42 ¦ l <- rest l 43 ¦ n <- add n, a -44 ¦ a <- return-continuation-until-mark 100/mark, n, done? # pause/resume +44 ¦ a <- return-continuation-until-mark 100/mark, n, done? # pause/resume 45 ¦ loop 46 } -47 return-continuation-until-mark 100/mark, -1, done? +47 return-continuation-until-mark 100/mark, -1, done? 48 assert 0/false, [called too many times, ran out of continuations to return] 49 ] -- cgit 1.4.1-2-gfad0