home *** CD-ROM | disk | FTP | other *** search
/ The C Users' Group Library 1994 August / wc-cdrom-cusersgrouplibrary-1994-08.iso / vol_100 / 170_01 / rename.c < prev    next >
Text File  |  1979-12-31  |  640b  |  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.