1*3e12c5d1SDavid du Colombier /* 2*3e12c5d1SDavid du Colombier * pANS stdio -- rename 3*3e12c5d1SDavid du Colombier */ 4*3e12c5d1SDavid du Colombier #include "iolib.h" rename(const char * old,const char * new)5*3e12c5d1SDavid du Colombierint rename(const char *old, const char *new){ 6*3e12c5d1SDavid du Colombier if(link((char *)old, (char *)new)<0) return -1; 7*3e12c5d1SDavid du Colombier if(unlink((char *)old)<0){ 8*3e12c5d1SDavid du Colombier unlink((char *)new); 9*3e12c5d1SDavid du Colombier return -1; 10*3e12c5d1SDavid du Colombier } 11*3e12c5d1SDavid du Colombier return 0; 12*3e12c5d1SDavid du Colombier } 13