home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 7 / 07.iso / c / c025 / 1.ddi / FSEEK.C < prev    next >
Encoding:
Text File  |  1985-02-16  |  449 b   |  21 lines
  1. main()    /* fseek.c -- illustrates use of fseek() */
  2. {
  3.     long pos;
  4.     int ret;
  5.     FILE *fi, *fo;
  6.     int mode = 0;
  7.     char c, source[25], dest[25];
  8.  
  9.     puts("Warning: writes over contents of named file");
  10.     printf("test filename? ");
  11.     gets(source);
  12.     fi = fopen(source, "w+");
  13.     ret = fputs("abcdefghijklmnopqrstuvwxyz", fi);
  14.     pos = 2;
  15.     fseek(fi,pos,mode);
  16.     pos = ftell(fi);
  17.     printf("file position is %ld\n", pos);
  18.     fclose(fi);
  19.     puts("Done");
  20. }
  21.