alloc-pool.c: Fix comment formatting.

* 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
This commit is contained in:
Kazu Hirata 2003-06-29 13:53:12 +00:00 committed by Kazu Hirata
parent 329d586fe5
commit f9da506452
34 changed files with 111 additions and 74 deletions

View File

@ -1,3 +1,39 @@
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

View File

@ -175,12 +175,12 @@ pool_alloc (alloc_pool pool)
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;

View File

@ -265,7 +265,7 @@ bitmap_copy (bitmap to, bitmap from)
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);

View File

@ -107,7 +107,7 @@ extern int bitmap_bit_p (bitmap, int);
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

View File

@ -89,7 +89,7 @@ typedef struct btr_def_s
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
@ -421,7 +421,7 @@ typedef struct {
/* 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)
{
@ -593,7 +593,7 @@ compute_out (sbitmap *bb_out, sbitmap *bb_gen, sbitmap *bb_kill, int max_uid)
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);
@ -652,7 +652,7 @@ link_btr_uses (btr_def *def_array, btr_user *use_array, sbitmap *bb_out,
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;
@ -679,7 +679,7 @@ link_btr_uses (btr_def *def_array, btr_user *use_array, sbitmap *bb_out,
{
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,
@ -1004,7 +1004,7 @@ combine_btr_defs (btr_def def, HARD_REG_SET *btrs_live_in_range)
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",
@ -1037,7 +1037,7 @@ combine_btr_defs (btr_def def, HARD_REG_SET *btrs_live_in_range)
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);
}
@ -1108,7 +1108,7 @@ move_btr_def (basic_block new_def_bb, int btr, btr_def def, bitmap live_range,
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
@ -1185,7 +1185,7 @@ migrate_btr_def (btr_def def, int min_cost)
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");

View File

@ -1227,7 +1227,7 @@ expand_builtin_apply (rtx function, rtx arguments, rtx argsize)
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);

View File

@ -670,7 +670,7 @@ insert_restore (struct insn_chain *chain, int before_p, int regno,
ok = 0;
break;
}
/* Must do this one restore at a time */
/* Must do this one restore at a time. */
if (! ok)
continue;
@ -742,7 +742,7 @@ insert_save (struct insn_chain *chain, int before_p, int regno,
ok = 0;
break;
}
/* Must do this one save at a time */
/* Must do this one save at a time. */
if (! ok)
continue;

View File

@ -724,7 +724,7 @@ connect_infinite_loops_to_exit (void)
return;
}
/* Compute reverse top sort order */
/* Compute reverse top sort order. */
void
flow_reverse_top_sort_order_compute (int *rts_order)

View File

@ -840,7 +840,7 @@ rtl_redirect_edge_and_branch (edge e, basic_block target)
++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

View File

@ -702,7 +702,7 @@ add_prefix (struct path_prefix *pprefix, const char *prefix)
else
prev = &pprefix->plist;
/* Keep track of the longest prefix */
/* Keep track of the longest prefix. */
len = strlen (prefix);
if (len > pprefix->max_len)
@ -1350,7 +1350,7 @@ main (int argc, char **argv)
)
{
#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. */
@ -1816,7 +1816,7 @@ write_c_file_stat (FILE *stream, const char *name ATTRIBUTE_UNUSED)
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");
@ -1899,7 +1899,7 @@ write_c_file_stat (FILE *stream, const char *name ATTRIBUTE_UNUSED)
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);
@ -2043,7 +2043,7 @@ scan_prog_file (const char *prog_name, enum pass which_pass)
fflush (stdout);
fflush (stderr);
/* Spawn child nm on pipe */
/* Spawn child nm on pipe. */
pid = vfork ();
if (pid == -1)
fatal_perror (VFORK_STRING);
@ -2472,7 +2472,7 @@ scan_libraries (const char *prog_name)
fflush (stdout);
fflush (stderr);
/* Spawn child ldd on pipe */
/* Spawn child ldd on pipe. */
pid = vfork ();
if (pid == -1)
fatal_perror (VFORK_STRING);
@ -3158,7 +3158,7 @@ scan_prog_file (const char *prog_name, enum pass which_pass)
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);
@ -3166,7 +3166,7 @@ scan_prog_file (const char *prog_name, enum pass which_pass)
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++)
{

View File

@ -1608,7 +1608,7 @@ insert (x, classp, hash, mode)
{
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;

View File

@ -1228,7 +1228,7 @@ df_insn_refs_record (df, bb, insn)
{
rtx note;
/* Record register defs */
/* Record register defs. */
df_defs_record (df, PATTERN (insn), bb, insn);
if (df->flags & DF_EQUIV_NOTES)

View File

@ -486,7 +486,7 @@ output_format (output_buffer *buffer, text_info *text)
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();

View File

@ -6694,7 +6694,7 @@ new_loc_list (expr, begin, end, section, gensym)
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)
@ -6710,11 +6710,11 @@ 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)
@ -7764,7 +7764,7 @@ output_line_info ()
{
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);
@ -11120,7 +11120,7 @@ gen_subprogram_die (decl, context_die)
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;
@ -11752,7 +11752,7 @@ gen_subroutine_type_die (type, context_die)
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)

View File

@ -5283,7 +5283,7 @@ output_decl (decl, containing_scope)
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;

View File

