home *** CD-ROM | disk | FTP | other *** search
/ CP/M / CPM_CDROM.iso / cpm / utils / asmutl / smmaclnk.ark / DREL.C < prev    next >
Encoding:
C/C++ Source or Header  |  1987-09-10  |  1.1 KB  |  38 lines
  1. /*
  2. ** DREL.C -- dump REL or LIB file
  3. **
  4. **    Copyright 1985 J. E. Hendrix
  5. **
  6. ** No command line switches are accepted.  The user is prompted
  7. ** for each file to be jumped.  Output goes to the standard
  8. ** output file and is, therefore, redirectable to any output
  9. ** device or to a disk file.  If an input file cannot be found
  10. *  the user is prompted for another input file.  File names must
  11. ** be given, complete with extensions,  Drive specifiers may be
  12. ** given.
  13. */
  14. #include <stdio.h>
  15. #include "notice.h"
  16. #include "mac.h"
  17. #include "rel.h"
  18.  
  19. main() {
  20.   char fn[MAXFN];
  21.   fputs("Small-Mac REL/LIB Dump Utility, ", stderr); fputs(VERSION, stderr);
  22.   fputs(CRIGHT1, stderr);
  23.   while(YES) {
  24.     if(!reqstr("Library/Module Name: ", fn, MAXFN)) exit();
  25.     if(!(inrel = fopen(fn, "r"))) continue;
  26.     do {
  27.       poll(YES);                /* poll for user interrupt */
  28.       if(getrel() == ERR) abort(7);    /* get next REL item */
  29.       seerel();                /* display it */
  30.       } while(item != EFILE);
  31.     fclose(inrel);
  32.     }
  33.   }
  34. ;    /* get next REL item */
  35.       seerel();                /* display it */
  36.       } while(item != EFILE);
  37.     fclose(inrel);
  38.