home *** CD-ROM | disk | FTP | other *** search
/ Meeting Pearls 3 / Meeting_Pearls_III.iso / Pearls / dev / AmigaE / E_v3.2a / Src / Tools / AmigaLib / testtime.e < prev   
Text File  |  1995-03-27  |  204b  |  9 lines
  1. MODULE 'amigalib/time'
  2.  
  3. PROC main()
  4.   DEF error
  5.   WriteF('Just going to delay for 20 secs...\n')
  6.   error:=timeDelay(0, 20, 0)
  7.   WriteF(IF error THEN 'Ack! Something went wrong.\n' ELSE 'Done!\n')
  8. ENDPROC
  9.