anchor.diff:  	  C_IDENT	{	pe = search(UNKNOWN,lextoken.t_string,BOTH);
   				*pres = *pe;
   			}
  -	  [ params	{	if (nparams > 15) {
  +	  [ params(0)	{	if (nparams > 15) {
   					error(linecount,"Too many parameters");
   				} else	g_setnpar(pres,nparams);
   				if (g_gettype(pres) == TERMINAL) {
  
positive.code: 	/*
  	 * Copy an action to file f. Opening bracket is ch1, closing bracket
  	 * is ch2.
  	 * If flag != 0, copy opening and closing parameters too.
  	 */
  	static int	text_seen = 0;
  	register	FILE *f;
  
negative.code: 				p->n_lineno = linecount;
  				p->n_off = ftell(fact);
  			}
  	  [ params(1)	{	if (nparams > 0) {
  					p->n_flags |= PARAMS;
  					if (nparams > 15) {
  						error(linecount,"Too many parameters");
  