diff options
author | Kartik K. Agaram <vc@akkartik.com> | 2017-12-03 23:25:40 -0800 |
---|---|---|
committer | Kartik K. Agaram <vc@akkartik.com> | 2017-12-03 23:25:40 -0800 |
commit | 4a48bedcd1d708a43d43dc6259a4e45c52ea3d00 (patch) | |
tree | 85c1b7310cca932797d727a3de8da96eb175d8da /http-client.mu | |
parent | ef7d834fdd826977cd8d43253052a7b8e1c5aa72 (diff) | |
download | mu-4a48bedcd1d708a43d43dc6259a4e45c52ea3d00.tar.gz |
4134 - 'input' = 'ingredient'
Diffstat (limited to 'http-client.mu')
-rw-r--r-- | http-client.mu | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/http-client.mu b/http-client.mu index 681b4738..9219a76f 100644 --- a/http-client.mu +++ b/http-client.mu @@ -2,7 +2,9 @@ def main [ local-scope + $print [aaa] 10/newline google:&:source:char <- start-reading-from-network 0/real-resources, [google.com/] + $print [bbb] 10/newline n:num <- copy 0 buf:&:buffer:char <- new-buffer 30 { @@ -10,6 +12,11 @@ def main [ break-if done? n <- add n, 1 buf <- append buf, c + { + _, a:num <- divide-with-remainder n, 100 + break-if a + $print n 10/newline + } loop } result:text <- buffer-to-array buf |