Return to t-strutil.icn CVS log

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

Annotation of 43BSD/contrib/icon/libtest/t-strutil.icn, revision 1.1.1.1

1.1       root        1: link "../ilib/strutil"
                      2: 
                      3: procedure main()
                      4:    s := "abcedf"
                      5:    every write(rotate(s,(1 to 6) | (-1 to -6 by -1) | 20 | 36))
                      6:    write("---")
                      7:    write(rotate("abcdef"))
                      8:    write(compress("hello world",&lcase))
                      9:    write(image(delete("hello world",&lcase)))
                     10: end

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