home *** CD-ROM | disk | FTP | other *** search
/ Programmer 7500 / MAX_PROGRAMMERS.iso / INFO / C / JAZLIB.ARC / PUSHDIR.DMO < prev    next >
Encoding:
Text File  |  1986-07-18  |  455 b   |  24 lines
  1. #include <pushpop.h>
  2. main()
  3. {
  4.  
  5.   char wpath[STKRECSIZE];        /* hold the path to push */
  6.   int whandle;
  7.  
  8.   if ((whandle = jzopnfil(FNAME,2)) == -1)
  9.     whandle = jzcrtfil(FNAME,0);        /* create if not exist */
  10.  
  11.   jzsekfil(whandle,0L,2);            /* seek to endof file  */
  12.  
  13.   memset(wpath,0,STKRECSIZE);            /* init to null */
  14.  
  15.   jzgetdr(wpath);                /* get current subdirectory */
  16.  
  17.  
  18.   jzwrtfil(whandle,wpath,STKRECSIZE);
  19.  
  20.   jzclsfil(whandle);
  21.  
  22. }
  23.  
  24.