Return to basis4.icn CVS log

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

Initial revision

#  This program tests the "basis" of the Icon system: iconx/start.s,
#  rt/setbound.s, lib/invoke.s, iconx/interp.s, lib/efail.s, and
#  lib/pfail.s

procedure main()
   write(1)
   write("abc")
   write('abc')
   write(image("abc"))
   write(image('abc'))
   write(type([]))
   write("abc"[2])
   write("abc"[1:2])
   x := [1,2,3]
   write(x[2])
end

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