&& (TYPE_PRECISION (t) == size))
&& (TREE_INT_CST_LOW (TYPE_SIZE (t)) == size))
ffecom_f2c_set_lio_code_ (ffeinfoBasictype bt, int size,			  int code){  int j;  tree t;  for (j = 0; ((size_t) j) < ARRAY_SIZE (ffecom_tree_type[0]); ++j)    if (((t = ffecom_tree_type[bt][j]) != NULL_TREE)	&& (TYPE_PRECISION (t) == size))      {	assert (code != -1);	ffecom_f2c_typecode_[bt][j] = code;	code = -1;      }}