diff options
author | Kartik K. Agaram <vc@akkartik.com> | 2016-10-20 09:07:28 -0700 |
---|---|---|
committer | Kartik K. Agaram <vc@akkartik.com> | 2016-10-20 09:07:28 -0700 |
commit | 52d0bbf6b30ec041ed2f12572d6ddc03ecfe981b (patch) | |
tree | 5036b52c44d5892c3f1a4a8160af655b6962d0bb /http-client.mu | |
parent | d059fe743df6a5e8a72fc1418f2c3ba1ed5ac1e6 (diff) | |
download | mu-52d0bbf6b30ec041ed2f12572d6ddc03ecfe981b.tar.gz |
3525
Diffstat (limited to 'http-client.mu')
-rw-r--r-- | http-client.mu | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/http-client.mu b/http-client.mu index eddbe2a4..b7fa8b30 100644 --- a/http-client.mu +++ b/http-client.mu @@ -1,3 +1,5 @@ +# example program: reading a URL over HTTP + def main [ local-scope google:&:source:char <- start-reading-from-network 0/real-resources, [google.com], [/] @@ -6,10 +8,7 @@ def main [ { c:char, done?:bool <- read google break-if done? -#? $print c, 10/newline n <- add n, 1 -#? skip?:bool <- lesser-than n, 10000 -#? loop-if skip? b <- append b, c #? trunc?:bool <- greater-or-equal n, 10000 #? loop-unless trunc? |