home *** CD-ROM | disk | FTP | other *** search
/ rtsi.com / 2014.01.www.rtsi.com.tar / www.rtsi.com / OS9 / OSK / LANGUAGES / OB68_116.LZH / bench8.b < prev    next >
Text File  |  1996-05-07  |  156b  |  12 lines
  1.  dim a(50000):byte
  2.  dim b:integer
  3.  dim i:integer
  4.  dim j:integer
  5.  shell "date"
  6.  for j=1 to 20
  7.     for i=1 to 50000
  8.         b=addr(a(i))
  9.     next i
  10.  next j
  11.  shell "date"
  12.