|
|
1.1 ! root 1: procedure gensubstr(s) ! 2: local i ! 3: suspend s[(i := 1 to *s):((i + 1) to (*s + 1))] ! 4: end
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.