
#include "defs.h"
/* points to tree to be executed once yacc gets done */
Tree program;

main()
{

	init();
	yyparse();
	exct(program);

}
	
init (){};
parse_dispatch(str,args,n)
char *str;
int n;
double args[];

{
	int i1;
	printf ("%s:  ",str);
	for (i1=0;i1<n;i1++) {
		printf ("%g  ",args[i1]);
	
	}
	printf(" <n_args=%d>\n\n",n);
	return -999;
}
