自学教程：C++ GET_RTX_NAME函数代码示例

voidrtl_check_failed_code1 (const_rtx r, enum rtx_code code, const char *file,			int line, const char *func){  internal_error ("RTL check: expected code '%s', have '%s' in %s, at %s:%d",		  GET_RTX_NAME (code), GET_RTX_NAME (GET_CODE (r)), func,		  trim_filename (file), line);}

voidrtl_check_failed_code_mode (const_rtx r, enum rtx_code code, enum machine_mode mode,			    bool not_mode, const char *file, int line,			    const char *func){  internal_error ((not_mode		   ? ("RTL check: expected code '%s' and not mode '%s', "		      "have code '%s' and mode '%s' in %s, at %s:%d")		   : ("RTL check: expected code '%s' and mode '%s', "		      "have code '%s' and mode '%s' in %s, at %s:%d")),		  GET_RTX_NAME (code), GET_MODE_NAME (mode),		  GET_RTX_NAME (GET_CODE (r)), GET_MODE_NAME (GET_MODE (r)),		  func, trim_filename (file), line);}

static voidprint_code (RTX_CODE code){  const char *p1;  for (p1 = GET_RTX_NAME (code); *p1; p1++)    putchar (TOUPPER (*p1));}

voiddump_rtx_statistics (void){  int i;  int total_counts = 0;  int total_sizes = 0;  if (! GATHER_STATISTICS)    {      fprintf (stderr, "No RTX statistics/n");      return;    }  fprintf (stderr, "/nRTX Kind               Count      Bytes/n");  fprintf (stderr, "---------------------------------------/n");  for (i = 0; i < LAST_AND_UNUSED_RTX_CODE; i++)    if (rtx_alloc_counts[i])      {        fprintf (stderr, "%-20s %7d %10d/n", GET_RTX_NAME (i),                 rtx_alloc_counts[i], rtx_alloc_sizes[i]);        total_counts += rtx_alloc_counts[i];        total_sizes += rtx_alloc_sizes[i];      }  if (rtvec_alloc_counts)    {      fprintf (stderr, "%-20s %7d %10d/n", "rtvec",               rtvec_alloc_counts, rtvec_alloc_sizes);      total_counts += rtvec_alloc_counts;      total_sizes += rtvec_alloc_sizes;    }  fprintf (stderr, "---------------------------------------/n");  fprintf (stderr, "%-20s %7d %10d/n",           "Total", total_counts, total_sizes);  fprintf (stderr, "---------------------------------------/n");}

/* Dump vinsn VI honoring flags.  */voiddump_vinsn_1 (vinsn_t vi, int flags){  int all;  /* flags == -1 also means dumping all.  */  all = flags & 1;  if (all)    flags |= DUMP_VINSN_ALL;  sel_print ("(");  if (flags & DUMP_VINSN_INSN_RTX)    dump_insn_rtx_1 (VINSN_INSN_RTX (vi), dump_insn_rtx_flags | all);  if (flags & DUMP_VINSN_TYPE)    sel_print ("type:%s;", GET_RTX_NAME (VINSN_TYPE (vi)));  if (flags & DUMP_VINSN_COUNT)    sel_print ("count:%d;", VINSN_COUNT (vi));  if (flags & DUMP_VINSN_COST)    {      int cost = vi->cost;      if (cost != -1)	sel_print ("cost:%d;", cost);    }  sel_print (")");}

voidrtl_check_failed_flag (const char *name, const_rtx r, const char *file,		       int line, const char *func){  internal_error    ("RTL flag check: %s used with unexpected rtx code '%s' in %s, at %s:%d",     name, GET_RTX_NAME (GET_CODE (r)), func, trim_filename (file), line);}

voidrtl_check_failed_type2 (const_rtx r, int n, int c1, int c2, const char *file,			int line, const char *func){  internal_error    ("RTL check: expected elt %d type '%c' or '%c', have '%c' (rtx %s) in %s, at %s:%d",     n, c1, c2, GET_RTX_FORMAT (GET_CODE (r))[n], GET_RTX_NAME (GET_CODE (r)),     func, trim_filename (file), line);}

voidrtl_check_failed_bounds (const_rtx r, int n, const char *file, int line,			 const char *func){  internal_error    ("RTL check: access of elt %d of '%s' with last elt %d in %s, at %s:%d",     n, GET_RTX_NAME (GET_CODE (r)), GET_RTX_LENGTH (GET_CODE (r)) - 1,     func, trim_filename (file), line);}

