* alloc-pool.c: Fix comment formatting.
* bitmap.c: Likewise.
* bitmap.h: Likewise.
* bt-load.c: Likewise.
* builtins.c: Likewise.
* caller-save.c: Likewise.
* cfganal.c: Likewise.
* cfgrtl.c: Likewise.
* collect2.c: Likewise.
* cse.c: Likewise.
* df.c: Likewise.
* diagnostic.c: Likewise.
* dwarf2out.c: Likewise.
* dwarfout.c: Likewise.
* expmed.c: Likewise.
* final.c: Likewise.
* flags.h: Likewise.
* fold-const.c: Likewise.
* gcc.c: Likewise.
* gcov-io.h: Likewise.
* gcov.c: Likewise.
* genattrtab.c: Likewise.
* genautomata.c: Likewise.
* libgcov.c: Likewise.
* mips-tfile.c: Likewise.
* optabs.c: Likewise.
* prefix.c: Likewise.
* rtlanal.c: Likewise.
* stmt.c: Likewise.
* stor-layout.c: Likewise.
* toplev.c: Likewise.
* varasm.c: Likewise.
* vmsdbgout.c: Likewise.
From-SVN: r68672
+2003-06-29 Kazu Hirata <kazu@cs.umass.edu>
+
+ * alloc-pool.c: Fix comment formatting.
+ * bitmap.c: Likewise.
+ * bitmap.h: Likewise.
+ * bt-load.c: Likewise.
+ * builtins.c: Likewise.
+ * caller-save.c: Likewise.
+ * cfganal.c: Likewise.
+ * cfgrtl.c: Likewise.
+ * collect2.c: Likewise.
+ * cse.c: Likewise.
+ * df.c: Likewise.
+ * diagnostic.c: Likewise.
+ * dwarf2out.c: Likewise.
+ * dwarfout.c: Likewise.
+ * expmed.c: Likewise.
+ * final.c: Likewise.
+ * flags.h: Likewise.
+ * fold-const.c: Likewise.
+ * gcc.c: Likewise.
+ * gcov-io.h: Likewise.
+ * gcov.c: Likewise.
+ * genattrtab.c: Likewise.
+ * genautomata.c: Likewise.
+ * libgcov.c: Likewise.
+ * mips-tfile.c: Likewise.
+ * optabs.c: Likewise.
+ * prefix.c: Likewise.
+ * rtlanal.c: Likewise.
+ * stmt.c: Likewise.
+ * stor-layout.c: Likewise.
+ * toplev.c: Likewise.
+ * varasm.c: Likewise.
+ * vmsdbgout.c: Likewise.
+
2003-06-29 Kazu Hirata <kazu@cs.umass.edu>
* expr.c (emit_single_push_insn): If padding is needed
size_t i;
alloc_pool_list block_header;
- /* Make the block */
+ /* Make the block. */
block = (char *) xmalloc (pool->block_size);
block_header = (alloc_pool_list) block;
block += align_eight (sizeof (struct alloc_pool_list_def));
- /* Throw it on the block list */
+ /* Throw it on the block list. */
block_header->next = pool->block_list;
pool->block_list = block_header;
bitmap_clear (to);
- /* Copy elements in forward direction one at a time */
+ /* Copy elements in forward direction one at a time. */
for (from_ptr = from->first; from_ptr; from_ptr = from_ptr->next)
{
bitmap_element *to_elt = bitmap_element_allocate (to);
extern void debug_bitmap (bitmap);
extern void debug_bitmap_file (FILE *, bitmap);
-/* Print a bitmap */
+/* Print a bitmap. */
extern void bitmap_print (FILE *, bitmap, const char *, const char *);
/* Initialize a bitmap header. If HEAD is NULL, a new header will be
btr_user uses;
/* If this def has a reaching use which is not a simple use
in a branch instruction, then has_ambiguous_use will be true,
- and we will not attempt to migrate this definition. */
+ and we will not attempt to migrate this definition. */
char has_ambiguous_use;
/* live_range is an approximation to the true live range for this
def/use web, because it records the set of blocks that contain
/* Called via note_stores or directly to register stores into /
clobbers of a branch target register DEST that are not recognized as
straightforward definitions. DATA points to information about the
- current basic block that needs updating. */
+ current basic block that needs updating. */
static void
note_btr_set (rtx dest, rtx set ATTRIBUTE_UNUSED, void *data)
{
For each block,
BB_IN = union over predecessors of BB_OUT(pred)
BB_OUT = (BB_IN - BB_KILL) + BB_GEN
- Iterate until the bb_out sets stop growing. */
+ Iterate until the bb_out sets stop growing. */
int i;
int changed;
sbitmap bb_in = sbitmap_alloc (max_uid);
if (user != NULL)
{
- /* Find all the reaching defs for this use */
+ /* Find all the reaching defs for this use. */
sbitmap reaching_defs_of_reg = sbitmap_alloc(max_uid);
int uid;
{
btr_def def = def_array[uid];
- /* We now know that def reaches user */
+ /* We now know that def reaches user. */
if (rtl_dump_file)
fprintf (rtl_dump_file,
btr = choose_btr (combined_btrs_live);
if (btr != -1)
{
- /* We can combine them */
+ /* We can combine them. */
if (rtl_dump_file)
fprintf (rtl_dump_file,
"Combining def in insn %d with def in insn %d\n",
def->other_btr_uses_after_use = 1;
COPY_HARD_REG_SET (*btrs_live_in_range, combined_btrs_live);
- /* Delete the old target register initialization */
+ /* Delete the old target register initialization. */
delete_insn (other_def->insn);
}
fprintf (rtl_dump_file, "New pt is insn %d, inserted after insn %d\n",
INSN_UID (def->insn), INSN_UID (insp));
- /* Delete the old target register initialization */
+ /* Delete the old target register initialization. */
delete_insn (old_insn);
/* Replace each use of the old target register by a use of the new target
INSN_UID (def->insn), def->cost, min_cost);
if (!def->group || def->has_ambiguous_use)
- /* These defs are not migratable */
+ /* These defs are not migratable. */
{
if (rtl_dump_file)
fprintf (rtl_dump_file, "it's not migratable\n");
do_pending_stack_adjust ();
NO_DEFER_POP;
- /* Save the stack with nonlocal if available */
+ /* Save the stack with nonlocal if available. */
#ifdef HAVE_save_stack_nonlocal
if (HAVE_save_stack_nonlocal)
emit_stack_save (SAVE_NONLOCAL, &old_stack_level, NULL_RTX);
ok = 0;
break;
}
- /* Must do this one restore at a time */
+ /* Must do this one restore at a time. */
if (! ok)
continue;
ok = 0;
break;
}
- /* Must do this one save at a time */
+ /* Must do this one save at a time. */
if (! ok)
continue;
return;
}
\f
-/* Compute reverse top sort order */
+/* Compute reverse top sort order. */
void
flow_reverse_top_sort_order_compute (int *rts_order)
++LABEL_NUSES (new_label);
}
- /* Handle casesi dispatch insns */
+ /* Handle casesi dispatch insns. */
if ((tmp = single_set (insn)) != NULL
&& SET_DEST (tmp) == pc_rtx
&& GET_CODE (SET_SRC (tmp)) == IF_THEN_ELSE
else
prev = &pprefix->plist;
- /* Keep track of the longest prefix */
+ /* Keep track of the longest prefix. */
len = strlen (prefix);
if (len > pprefix->max_len)
)
{
#ifdef COLLECT_EXPORT_LIST
- /* Do tlink without additional code generation */
+ /* Do tlink without additional code generation. */
do_tlink (ld1_argv, object_lst);
#endif
/* Strip now if it was requested on the command line. */
free (prefix);
- /* Write the tables as C code */
+ /* Write the tables as C code. */
fprintf (stream, "static int count;\n");
fprintf (stream, "typedef void entry_pt();\n");
static void
write_c_file_glob (FILE *stream, const char *name ATTRIBUTE_UNUSED)
{
- /* Write the tables as C code */
+ /* Write the tables as C code. */
int frames = (frame_tables.number > 0);
fflush (stdout);
fflush (stderr);
- /* Spawn child nm on pipe */
+ /* Spawn child nm on pipe. */
pid = vfork ();
if (pid == -1)
fatal_perror (VFORK_STRING);
fflush (stdout);
fflush (stderr);
- /* Spawn child ldd on pipe */
+ /* Spawn child ldd on pipe. */
pid = vfork ();
if (pid == -1)
fatal_perror (VFORK_STRING);
if (debug)
print_header (&hdr);
- /* Write header */
+ /* Write header. */
status = encode_mach_o_hdr (&hdr, obj, MO_SIZEOF_RAW_HDR);
if (status != MO_HDR_CONV_SUCCESS)
bad_header (status);
if (debug)
notice ("writing load commands.\n\n");
- /* Write load commands */
+ /* Write load commands. */
offset = hdr.moh_first_cmd_off;
for (i = 0; i < hdr.moh_n_load_cmds; i++)
{
{
classp = classp->first_same_value;
if (CHEAPER (elt, classp))
- /* Insert at the head of the class */
+ /* Insert at the head of the class. */
{
struct table_elt *p;
elt->next_same_value = classp;
{
rtx note;
- /* Record register defs */
+ /* Record register defs. */
df_defs_record (df, PATTERN (insn), bb, insn);
if (df->flags & DF_EQUIV_NOTES)
default:
break;
}
- /* We don't support precision behond that of "long long". */
+ /* We don't support precision behond that of "long long". */
if (precision > 2)
abort();
return retlist;
}
-/* Add a location description expression to a location list */
+/* Add a location description expression to a location list. */
static inline void
add_loc_descr_to_loc_list (list_head, descr, begin, end, section)
for (d = list_head; (*d) != NULL; d = &(*d)->dw_loc_next)
;
- /* Add a new location list node to the list */
+ /* Add a new location list node to the list. */
*d = new_loc_list (descr, begin, end, section, 0);
}
-/* Output the location list given to us */
+/* Output the location list given to us. */
static void
output_loc_list (list_head)
{
function = line_info->function;
- /* Set the address register to the first line in the function */
+ /* Set the address register to the first line in the function. */
dw2_asm_output_data (1, 0, "DW_LNE_set_address");
dw2_asm_output_data_uleb128 (1 + DWARF2_ADDR_SIZE, NULL);
dw2_asm_output_data (1, DW_LNE_set_address, NULL);
gen_formal_types_die (decl, subr_die);
else
{
- /* Generate DIEs to represent all known formal parameters */
+ /* Generate DIEs to represent all known formal parameters. */
tree arg_decls = DECL_ARGUMENTS (decl);
tree parm;
gen_formal_types_die (type, subr_die);
}
-/* Generate a DIE for a type definition */
+/* Generate a DIE for a type definition. */
static void
gen_typedef_die (decl, context_die)
output_formal_types (TREE_TYPE (decl));
else
{
- /* Generate DIEs to represent all known formal parameters */
+ /* Generate DIEs to represent all known formal parameters. */
tree arg_decls = DECL_ARGUMENTS (decl);
tree parm;
/* If precision == N, then mlow, mhigh exceed 2^N
(but they do not exceed 2^(N+1)). */
- /* Reduce to lowest terms */
+ /* Reduce to lowest terms. */
for (post_shift = lgup; post_shift > 0; post_shift--)
{
unsigned HOST_WIDE_INT ml_lo = (mlow_hi << (HOST_BITS_PER_WIDE_INT - 1)) | (mlow_lo >> 1);
symbol_queue[symbol_queue_index++] = decl;
}
-/* Free symbol queue */
+/* Free symbol queue. */
void
debug_free_queue ()
{
extern int flag_exceptions;
-/* Nonzero means generate frame unwind info table when supported */
+/* Nonzero means generate frame unwind info table when supported. */
extern int flag_unwind_tables;
-/* Nonzero means generate frame unwind info table exact at each insn boundary */
+/* Nonzero means generate frame unwind info table exact at each insn boundary. */
extern int flag_asynchronous_unwind_tables;
unsigned HOST_WIDE_INT labs_den = lden, ltwice;
HOST_WIDE_INT habs_den = hden, htwice;
- /* Get absolute values */
+ /* Get absolute values. */
if (*hrem < 0)
neg_double (*lrem, *hrem, &labs_rem, &habs_rem);
if (hden < 0)
, 0},
#include "specs.h"
- /* Mark end of table */
+ /* Mark end of table. */
{0, 0, 0}
};
prev = &(*prev)->next)
;
- /* Keep track of the longest prefix */
+ /* Keep track of the longest prefix. */
prefix = update_path (prefix, component);
len = strlen (prefix);
if (warn)
*warn = 0;
- /* Insert after PREV */
+ /* Insert after PREV. */
pl->next = (*prev);
(*prev) = pl;
}
pfatal_with_name (errmsg_fmt);
}
-/* Output an error message and exit */
+/* Output an error message and exit. */
void
fancy_abort ()
fatal ("internal gcc abort");
}
\f
-/* Output an error message and exit */
+/* Output an error message and exit. */
void
fatal (const char *msgid, ...)
/* Structured records. */
-/* Cumulative counter data. */
+/* Cumulative counter data. */
struct gcov_ctr_summary
{
gcov_unsigned_t num; /* number of counters. */
if (base)
{
- /* Append source file name */
+ /* Append source file name. */
cptr = strrchr (file_name, '/');
strcat (name, cptr ? cptr + 1 : file_name);
}
fn_n = fn->next;
fn->next = fn_p;
- /* Reverse the arcs */
+ /* Reverse the arcs. */
for (ix = fn->num_blocks; ix--;)
{
arc_t *arc, *arc_p, *arc_n;
block_t *block, *block_p, *block_n;
gcov_type count = 0;
- /* Reverse the block information */
+ /* Reverse the block information. */
for (block = line->u.blocks, block_p = NULL; block;
block_p = block, block = block_n)
{
write_automata ();
}
- /* Write out constant delay slot info */
+ /* Write out constant delay slot info. */
write_const_num_delay_slots ();
write_length_unit_log ();
fprintf (output_file, " ");
output_min_issue_delay_vect_name (output_file, automaton);
fprintf (output_file, "[] ATTRIBUTE_UNUSED = {\n");
- /* Compress the vector */
+ /* Compress the vector. */
if (automaton->max_min_delay < 2)
automaton->min_issue_delay_table_compression_factor = 8;
else if (automaton->max_min_delay < 4)
}
}
- /* Now merge each file */
+ /* Now merge each file. */
for (gi_ptr = gcov_list; gi_ptr; gi_ptr = gi_ptr->next)
{
struct gcov_summary this_object;
tag = gcov_read_unsigned ();
length = gcov_read_unsigned ();
- /* Check function */
+ /* Check function. */
if (tag != GCOV_TAG_FUNCTION
|| length != GCOV_TAG_FUNCTION_LENGTH
|| gcov_read_unsigned () != fi_ptr->ident
&& memcmp (dir_start, ".endef", sizeof (".endef")-1) == 0)
break;
- /* Pick up the subdirective now */
+ /* Pick up the subdirective now. */
for (dir_end_p1 = dir_start+1;
(ch = *dir_end_p1) != ' ' && ch != '\t';
dir_end_p1++)
while ((p = read_line ()) != (char *) 0)
{
- /* Skip leading blanks */
+ /* Skip leading blanks. */
while (ISSPACE ((unsigned char)*p))
p++;
#endif /* MIPS_DEBUGGING_INFO */
\f
-/* Output an error message and exit */
+/* Output an error message and exit. */
void
fatal (const char *format, ...)
rtx equiv_value;
int ok = 0;
- /* Find the correct mode for the real and imaginary parts */
+ /* Find the correct mode for the real and imaginary parts. */
enum machine_mode submode = GET_MODE_INNER(mode);
if (submode == BLKmode)
rtx x;
rtx seq;
- /* Find the correct mode for the real and imaginary parts */
+ /* Find the correct mode for the real and imaginary parts. */
enum machine_mode submode = GET_MODE_INNER (mode);
if (submode == BLKmode)
return result;
}
-/* Reset the standard prefix */
+/* Reset the standard prefix. */
void
set_std_prefix (prefix, len)
const char *prefix;
return 0;
}
-/* Return nonzero if IN contains a piece of rtl that has the address LOC */
+/* Return nonzero if IN contains a piece of rtl that has the address LOC. */
int
loc_mentioned_in_p (loc, in)
rtx *loc, in;
if (labelvec[i] == 0)
labelvec[i] = gen_rtx_LABEL_REF (Pmode, default_label);
- /* Output the table */
+ /* Output the table. */
emit_label (table_label);
if (CASE_VECTOR_PC_RELATIVE || flag_pic)
unpadded_size_unit
= size_binop (PLUS_EXPR, unpadded_size_unit, size_one_node);
- /* Round the size up to be a multiple of the required alignment */
+ /* Round the size up to be a multiple of the required alignment. */
TYPE_SIZE (rli->t) = round_up (unpadded_size, TYPE_ALIGN (rli->t));
TYPE_SIZE_UNIT (rli->t) = round_up (unpadded_size_unit,
TYPE_ALIGN (rli->t) / BITS_PER_UNIT);
int flag_unwind_tables = 0;
-/* Nonzero means generate frame unwind info table exact at each insn boundary */
+/* Nonzero means generate frame unwind info table exact at each insn
+ boundary. */
int flag_asynchronous_unwind_tables = 0;
init_emit_once (debug_info_level == DINFO_LEVEL_NORMAL
|| debug_info_level == DINFO_LEVEL_VERBOSE
#ifdef VMS_DEBUGGING_INFO
- /* Enable line number info for traceback */
+ /* Enable line number info for traceback. */
|| debug_info_level > DINFO_LEVEL_NONE
#endif
|| flag_test_coverage
return code;
}
- /* Compute hashing function */
+ /* Compute hashing function. */
hi = len;
for (i = 0; i < len; i++)
hi = ((hi * 613) + (unsigned) (p[i]));
decode_rtx_const (mode, x, &u.value);
- /* Compute hashing function */
+ /* Compute hashing function. */
hi = 0;
for (i = 0; i < ARRAY_SIZE (u.data); i++)
hi = hi * 613 + u.data[i];
totsize += write_debug_string ((char *) go, "main name", dosizeonly);
}
- /* The header length never includes the length byte */
+ /* The header length never includes the length byte. */
rtnbeg.dst_a_rtnbeg_header.dst__header_length.dst_w_length
= DST_K_RTNBEG_SIZE + rtnnamelen - 1;
rtnbeg.dst_a_rtnbeg_header.dst__header_type.dst_w_type = DST_K_RTNBEG;
linestart = linestart + ((max_line / 10000) + 1) * 10000;
}
- /* Set starting address to beginning of text section */
+ /* Set starting address to beginning of text section. */
line_num.dst_a_line_num_header.dst__header_length.dst_w_length = 8;
line_num.dst_a_line_num_header.dst__header_type.dst_w_type = DST_K_LINE_NUM;
pcline.dst_b_pcline_command = DST_K_SET_ABS_PC;
current_function_funcdef_no);
ASM_OUTPUT_LABEL (asm_out_file, label);
- /* VMS PCA expects every PC range to correlate to some line and file */
+ /* VMS PCA expects every PC range to correlate to some line and file. */
vmsdbgout_source_line (line, file);
}
}
current_function_funcdef_no);
ASM_OUTPUT_LABEL (asm_out_file, label);
- /* VMS PCA expects every PC range to correlate to some line and file */
+ /* VMS PCA expects every PC range to correlate to some line and file. */
vmsdbgout_source_line (line, file);
}
}
#ifdef VMS
struct tm *ts;
- /* Adjust for GMT */
+ /* Adjust for GMT. */
ts = (struct tm *) localtime (&statbuf.st_ctime);
gmtoff = ts->tm_gmtoff;
- /* VMS has multiple file format types */
+ /* VMS has multiple file format types. */
rfo = statbuf.st_fab_rfm;
#else
/* Is GMT adjustment an issue with a cross-compiler? */
gmtoff = 0;
- /* Assume stream LF type file */
+ /* Assume stream LF type file. */
rfo = 2;
#endif
cdt = 10000000 * (statbuf.st_ctime + gmtoff + vms_epoch_offset);
projects / thirdparty / gcc.git / commitdiff
