home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 7 / 07.iso / c / c025 / 1.ddi / CLOSE.C < prev    next >
Encoding:
Text File  |  1985-01-21  |  325 b   |  17 lines
  1. main()    /* close.c -- example use of close() */
  2. {char name[20];
  3. char buf[1];
  4. int fin;
  5.  
  6.     printf("Name please: ");
  7.     gets(name);
  8.     if ((fin = open(name,0)) == -1)
  9.     {    printf("No such file: %s\n", name);
  10.         exit();
  11.     }
  12.     while(read(fin, buf, 1) >= 0)
  13.         if (buf[0] == 26) exit();
  14.         else putchar(buf[0]);
  15.     close(fin);
  16. }
  17.