/* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
*    proto [-+options] args ...                                                *
*                                                                              *
* This is a simple prototype C program that calls JC's debug package and has a *
* simple loop for scanning the command-line args.                              *
* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
#include "V.h"

/* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
*/
main(ac,av)
	char**av;
{	int   a, r=0;	/* Arg index, return value */
	int   c0, c1;
	ac = Vinit(ac,av);
	for (a=1; a<ac; a++) {
		switch(c0=av[a][0]) {
		  case '-':
		  case '+':
			switch (c1=av[a][1]) {
			  case 'd':
			  case 'D':
				Vopt(av[a]+2);
				break;
			  default:
				P1 "%s\tOption \"%s\" unknown, ignored.",pname,av[a] D;
				break;
			}
			break;
		  default:
			P1 "%s\tOption \"%s\" unknown, ignored.",pname,av[a] D;
			break;
		}
	}
	Exit(r);
}
