Return to t-strutil.icn CVS log

Up to [CSRG BSD Unix] / 43BSD / contrib / icon / libtest

BSD 4.3

link "../ilib/strutil"

procedure main()
   s := "abcedf"
   every write(rotate(s,(1 to 6) | (-1 to -6 by -1) | 20 | 36))
   write("---")
   write(rotate("abcdef"))
   write(compress("hello world",&lcase))
   write(image(delete("hello world",&lcase)))
end

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