/*
 *
 *
 */

#include <local/xmisc.h>

extern int Enable_Abort;

char *
getv(name)
char *name;
{
    printf("GET: '%s'\n", name);
    return("VAR");
}

freev(str)
char *str;
{
    printf("FREE: %s\n", str);
}

main(ac,av)
char *av[];
{
    char buf[256];
    char **Av;
    short Ac;
    long error;

    Enable_Abort = 0;
    openlibs(DRES_LIB);

    while (gets(buf)) {
	printf("Cmd: %s\n", buf);
	Ac = ParseCmd(buf, &Av, getv, freev, &error, NULL);
	printf("%08lx %ld\n", Av, Ac);
	if (error) {
	    printf("ERROR!: %08lx\n", error);
	}
	if (Av) {
	    short i;
	    for (i = 0; i < Ac; ++i)
		printf("%2ld: (%ld) \"%s\"\n", i, Av[i][-1], Av[i]);
	    puts("free");
	    FreeParseCmd(Av);
	    puts("ok");
	}
    }

    closelibs(-1);
}