Data commit
This commit is contained in:
parent
7387c8f97b
commit
cb5bb5e222
199093 changed files with 3378972 additions and 0 deletions
7
Task/HTTPS/Haskell/https-2.hs
Normal file
7
Task/HTTPS/Haskell/https-2.hs
Normal file
|
|
@ -0,0 +1,7 @@
|
|||
# Requires Unicon version 13
|
||||
procedure main(arglist)
|
||||
url := (\arglist[1] | "https://sourceforge.net/")
|
||||
w := open(url, "m-") | stop("Cannot open " || url)
|
||||
while write(read(w))
|
||||
close(w)
|
||||
end
|
||||
Loading…
Add table
Add a link
Reference in a new issue