|
|
1.1 root 1: record array(a,b,c,d,e,f,g)
2:
3: procedure dummy(u,v,x,y,z)
4: suspend u | v
5: return x
6: end
7:
8: procedure main()
9: write("every i := 1 to 30 do write(integer(repl(\"2\",i))) ----> ",image(every i := 1 to 30 do write(integer(repl("2",i)))) | "none")
10: write("every i := 1 to 30 do write(repl(\"2\",i) + 1) ----> ",image(every i := 1 to 30 do write(repl("2",i) + 1)) | "none")
11: write("every 1 to \"a\" ----> ",image(every 1 to "a") | "none")
12: end
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.