//.........这里部分代码省略.........      break;    case CALL:      st[0] = "call ";      op[0] = XEXP (x, 0);      if (verbose)	{	  st[1] = " argc:";	  op[1] = XEXP (x, 1);	}      break;    case IF_THEN_ELSE:      st[0] = "{(";      op[0] = XEXP (x, 0);      st[1] = ")?";      op[1] = XEXP (x, 1);      st[2] = ":";      op[2] = XEXP (x, 2);      st[3] = "}";      break;    case TRAP_IF:      fun = "trap_if";      op[0] = TRAP_CONDITION (x);      break;    case PREFETCH:      fun = "prefetch";      op[0] = XEXP (x, 0);      op[1] = XEXP (x, 1);      op[2] = XEXP (x, 2);      break;    case UNSPEC:    case UNSPEC_VOLATILE:      {	pp_string (pp, "unspec");	if (GET_CODE (x) == UNSPEC_VOLATILE)	  pp_string (pp, "/v");	pp_left_bracket (pp);	for (i = 0; i < XVECLEN (x, 0); i++)	  {	    if (i != 0)	      pp_comma (pp);	    print_pattern (pp, XVECEXP (x, 0, i), verbose);	  }	pp_string (pp, "] ");	pp_decimal_int (pp, XINT (x, 1));      }      break;    default:      {	/* Most unhandled codes can be printed as pseudo-functions.  */        if (GET_RTX_CLASS (GET_CODE (x)) == RTX_UNARY)	  {	    fun = GET_RTX_NAME (GET_CODE (x));	    op[0] = XEXP (x, 0);	  }        else if (GET_RTX_CLASS (GET_CODE (x)) == RTX_COMPARE		 || GET_RTX_CLASS (GET_CODE (x)) == RTX_COMM_COMPARE		 || GET_RTX_CLASS (GET_CODE (x)) == RTX_BIN_ARITH		 || GET_RTX_CLASS (GET_CODE (x)) == RTX_COMM_ARITH)	  {	    fun = GET_RTX_NAME (GET_CODE (x));	    op[0] = XEXP (x, 0);	    op[1] = XEXP (x, 1);	  }        else if (GET_RTX_CLASS (GET_CODE (x)) == RTX_TERNARY)	  {	    fun = GET_RTX_NAME (GET_CODE (x));	    op[0] = XEXP (x, 0);	    op[1] = XEXP (x, 1);	    op[2] = XEXP (x, 2);	  }	else	  /* Give up, just print the RTX name.  */	  st[0] = GET_RTX_NAME (GET_CODE (x));      }      break;    }  /* Print this as a function?  */  if (fun)    {      pp_string (pp, fun);      pp_left_paren (pp);    }  for (i = 0; i < 4; i++)    {      if (st[i])        pp_string (pp, st[i]);      if (op[i])	{	  if (fun && i != 0)	    pp_comma (pp);	  print_value (pp, op[i], verbose);	}    }  if (fun)    pp_right_paren (pp);}		/* print_exp */

voidprint_value (pretty_printer *pp, const_rtx x, int verbose){  char tmp[1024];  if (!x)    {      pp_string (pp, "(nil)");      return;    }  switch (GET_CODE (x))    {    case CONST_INT:      pp_scalar (pp, HOST_WIDE_INT_PRINT_HEX,		 (unsigned HOST_WIDE_INT) INTVAL (x));      break;    case CONST_DOUBLE:      if (FLOAT_MODE_P (GET_MODE (x)))	{	  real_to_decimal (tmp, CONST_DOUBLE_REAL_VALUE (x),			   sizeof (tmp), 0, 1);	  pp_string (pp, tmp);	}      else	pp_printf (pp, "<%wx,%wx>",		   (unsigned HOST_WIDE_INT) CONST_DOUBLE_LOW (x),		   (unsigned HOST_WIDE_INT) CONST_DOUBLE_HIGH (x));      break;    case CONST_FIXED:      fixed_to_decimal (tmp, CONST_FIXED_VALUE (x), sizeof (tmp));      pp_string (pp, tmp);      break;    case CONST_STRING:      pp_printf (pp, "/"%s/"", XSTR (x, 0));      break;    case SYMBOL_REF:      pp_printf (pp, "`%s'", XSTR (x, 0));      break;    case LABEL_REF:      pp_printf (pp, "L%d", INSN_UID (XEXP (x, 0)));      break;    case CONST:    case HIGH:    case STRICT_LOW_PART:      pp_printf (pp, "%s(", GET_RTX_NAME (GET_CODE (x)));      print_value (pp, XEXP (x, 0), verbose);      pp_right_paren (pp);      break;    case REG:      if (REGNO (x) < FIRST_PSEUDO_REGISTER)	{	  if (ISDIGIT (reg_names[REGNO (x)][0]))	    pp_modulo (pp);	  pp_string (pp, reg_names[REGNO (x)]);	}      else	pp_printf (pp, "r%d", REGNO (x));      if (verbose)	pp_printf (pp, ":%s", GET_MODE_NAME (GET_MODE (x)));      break;    case SUBREG:      print_value (pp, SUBREG_REG (x), verbose);      pp_printf (pp, "#%d", SUBREG_BYTE (x));      break;    case SCRATCH:    case CC0:    case PC:      pp_string (pp, GET_RTX_NAME (GET_CODE (x)));      break;    case MEM:      pp_left_bracket (pp);      print_value (pp, XEXP (x, 0), verbose);      pp_right_bracket (pp);      break;    case DEBUG_EXPR:      pp_printf (pp, "D#%i", DEBUG_TEMP_UID (DEBUG_EXPR_TREE_DECL (x)));      break;    default:      print_exp (pp, x, verbose);      break;    }}				/* print_value */