@ -2661,7 +2661,7 @@ choose_multiplier (d, n, precision, multiplier_ptr, post_shift_ptr, lgup_ptr)
/* 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);

View File

@ -3922,7 +3922,7 @@ debug_queue_symbol (tree decl)
symbol_queue[symbol_queue_index++] = decl;
}
/* Free symbol queue */
/* Free symbol queue. */
void
debug_free_queue ()
{

View File

@ -478,11 +478,11 @@ extern int flag_shlib;
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;

View File

@ -797,7 +797,7 @@ div_and_round_double (code, uns,
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)

View File

@ -968,7 +968,7 @@ static const struct compiler default_compilers[] =
, 0},
#include "specs.h"
/* Mark end of table */
/* Mark end of table. */
{0, 0, 0}
};
@ -2593,7 +2593,7 @@ add_prefix (pprefix, prefix, component, priority, require_machine_suffix,
prev = &(*prev)->next)
;
/* Keep track of the longest prefix */
/* Keep track of the longest prefix. */
prefix = update_path (prefix, component);
len = strlen (prefix);
@ -2609,7 +2609,7 @@ add_prefix (pprefix, prefix, component, priority, require_machine_suffix,
if (warn)
*warn = 0;
/* Insert after PREV */
/* Insert after PREV. */
pl->next = (*prev);
(*prev) = pl;
}
@ -6636,7 +6636,7 @@ pfatal_pexecute (errmsg_fmt, errmsg_arg)
pfatal_with_name (errmsg_fmt);
}
/* Output an error message and exit */
/* Output an error message and exit. */
void
fancy_abort ()
@ -6644,7 +6644,7 @@ fancy_abort ()
fatal ("internal gcc abort");
}
/* Output an error message and exit */
/* Output an error message and exit. */
void
fatal (const char *msgid, ...)

View File

@ -321,7 +321,7 @@ typedef HOST_WIDEST_INT gcov_type;
/* Structured records. */
/* Cumulative counter data. */
/* Cumulative counter data. */
struct gcov_ctr_summary
{
gcov_unsigned_t num; /* number of counters. */

View File

@ -652,7 +652,7 @@ create_file_names (file_name)
if (base)
{
/* Append source file name */
/* Append source file name. */
cptr = strrchr (file_name, '/');
strcat (name, cptr ? cptr + 1 : file_name);
}
@ -943,7 +943,7 @@ read_graph_file ()
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;
@ -1623,7 +1623,7 @@ accumulate_line_counts (src)
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)
{

View File

@ -5989,7 +5989,7 @@ from the machine description file `md'. */\n\n");
write_automata ();
}
/* Write out constant delay slot info */
/* Write out constant delay slot info. */
write_const_num_delay_slots ();
write_length_unit_log ();

View File

@ -7911,7 +7911,7 @@ output_min_issue_delay_table (automaton_t automaton)
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)

View File

@ -150,7 +150,7 @@ gcov_exit (void)
}
}
/* 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;
@ -233,7 +233,7 @@ gcov_exit (void)
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

View File

@ -2888,7 +2888,7 @@ parse_def (name_start)
&& 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++)
@ -3817,7 +3817,7 @@ parse_input ()
while ((p = read_line ()) != (char *) 0)
{
/* Skip leading blanks */
/* Skip leading blanks. */
while (ISSPACE ((unsigned char)*p))
p++;
@ -5536,7 +5536,7 @@ free_thead (ptr)
#endif /* MIPS_DEBUGGING_INFO */
/* Output an error message and exit */
/* Output an error message and exit. */
void
fatal (const char *format, ...)

View File

@ -1552,7 +1552,7 @@ expand_binop (mode, binoptab, op0, op1, target, unsignedp, methods)
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)
@ -2600,7 +2600,7 @@ expand_unop (mode, unoptab, op0, target, unsignedp)
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)

View File

@ -350,7 +350,7 @@ update_path (path, key)
return result;
}
/* Reset the standard prefix */
/* Reset the standard prefix. */
void
set_std_prefix (prefix, len)
const char *prefix;

View File

@ -3274,7 +3274,7 @@ insns_safe_to_move_p (from, to, new_to)
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;

View File

@ -5684,7 +5684,7 @@ expand_end_case_type (orig_index, orig_type)
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)

View File

@ -1278,7 +1278,7 @@ finalize_record_size (rli)
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);

View File

@ -782,7 +782,8 @@ int flag_exceptions;
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;
@ -4815,7 +4816,7 @@ backend_init (void)
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

View File

@ -2293,7 +2293,7 @@ const_hash_1 (exp)
return code;
}
/* Compute hashing function */
/* Compute hashing function. */
hi = len;
for (i = 0; i < len; i++)
hi = ((hi * 613) + (unsigned) (p[i]));
@ -2992,7 +2992,7 @@ const_hash_rtx (mode, x)
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];

View File

@ -837,7 +837,7 @@ write_rtnbeg (rtnnum, dosizeonly)
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;
@ -959,7 +959,7 @@ write_pclines (dosizeonly)
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;
@ -1311,7 +1311,7 @@ vmsdbgout_end_prologue (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);
}
}
@ -1348,7 +1348,7 @@ vmsdbgout_end_epilogue (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);
}
}
@ -1477,17 +1477,17 @@ lookup_filename (file_name)
#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);