home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / INFO / C / RENAME.ZIP / RENAME.C
Encoding:
Text File  |  1983-10-27  |  512 b   |  22 lines
  1. /************************************************************
  2.  *          IBM PC "C" Bulletin Board                       *
  3.  *          Tulsa, OK  918-664-8737                         *
  4.  ************************************************************/
  5.  
  6.  
  7.  
  8.  
  9.  
  10.  
  11. rename(old, new)
  12. char *old, *new;
  13. {
  14.     char buff[60];
  15.  
  16.     fcbinit(new,buff);
  17.     bdos(19,buff);
  18.     fcbinit(old,buff);
  19.     fcbinit(new,buff+16);
  20.     bdos(23,buff);
  21. }
  22.