From f918675c8b11adb80a83000a3a984e4ff3bdcf1b Mon Sep 17 00:00:00 2001 From: "Kartik K. Agaram" Date: Sun, 23 Oct 2016 19:45:36 -0700 Subject: 3569 Update syntax highlighting to not color numeric locations like literals. --- html/http-client.mu.html | 16 ++++++++-------- 1 file changed, 8 insertions(+), 8 deletions(-) (limited to 'html/http-client.mu.html') diff --git a/html/http-client.mu.html b/html/http-client.mu.html index 20691582..264f56ed 100644 --- a/html/http-client.mu.html +++ b/html/http-client.mu.html @@ -35,21 +35,21 @@ body { font-size: 12pt; font-family: monospace; color: #eeeeee; background-color def main [ local-scope - google:&:source:char <- start-reading-from-network 0/real-resources, [google.com/] - n:num <- copy 0 - buf:&:buffer <- new-buffer 30 + google:&:source:char <- start-reading-from-network 0/real-resources, [google.com/] + n:num <- copy 0 + buf:&:buffer <- new-buffer 30 { - c:char, done?:bool <- read google + c:char, done?:bool <- read google break-if done? - n <- add n, 1 - buf <- append buf, c + n <- add n, 1 + buf <- append buf, c #? trunc?:bool <- greater-or-equal n, 10000 #? loop-unless trunc? loop } - result:text <- buffer-to-array buf + result:text <- buffer-to-array buf open-console - len:num <- length *result + len:num <- length *result print 0/real-screen, result wait-for-some-interaction close-console -- cgit 1.4.1-2-gfad0