home *** CD-ROM | disk | FTP | other *** search
/ Liren Large Software Subsidy 9 / 09.iso / l / l200 / 6.ddi / LIB / TMPNAM.C < prev    next >
Encoding:
C/C++ Source or Header  |  1986-09-04  |  822 b   |  34 lines
  1. /*    tmpnam.c contains administrative routines for dealing with 
  2.     temporary files.
  3.  
  4.     Copyright(c) 1983 by James F. Gimpel
  5.     Copyright (c) 1983, 1984, 1985 by JMI Software Consultants, Inc.
  6.  */
  7. #include "acom.h"
  8.  
  9. /*    a_tmpnam(filename) will create a unique file name to be used
  10.     as the name of a temporary file to be deleted at the
  11.     end of the program.
  12.  */
  13.  
  14. TEXT *a_tmpnam(filename)
  15.     TEXT *filename;
  16.     {
  17.     INTERN TEXT letter = 'A';
  18.     strcpy(filename, "bastocX.tmp");
  19.     filename[6] = letter++;
  20.     return (filename);
  21.     }
  22.  
  23. /*    a_delfile(filename) deletes a file whose name is filename.
  24.     This is used only for deleting temporary files whose
  25.     name was returned via a_tmpnam(). Returns 0 if successful,
  26.     negative if not.
  27.  */
  28.  
  29. INT a_delfile(filename)
  30.     TEXT *filename;
  31.     {
  32.         return(unlink(filename));
  33.     }
  34.