|
|
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.