home *** CD-ROM | disk | FTP | other *** search
/ Club Amiga de Montreal - CAM / CAM_CD_1.iso / files / 177.lha / DRes_v1.3 / util / testarg.c < prev    next >
Encoding:
C/C++ Source or Header  |  1988-04-28  |  743 b   |  56 lines
  1.  
  2. /*
  3.  *
  4.  *
  5.  */
  6.  
  7. #include <local/xmisc.h>
  8.  
  9. extern int Enable_Abort;
  10.  
  11. char *
  12. getv(name)
  13. char *name;
  14. {
  15.     printf("GET: '%s'\n", name);
  16.     return("VAR");
  17. }
  18.  
  19. freev(str)
  20. char *str;
  21. {
  22.     printf("FREE: %s\n", str);
  23. }
  24.  
  25. main(ac,av)
  26. char *av[];
  27. {
  28.     char buf[256];
  29.     char **Av;
  30.     short Ac;
  31.     long error;
  32.  
  33.     Enable_Abort = 0;
  34.     openlibs(DRES_LIB);
  35.  
  36.     while (gets(buf)) {
  37.     printf("Cmd: %s\n", buf);
  38.     Ac = ParseCmd(buf, &Av, getv, freev, &error, NULL);
  39.     printf("%08lx %ld\n", Av, Ac);
  40.     if (error) {
  41.         printf("ERROR!: %08lx\n", error);
  42.     }
  43.     if (Av) {
  44.         short i;
  45.         for (i = 0; i < Ac; ++i)
  46.         printf("%2ld: (%ld) \"%s\"\n", i, Av[i][-1], Av[i]);
  47.         puts("free");
  48.         FreeParseCmd(Av);
  49.         puts("ok");
  50.     }
  51.     }
  52.  
  53.     closelibs(-1);
  54. }
  55.  
  56.