From 9e751bb8c0cdf771d34c839cb6591d892b8e62de Mon Sep 17 00:00:00 2001 From: "Kartik K. Agaram" Date: Tue, 7 Mar 2017 01:41:48 -0800 Subject: 3761 --- html/channel.mu.html | 33 +++++++++++++++++---------------- 1 file changed, 17 insertions(+), 16 deletions(-) (limited to 'html/channel.mu.html') diff --git a/html/channel.mu.html b/html/channel.mu.html index df7d6b96..acae203d 100644 --- a/html/channel.mu.html +++ b/html/channel.mu.html @@ -15,13 +15,14 @@ body { font-size: 12pt; font-family: monospace; color: #eeeeee; background-color a { text-decoration: none; } a:hover { text-decoration: underline; } * { font-size: 12pt; font-size: 1em; } -.Delimiter { color: #800080; } -.muControl { color: #c0a020; } +.muRecipe { color: #ff8700; } .Special { color: #c00000; } +.Conceal { color: #4e4e4e; } +.Delimiter { color: #800080; } .Comment { color: #9090ff; } .Constant { color: #00a0a0; } .LineNr { color: #444444; } -.muRecipe { color: #ff8700; } +.muControl { color: #c0a020; } --> @@ -65,14 +66,14 @@ if ('onhashchange' in window) { 7 # n = 0 8 n:char <- copy 0 9 { -10 done?:bool <- lesser-than n, 5 -11 break-unless done? -12 # other threads might get between these prints -13 $print [produce: ], n, [ +10 ¦ done?:bool <- lesser-than n, 5 +11 ¦ break-unless done? +12 ¦ # other threads might get between these prints +13 ¦ $print [produce: ], n, [ 14 ] -15 sink <- write sink, n -16 n <- add n, 1 -17 loop +15 ¦ sink <- write sink, n +16 ¦ n <- add n, 1 +17 ¦ loop 18 } 19 close sink 20 ] @@ -82,13 +83,13 @@ if ('onhashchange' in window) { 24 local-scope 25 load-ingredients 26 { -27 # read an integer from the channel -28 n:char, eof?:bool, source <- read source -29 break-if eof? -30 # other threads might get between these prints -31 $print [consume: ], n:char, [ +27 ¦ # read an integer from the channel +28 ¦ n:char, eof?:bool, source <- read source +29 ¦ break-if eof? +30 ¦ # other threads might get between these prints +31 ¦ $print [consume: ], n:char, [ 32 ] -33 loop +33 ¦ loop 34 } 35 ] 36 -- cgit 1.4.1-2-gfad0