4.3BSD/usr/contrib/icon/port/basis5.icn

#  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(&lcase)
   write(&ucase)
   write(&level)
   write(&null)
   write(&subject)
   write(&trace)
   write(&random)
   write(&pos)
end