home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / INFO / C / JAZLIB.ARC / TRUNCATE.C < prev    next >
Encoding:
Text File  |  1986-01-31  |  224 b   |  16 lines
  1. truncate(fname,fsize)
  2. char *fname;
  3. long fsize;
  4. {
  5.   int whandle;
  6.  
  7.   whandle = jzopnfil(fname,2);
  8.  
  9.   if (whandle < 0) return(-1);
  10.   else {
  11.     chsize(whandle,fsize);
  12.     jzclsfil(whandle);
  13.     return(0);
  14.   }
  15. }
  16.