Return to vbars.icn CVS log

Up to [CSRG BSD Unix] / 43BSD / contrib / icon / book / 04

Initial revision

procedure main()
   s2 := &cset || "AEIOUaeiou"
   s3 := repl(" ",*&cset) || "||||||||||"
   while line := read() do {
      write(line)
      write(map(line,s2,s3))
      }
end

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.