Return to t.index CVS log

Up to [CSRG BSD Unix] / 43BSDReno / usr.bin / awk / test

Annotation of 43BSDReno/usr.bin/awk/test/t.index, revision 1.1

1.1     ! root        1: {      n = length
        !             2:        d = 0
        !             3:        for (i = 1; i <= n; i++)
        !             4:                if ((k = index($0, substr($0, i))) != i)
        !             5:                        d = 1
        !             6:        if (d)
        !             7:                print $0, "has duplicate letters"
        !             8: }

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