if ((c[2] != ':') || (c[4] != ':'))
if (c[2] == ':') colon = 2; else { if (c[2] != '*') { fprintf (stderr, "%s: bad return-modifier\n", ffeintrin_imps_[i].name); continue; } colon = 3; } if ((c[colon] != ':') || (c[colon + 2] != ':'))
ffeintrin_init_0 (){  int i;  char *p1;  char *p2;  char *p3;  if (!ffe_is_do_internal_checks())    return;  assert (FFEINTRIN_gen == ARRAY_SIZE (ffeintrin_gens_));  assert (FFEINTRIN_imp == ARRAY_SIZE (ffeintrin_imps_));  assert (FFEINTRIN_spec == ARRAY_SIZE (ffeintrin_specs_));  for (i = 1; ((size_t) i) < ARRAY_SIZE (ffeintrin_names_); ++i)    {				/* Make sure binary-searched list is in alpha				   order. */      if (strcmp (ffeintrin_names_[i - 1].name_uc,		  ffeintrin_names_[i].name_uc) >= 0)	assert ("name list out of order" == NULL);    }  for (i = 0; ((size_t) i) < ARRAY_SIZE (ffeintrin_names_); ++i)    {      p1 = ffeintrin_names_[i].name_uc;      p2 = ffeintrin_names_[i].name_lc;      p3 = ffeintrin_names_[i].name_ic;      for (; *p1 != '\0' && *p2 != '\0' && *p3 != '\0'; ++p1, ++p2, ++p3)	{	  if (!isascii (*p1) || !isascii (*p2) || !isascii (*p3))	    break;	  if ((isdigit (*p1) || (*p1 == '_')) && (*p1 == *p2) && (*p1 == *p3))	    continue;	  if (!isupper (*p1) || !islower (*p2)	      || (*p1 != toupper (*p2)) || ((*p3 != *p1) && (*p3 != *p2)))	    break;	}      assert ((*p1 == *p2) && (*p1 == *p3) && (*p1 == '\0'));    }  for (i = 0; ((size_t) i) < ARRAY_SIZE (ffeintrin_imps_); ++i)    {      char *c = ffeintrin_imps_[i].control;      if (c[0] == '\0')	continue;      if ((c[0] != '-')	  && (c[0] != 'A')      && (c[0] != 'C')      && (c[0] != 'I')      && (c[0] != 'L')      && (c[0] != 'R')      && (c[0] != 'B')      && (c[0] != 'F')      && (c[0] != 'N')      && (c[0] != 'S'))	{	  fprintf (stderr, "%s: bad return-base-type\n",		   ffeintrin_imps_[i].name);	  continue;	}      if ((c[1] != '-')	  && (c[1] != '0')      && (c[1] != '1')      && (c[1] != '2')      && (c[1] != '3')      && (c[1] != 'C'))	{	  fprintf (stderr, "%s: bad return-kind-type\n",		   ffeintrin_imps_[i].name);	  continue;	}      if ((c[2] != ':') || (c[4] != ':'))	{	  fprintf (stderr, "%s: bad control\n",		   ffeintrin_imps_[i].name);	  continue;	}      if ((c[3] != '-')	  && (c[3] != '*')      && (c[3] != '1'))	{	  fprintf (stderr, "%s: bad COL-spec\n",		   ffeintrin_imps_[i].name);	  continue;	}      c += 5;      while (c[0] != '\0')	{	  while ((c[0] != '=')		 && (c[0] != ',')	  && (c[0] != '\0'))	    ++c;	  if (c[0] != '=')	    {	      fprintf (stderr, "%s: bad keyword\n",		       ffeintrin_imps_[i].name);	      break;	    }	  if ((c[1] == '?')	      || (c[1] == '!')	  || (c[1] == '!')	      || (c[1] == '+')	  || (c[1] == '*')	      || (c[1] == 'n')	  || (c[1] == 'p'))	    ++c;	  if (((c[1] != '-')	      && (c[1] != 'A')	  && (c[1] != 'C')	  && (c[1] != 'I')	  && (c[1] != 'L')	  && (c[1] != 'R')	  && (c[1] != 'B')	  && (c[1] != 'F')	  && (c[1] != 'N')	  && (c[1] != 'S'))	      || ((c[2] != '0')		  && (c[2] != '1')		  && (c[2] != '2')		  && (c[2] != '3')		  && (c[2] != 'A')		  && (c[2] != 's')))	    {	      fprintf (stderr, "%s: bad arg-type\n",		       ffeintrin_imps_[i].name);	      break;	    }	  if ((c[3] == '&')	      || (c[3] == 's')	  || (c[3] == 'w')	  || (c[3] == 'x'))	    ++c;	  if (c[3] == ',')	    {	      c += 4;	      break;	    }	  if (c[3] != '\0')	    {	      fprintf (stderr, "%s: bad arg-list\n",		       ffeintrin_imps_[i].name);	    }	  break;	}    }}