home *** CD-ROM | disk | FTP | other *** search
/ rtsi.com / 2014.01.www.rtsi.com.tar / www.rtsi.com / OS9 / OSK / DEMOS / UB_68020.LZH / bench6.b < prev    next >
Text File  |  1996-05-07  |  134b  |  12 lines
  1.  dim i:integer
  2.  shell "date"
  3.  for i=1 to 1000000
  4.     if 4=5 then
  5.     endif
  6.     while 4=5 do
  7.     endwhile
  8.     repeat
  9.     until 5=5
  10.  next i
  11.  shell "date"
  12.