|
|
1.1 root 1: link "../ilib/gener"
2:
3: procedure main()
4: i := 0
5: every write(hex()) \ 50 do i +:= 1
6: write("---",i)
7: i := 0
8: every write(label("foo",10)) \ 20
9: write("---")
10: every write(octal()) \ 50 do i +:= 1
11: write("---",i)
12: every write(star("123")) \ 30
13: end
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.