Return to basis8.icn CVS log

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

BSD 4.3

#  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()
   call(foo(1,2,3,4,5,6,7))
   call(foo(1,2))
end

procedure call(x)
   fail
end

procedure foo(a,b,c,d,e)
   write(image(a))
   write(image(b))
   write(image(c))
   write(image(d))
   write(image(e))
end

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