* regclass.c (dump_regclass): New function.
(regclass): New parameter DUMP, call DUMP_REGCLASS.
* toplev.c (rest_of_compilation): Opent lreg dump file before regclass,
pass rtl_dump_file to regclass.
* rtl.h (regclass): Update prototype.
From-SVN: r30600
+Fro Nov 19 05:48:45 CET 1999 Jan Hubicka <hubicka@freesoft.cz>
+
+ * regclass.c (dump_regclass): New function.
+ (regclass): New parameter DUMP, call DUMP_REGCLASS.
+ * toplev.c (rest_of_compilation): Opent lreg dump file before regclass,
+ pass rtl_dump_file to regclass.
+ * rtl.h (regclass): Update prototype.
+
Sun Nov 21 17:11:13 1999 Geoffrey Keating <geoffk@cygnus.com>
* varasm.c (output_constructor): Solve problem with long long
static int loop_cost;
static rtx scan_one_insn PROTO((rtx, int));
+static void dump_regclass PROTO((FILE *));
static void record_reg_classes PROTO((int, int, rtx *, enum machine_mode *,
char *, const char **, rtx));
static int copy_cost PROTO((rtx, enum machine_mode,
prefclass = 0;
}
\f
+/* Dump register costs. */
+void
+dump_regclass (dump)
+ FILE *dump;
+{
+ static const char *const reg_class_names[] = REG_CLASS_NAMES;
+ int i;
+ for (i = FIRST_PSEUDO_REGISTER; i < max_regno; i++)
+ {
+ enum reg_class class;
+ if (REG_N_REFS (i))
+ {
+ fprintf (dump, ";; Register %i costs:", i);
+ for (class = 0; class < N_REG_CLASSES; class++)
+ fprintf (dump, " %s:%i", reg_class_names[(int) class],
+ costs[i].cost[class]);
+ fprintf (dump, " MEM:%i\n\n", costs[i].mem_cost);
+ }
+ }
+}
+
+\f
/* Subroutine of regclass, processes one insn INSN. Scan it and record each
time it would save code to put a certain register in a certain class.
PASS, when nonzero, inhibits some optimizations which need only be done
This pass comes just before local register allocation. */
void
-regclass (f, nregs)
+regclass (f, nregs, dump)
rtx f;
int nregs;
+ FILE *dump;
{
register rtx insn;
register int i;
}
}
+ if (dump)
+ dump_regclass (dump);
#ifdef FORBIDDEN_INC_DEC_CLASSES
free (in_inc_dec);
#endif
extern void init_reg_sets PROTO ((void));
extern void regset_release_memory PROTO ((void));
extern void regclass_init PROTO ((void));
-extern void regclass PROTO ((rtx, int));
+extern void regclass PROTO ((rtx, int, FILE *));
extern void reg_scan PROTO ((rtx, int, int));
extern void reg_scan_update PROTO ((rtx, rtx, int));
extern void fix_register PROTO ((const char *, int, int));
{
TIMEVAR (flow_time,
{
- regclass (insns, max_reg_num ());
+ regclass (insns, max_reg_num (), NULL);
stupid_life_analysis (insns, max_reg_num (),
rtl_dump_file);
});
epilogue thus changing register elimination offsets. */
current_function_is_leaf = leaf_function_p ();
+ if (local_reg_dump)
+ open_dump_file (".12.lreg", decl_printable_name (decl, 2));
+
/* Unless we did stupid register allocation,
allocate pseudo-regs that are used only within 1 basic block.
of life info during sched. */
if (! flag_schedule_insns)
recompute_reg_usage (insns, ! optimize_size);
- regclass (insns, max_reg_num ());
+ regclass (insns, max_reg_num (), rtl_dump_file);
rebuild_label_notes_after_reload = local_alloc ();
});
else
if (local_reg_dump)
{
- open_dump_file (".12.lreg", decl_printable_name (decl, 2));
-
TIMEVAR (dump_time, dump_flow_info (rtl_dump_file));
TIMEVAR (dump_time, dump_local_alloc (rtl_dump_file));