home *** CD-ROM | disk | FTP | other *** search
/ Turbo Toolbox / Turbo_Toolbox.iso / sharew / exoten / elan / erase.eln < prev    next >
Encoding:
Text File  |  1994-04-11  |  92 b   |  8 lines
  1.  
  2. program:
  3.   TEXT VAR x;
  4.   put ("File to be erased:");
  5.   get (x);
  6.   erase file (x).
  7.  
  8.