ffesta_ffebad_1st (FFEBAD_INVALID_STMT_FORM, "statement-function-definition", ffesta_tokens[0]);
bad_1:				 ffesta_ffebad_2t (FFEBAD_UNREC_STMT, ffesta_tokens[0], t);
ffestb_R1229 (ffelexToken t){  switch (ffelex_token_type (ffesta_tokens[0]))    {    case FFELEX_typeNAME:    case FFELEX_typeNAMES:      break;    default:      goto bad_0;		/* :::::::::::::::::::: */    }  switch (ffelex_token_type (t))    {    case FFELEX_typeOPEN_PAREN:      break;    case FFELEX_typeEOS:    case FFELEX_typeSEMICOLON:    case FFELEX_typeCOMMA:    case FFELEX_typeCOLONCOLON:    case FFELEX_typeNAME:      ffesta_confirmed ();	/* Error, but clearly intended. */      goto bad_1;		/* :::::::::::::::::::: */    default:      goto bad_1;		/* :::::::::::::::::::: */    }  ffestb_subrargs_.name_list.args = ffestt_tokenlist_create ();  ffestb_subrargs_.name_list.handler = (ffelexHandler) ffestb_R12291_;  ffestb_subrargs_.name_list.is_subr = FALSE;	/* No "*" items in list! */  ffestb_subrargs_.name_list.names = TRUE;	/* In case "IF(FOO)CALL						   FOO...". */  return (ffelexHandler) ffestb_subr_name_list_;bad_0:				/* :::::::::::::::::::: */  ffesta_ffebad_1st (FFEBAD_INVALID_STMT_FORM, "statement-function-definition", ffesta_tokens[0]);  return (ffelexHandler) ffelex_swallow_tokens (t, (ffelexHandler) ffesta_zero);bad_1:				/* :::::::::::::::::::: */  ffesta_ffebad_1st (FFEBAD_INVALID_STMT_FORM, "statement-function-definition", t);  return (ffelexHandler) ffelex_swallow_tokens (t,						(ffelexHandler) ffesta_zero);	/* Invalid second token. */}