Return to t-lam.dat CVS log

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

Annotation of 43BSD/contrib/icon/libtest/t-lam.dat, revision 1.1

1.1     ! root        1: link "../ilib/collate"
        !             2: 
        !             3: procedure main()
        !             4:    while line := read() do {
        !             5:      line2 := read() | stop("data error")
        !             6:      x := collate(line,line2)
        !             7:      write(x)
        !             8:      write(decollate(x,1))
        !             9:      write(decollate(x,2))
        !            10:      }
        !            11: end

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