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

#  This program tests functions/display.c

procedure main()
   try(1)
end

procedure try(i)
   display(,&output)
   write("=============")
   display(1,&output)
end