From fe8bf967a945c7d9e6aba36e42518262d54bd348 Mon Sep 17 00:00:00 2001 From: "Kartik K. Agaram" Date: Fri, 15 Dec 2017 02:09:36 -0800 Subject: 4161 --- html/continuation5.mu.html | 14 +++++++------- 1 file changed, 7 insertions(+), 7 deletions(-) (limited to 'html/continuation5.mu.html') diff --git a/html/continuation5.mu.html b/html/continuation5.mu.html index 961eea7a..65a30cf1 100644 --- a/html/continuation5.mu.html +++ b/html/continuation5.mu.html @@ -3,7 +3,7 @@ Mu - continuation5.mu - + @@ -15,15 +15,15 @@ body { font-size: 12pt; font-family: monospace; color: #aaaaaa; background-color a { color:#eeeeee; text-decoration: none; } a:hover { text-decoration: underline; } * { font-size: 12pt; font-size: 1em; } -.muRecipe { color: #ff8700; } -.Special { color: #c00000; } .Conceal { color: #4e4e4e; } +.LineNr { color: #444444; } .Delimiter { color: #800080; } .Comment { color: #9090ff; } .Comment a { color:#0000ee; text-decoration:underline; } .Constant { color: #00a0a0; } -.LineNr { color: #444444; } +.Special { color: #c00000; } .muControl { color: #c0a020; } +.muRecipe { color: #ff8700; } --> @@ -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 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 n, done? # pause/resume +44 ¦ a <- return-continuation-until-mark 100/mark, n, done? # pause/resume 45 ¦ loop 46 } -47 return-continuation-until-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