Return to lam.out CVS log

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

BSD 4.3

../ibin/lam t-lam -":::::" t-lam.dat:::::link "../ilib/collate"
:::::
:::::procedure main()
:::::   while line := read() do {
:::::     line2 := read() | stop("data error")
:::::     x := collate(line,line2)
:::::     write(x)
:::::     write(decollate(x,1))
:::::     write(decollate(x,2))
:::::     }
:::::end

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