voidprint_insn (char *buf, rtx x, int verbose){  char t[BUF_LEN];  rtx insn = x;  switch (GET_CODE (x))    {    case INSN:      print_pattern (t, PATTERN (x), verbose);#ifdef INSN_SCHEDULING      if (verbose && current_sched_info)        sprintf (buf, "%s: %s", (*current_sched_info->print_insn) (x, 1),                 t);      else#endif        sprintf (buf, " %4d %s", INSN_UID (x), t);      break;    case JUMP_INSN:      print_pattern (t, PATTERN (x), verbose);#ifdef INSN_SCHEDULING      if (verbose && current_sched_info)        sprintf (buf, "%s: jump %s", (*current_sched_info->print_insn) (x, 1),                 t);      else#endif        sprintf (buf, " %4d %s", INSN_UID (x), t);      break;    case CALL_INSN:      x = PATTERN (insn);      if (GET_CODE (x) == PARALLEL)        {          x = XVECEXP (x, 0, 0);          print_pattern (t, x, verbose);        }      else        strcpy (t, "call <...>");#ifdef INSN_SCHEDULING      if (verbose && current_sched_info)        sprintf (buf, "%s: %s", (*current_sched_info->print_insn) (x, 1), t);      else#endif        sprintf (buf, " %4d %s", INSN_UID (insn), t);      break;    case CODE_LABEL:      sprintf (buf, "L%d:", INSN_UID (x));      break;    case BARRIER:      sprintf (buf, "i%4d: barrier", INSN_UID (x));      break;    case NOTE:      if (NOTE_LINE_NUMBER (x) > 0)        {          expanded_location xloc;          NOTE_EXPANDED_LOCATION (xloc, x);          sprintf (buf, " %4d note /"%s/" %d", INSN_UID (x),                   xloc.file, xloc.line);        }      else        sprintf (buf, " %4d %s", INSN_UID (x),                 GET_NOTE_INSN_NAME (NOTE_LINE_NUMBER (x)));      break;    default:      sprintf (buf, "i%4d  <What %s?>", INSN_UID (x),               GET_RTX_NAME (GET_CODE (x)));    }}                                /* print_insn */

voidprint_pattern (pretty_printer *pp, const_rtx x, int verbose){  if (! x)    {      pp_string (pp, "(nil)");      return;    }  switch (GET_CODE (x))    {    case SET:      print_value (pp, SET_DEST (x), verbose);      pp_equal (pp);      print_value (pp, SET_SRC (x), verbose);      break;    case RETURN:    case SIMPLE_RETURN:    case EH_RETURN:      pp_string (pp, GET_RTX_NAME (GET_CODE (x)));      break;    case CALL:      print_exp (pp, x, verbose);      break;    case CLOBBER:    case USE:      pp_printf (pp, "%s ", GET_RTX_NAME (GET_CODE (x)));      print_value (pp, XEXP (x, 0), verbose);      break;    case VAR_LOCATION:      pp_string (pp, "loc ");      print_value (pp, PAT_VAR_LOCATION_LOC (x), verbose);      break;    case COND_EXEC:      pp_left_paren (pp);      if (GET_CODE (COND_EXEC_TEST (x)) == NE	  && XEXP (COND_EXEC_TEST (x), 1) == const0_rtx)	print_value (pp, XEXP (COND_EXEC_TEST (x), 0), verbose);      else if (GET_CODE (COND_EXEC_TEST (x)) == EQ	       && XEXP (COND_EXEC_TEST (x), 1) == const0_rtx)	{	  pp_exclamation (pp);	  print_value (pp, XEXP (COND_EXEC_TEST (x), 0), verbose);	}      else	print_value (pp, COND_EXEC_TEST (x), verbose);      pp_string (pp, ") ");      print_pattern (pp, COND_EXEC_CODE (x), verbose);      break;    case PARALLEL:      {	int i;	pp_left_brace (pp);	for (i = 0; i < XVECLEN (x, 0); i++)	  {	    print_pattern (pp, XVECEXP (x, 0, i), verbose);	    pp_semicolon (pp);	  }	pp_right_brace (pp);      }      break;    case SEQUENCE:      {	pp_string (pp, "sequence{");	if (INSN_P (XVECEXP (x, 0, 0)))	  {	    /* Print the sequence insns indented.  */	    const char * save_print_rtx_head = print_rtx_head;	    char indented_print_rtx_head[32];	    pp_newline (pp);	    gcc_assert (strlen (print_rtx_head) < sizeof (indented_print_rtx_head) - 4);	    snprintf (indented_print_rtx_head,		      sizeof (indented_print_rtx_head),		      "%s     ", print_rtx_head);	    print_rtx_head = indented_print_rtx_head;	    for (int i = 0; i < XVECLEN (x, 0); i++)	      print_insn_with_notes (pp, XVECEXP (x, 0, i));	    pp_printf (pp, "%s      ", save_print_rtx_head);	    print_rtx_head = save_print_rtx_head;	  }	else	  {	    for (int i = 0; i < XVECLEN (x, 0); i++)	      {		print_pattern (pp, XVECEXP (x, 0, i), verbose);		pp_semicolon (pp);	      }	  }	pp_right_brace (pp);      }      break;    case ASM_INPUT:      pp_printf (pp, "asm {%s}", XSTR (x, 0));      break;    case ADDR_VEC:      /* Fall through.  */    case ADDR_DIFF_VEC:      print_value (pp, XEXP (x, 0), verbose);//.........这里部分代码省略.........

static voidprint_rtx (const_rtx in_rtx){  int i = 0;  int j;  const char *format_ptr;  int is_insn;  if (sawclose)    {      if (flag_simple)	fputc (' ', outfile);      else	fprintf (outfile, "/n%s%*s", print_rtx_head, indent * 2, "");      sawclose = 0;    }  if (in_rtx == 0)    {      fputs ("(nil)", outfile);      sawclose = 1;      return;    }  else if (GET_CODE (in_rtx) > NUM_RTX_CODE)    {       fprintf (outfile, "(??? bad code %d/n%s%*s)", GET_CODE (in_rtx),		print_rtx_head, indent * 2, "");       sawclose = 1;       return;    }  is_insn = INSN_P (in_rtx);  /* Print name of expression code.  */  if (flag_simple && CONST_INT_P (in_rtx))    fputc ('(', outfile);  else    fprintf (outfile, "(%s", GET_RTX_NAME (GET_CODE (in_rtx)));  if (! flag_simple)    {      if (RTX_FLAG (in_rtx, in_struct))	fputs ("/s", outfile);      if (RTX_FLAG (in_rtx, volatil))	fputs ("/v", outfile);      if (RTX_FLAG (in_rtx, unchanging))	fputs ("/u", outfile);      if (RTX_FLAG (in_rtx, frame_related))	fputs ("/f", outfile);      if (RTX_FLAG (in_rtx, jump))	fputs ("/j", outfile);      if (RTX_FLAG (in_rtx, call))	fputs ("/c", outfile);      if (RTX_FLAG (in_rtx, return_val))	fputs ("/i", outfile);      /* Print REG_NOTE names for EXPR_LIST and INSN_LIST.  */      if ((GET_CODE (in_rtx) == EXPR_LIST	   || GET_CODE (in_rtx) == INSN_LIST	   || GET_CODE (in_rtx) == INT_LIST)	  && (int)GET_MODE (in_rtx) < REG_NOTE_MAX)	fprintf (outfile, ":%s",		 GET_REG_NOTE_NAME (GET_MODE (in_rtx)));      /* For other rtl, print the mode if it's not VOID.  */      else if (GET_MODE (in_rtx) != VOIDmode)	fprintf (outfile, ":%s", GET_MODE_NAME (GET_MODE (in_rtx)));#ifndef GENERATOR_FILE      if (GET_CODE (in_rtx) == VAR_LOCATION)	{	  if (TREE_CODE (PAT_VAR_LOCATION_DECL (in_rtx)) == STRING_CST)	    fputs (" <debug string placeholder>", outfile);	  else	    print_mem_expr (outfile, PAT_VAR_LOCATION_DECL (in_rtx));	  fputc (' ', outfile);	  print_rtx (PAT_VAR_LOCATION_LOC (in_rtx));	  if (PAT_VAR_LOCATION_STATUS (in_rtx)	      == VAR_INIT_STATUS_UNINITIALIZED)	    fprintf (outfile, " [uninit]");	  sawclose = 1;	  i = GET_RTX_LENGTH (VAR_LOCATION);	}#endif    }#ifndef GENERATOR_FILE  if (CONST_DOUBLE_AS_FLOAT_P (in_rtx))    i = 5;#endif  /* Get the format string and skip the first elements if we have handled     them already.  */  format_ptr = GET_RTX_FORMAT (GET_CODE (in_rtx)) + i;//.........这里部分代码省略.........