Return to t-snapshot.icn CVS log

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

BSD 4.3

link "../ilib/snapshot"

procedure main()
   "((a+b)-delta)/(c*d))" ? (tab(bal('+-/*')) & snapshot())
   "abcdefgh" ? (tab(0) & snapshot())
   "abc\tdef\nghi" ? (tab(upto('\n')) & snapshot())
   every ("abcdefg" | "\g\f\000") ? while move(1) do
      snapshot()
end

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