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

#  This program tests rt/suspend.s

procedure main()
   every write(1 to 10)
end