Commit 906c4e36 by Richard Kenner

*** empty log message ***

From-SVN: r1473
parent b1ec3c92
...@@ -1498,7 +1498,7 @@ output_bound_representation (bound, dim_num, u_or_l) ...@@ -1498,7 +1498,7 @@ output_bound_representation (bound, dim_num, u_or_l)
if (! optimize) if (! optimize)
output_loc_descriptor output_loc_descriptor
(eliminate_regs (SAVE_EXPR_RTL (bound), 0, 0)); (eliminate_regs (SAVE_EXPR_RTL (bound), 0, NULL_RTX));
ASM_OUTPUT_LABEL (asm_out_file, end_label); ASM_OUTPUT_LABEL (asm_out_file, end_label);
} }
...@@ -1573,7 +1573,7 @@ location_attribute (rtl) ...@@ -1573,7 +1573,7 @@ location_attribute (rtl)
declaration, but not a definition. So sayeth the PLSIG. */ declaration, but not a definition. So sayeth the PLSIG. */
if (! is_pseudo_reg (rtl)) if (! is_pseudo_reg (rtl))
output_loc_descriptor (eliminate_regs (rtl, 0, 0)); output_loc_descriptor (eliminate_regs (rtl, 0, NULL_RTX));
ASM_OUTPUT_LABEL (asm_out_file, end_label); ASM_OUTPUT_LABEL (asm_out_file, end_label);
} }
...@@ -1783,8 +1783,8 @@ const_value_attribute (rtl) ...@@ -1783,8 +1783,8 @@ const_value_attribute (rtl)
simplicity we always just output CONST_DOUBLEs using 8 bytes. */ simplicity we always just output CONST_DOUBLEs using 8 bytes. */
ASM_OUTPUT_DWARF_DATA8 (asm_out_file, ASM_OUTPUT_DWARF_DATA8 (asm_out_file,
(unsigned) CONST_DOUBLE_HIGH (rtl), (unsigned HOST_WIDE_INT) CONST_DOUBLE_HIGH (rtl),
(unsigned) CONST_DOUBLE_LOW (rtl)); (unsigned HOST_WIDE_INT) CONST_DOUBLE_LOW (rtl));
break; break;
case CONST_STRING: case CONST_STRING:
...@@ -4320,7 +4320,7 @@ dwarfout_file_scope_decl (decl, set_finalizing) ...@@ -4320,7 +4320,7 @@ dwarfout_file_scope_decl (decl, set_finalizing)
fputc ('\n', asm_out_file); fputc ('\n', asm_out_file);
ASM_OUTPUT_PUSH_SECTION (asm_out_file, DEBUG_SECTION); ASM_OUTPUT_PUSH_SECTION (asm_out_file, DEBUG_SECTION);
finalizing = set_finalizing; finalizing = set_finalizing;
output_decl (decl, NULL); output_decl (decl, NULL_TREE);
/* NOTE: The call above to `output_decl' may have caused one or more /* NOTE: The call above to `output_decl' may have caused one or more
file-scope named types (i.e. tagged types) to be placed onto the file-scope named types (i.e. tagged types) to be placed onto the
...@@ -4333,7 +4333,7 @@ dwarfout_file_scope_decl (decl, set_finalizing) ...@@ -4333,7 +4333,7 @@ dwarfout_file_scope_decl (decl, set_finalizing)
`output_pending_types_for_scope' takes them off of the list and un-sets `output_pending_types_for_scope' takes them off of the list and un-sets
their TREE_ASM_WRITTEN flags. */ their TREE_ASM_WRITTEN flags. */
output_pending_types_for_scope (NULL); output_pending_types_for_scope (NULL_TREE);
/* The above call should have totally emptied the pending_types_list. */ /* The above call should have totally emptied the pending_types_list. */
......
...@@ -283,8 +283,7 @@ end_final (filename) ...@@ -283,8 +283,7 @@ end_final (filename)
assemble_integer (gen_rtx (SYMBOL_REF, Pmode, name), UNITS_PER_WORD, 1); assemble_integer (gen_rtx (SYMBOL_REF, Pmode, name), UNITS_PER_WORD, 1);
ASM_GENERATE_INTERNAL_LABEL (name, "LPBX", 2); ASM_GENERATE_INTERNAL_LABEL (name, "LPBX", 2);
assemble_integer (gen_rtx (SYMBOL_REF, Pmode, name), UNITS_PER_WORD, 1); assemble_integer (gen_rtx (SYMBOL_REF, Pmode, name), UNITS_PER_WORD, 1);
assemble_integer (gen_rtx (CONST_INT, VOIDmode, count_basic_blocks), assemble_integer (GEN_INT (count_basic_blocks), UNITS_PER_WORD, 1);
UNITS_PER_WORD, 1);
assemble_integer (const0_rtx, UNITS_PER_WORD, 1); assemble_integer (const0_rtx, UNITS_PER_WORD, 1);
ASM_GENERATE_INTERNAL_LABEL (name, "LPBX", 3); ASM_GENERATE_INTERNAL_LABEL (name, "LPBX", 3);
assemble_integer (gen_rtx (SYMBOL_REF, Pmode, name), UNITS_PER_WORD, 1); assemble_integer (gen_rtx (SYMBOL_REF, Pmode, name), UNITS_PER_WORD, 1);
...@@ -600,7 +599,8 @@ asm_insn_count (body) ...@@ -600,7 +599,8 @@ asm_insn_count (body)
char *template; char *template;
int count = 1; int count = 1;
for (template = decode_asm_operands (body, 0, 0, 0, 0); for (template = decode_asm_operands (body, NULL_PTR, NULL_PTR,
NULL_PTR, NULL_PTR);
*template; template++) *template; template++)
if (*template == ';' || *template == '\n') if (*template == ';' || *template == '\n')
count++; count++;
...@@ -1174,7 +1174,7 @@ final_scan_insn (insn, file, optimize, prescan, nopeepholes) ...@@ -1174,7 +1174,7 @@ final_scan_insn (insn, file, optimize, prescan, nopeepholes)
of the insn that branched here. So recover the cc status of the insn that branched here. So recover the cc status
from the insn that set it. */ from the insn that set it. */
note = find_reg_note (insn, REG_CC_SETTER, 0); note = find_reg_note (insn, REG_CC_SETTER, NULL_RTX);
if (note) if (note)
{ {
NOTICE_UPDATE_CC (PATTERN (XEXP (note, 0)), XEXP (note, 0)); NOTICE_UPDATE_CC (PATTERN (XEXP (note, 0)), XEXP (note, 0));
...@@ -1277,7 +1277,8 @@ final_scan_insn (insn, file, optimize, prescan, nopeepholes) ...@@ -1277,7 +1277,8 @@ final_scan_insn (insn, file, optimize, prescan, nopeepholes)
} }
/* Get out the operand values. */ /* Get out the operand values. */
string = decode_asm_operands (body, ops, 0, 0, 0); string = decode_asm_operands (body, ops, NULL_PTR,
NULL_PTR, NULL_PTR);
/* Inhibit aborts on what would otherwise be compiler bugs. */ /* Inhibit aborts on what would otherwise be compiler bugs. */
insn_noperands = noperands; insn_noperands = noperands;
this_is_asm_operands = insn; this_is_asm_operands = insn;
...@@ -1982,7 +1983,13 @@ output_asm_insn (template, operands) ...@@ -1982,7 +1983,13 @@ output_asm_insn (template, operands)
else if (letter == 'n') else if (letter == 'n')
{ {
if (GET_CODE (operands[c]) == CONST_INT) if (GET_CODE (operands[c]) == CONST_INT)
fprintf (asm_out_file, "%d", - INTVAL (operands[c])); fprintf (asm_out_file,
#if HOST_BITS_PER_WIDE_INT == HOST_BITS_PER_INT
"%d",
#else
"%ld",
#endif
- INTVAL (operands[c]));
else else
{ {
putc ('-', asm_out_file); putc ('-', asm_out_file);
...@@ -2009,7 +2016,7 @@ output_asm_insn (template, operands) ...@@ -2009,7 +2016,7 @@ output_asm_insn (template, operands)
The PRINT_OPERAND macro decides what is actually done. */ The PRINT_OPERAND macro decides what is actually done. */
#ifdef PRINT_OPERAND_PUNCT_VALID_P #ifdef PRINT_OPERAND_PUNCT_VALID_P
else if (PRINT_OPERAND_PUNCT_VALID_P (*p)) else if (PRINT_OPERAND_PUNCT_VALID_P (*p))
output_operand (0, *p++); output_operand (NULL_RTX, *p++);
#endif #endif
else else
output_operand_lossage ("invalid %%-code"); output_operand_lossage ("invalid %%-code");
...@@ -2123,7 +2130,13 @@ output_addr_const (file, x) ...@@ -2123,7 +2130,13 @@ output_addr_const (file, x)
break; break;
case CONST_INT: case CONST_INT:
fprintf (file, "%d", INTVAL (x)); fprintf (file,
#if HOST_BITS_PER_WIDE_INT == HOST_BITS_PER_INT
"%d",
#else
"%ld",
#endif
INTVAL (x));
break; break;
case CONST: case CONST:
...@@ -2135,12 +2148,31 @@ output_addr_const (file, x) ...@@ -2135,12 +2148,31 @@ output_addr_const (file, x)
case CONST_DOUBLE: case CONST_DOUBLE:
if (GET_MODE (x) == VOIDmode) if (GET_MODE (x) == VOIDmode)
{ {
/* We can use %d if the number is <32 bits and positive. */ /* We can use %d if the number is one word and positive. */
if (CONST_DOUBLE_HIGH (x) || CONST_DOUBLE_LOW (x) < 0) if (CONST_DOUBLE_HIGH (x) || CONST_DOUBLE_LOW (x) < 0)
fprintf (file, "0x%x%08x", fprintf (file,
#if HOST_BITS_PER_WIDE_INT == 64
#if HOST_BITS_PER_WIDE_INT != HOST_BITS_PER_INT
" 0x%lx%016lx",
#else
" 0x%x%016x",
#endif
#else
#if HOST_BITS_PER_WIDE_INT != HOST_BITS_PER_INT
" 0x%lx%08lx",
#else
" 0x%x%08x",
#endif
#endif
CONST_DOUBLE_HIGH (x), CONST_DOUBLE_LOW (x)); CONST_DOUBLE_HIGH (x), CONST_DOUBLE_LOW (x));
else else
fprintf (file, "%d", CONST_DOUBLE_LOW (x)); fprintf (file,
#if HOST_BITS_PER_WIDE_INT == HOST_BITS_PER_INT
"%d",
#else
"%ld",
#endif
CONST_DOUBLE_LOW (x));
} }
else else
/* We can't handle floating point constants; /* We can't handle floating point constants;
...@@ -2320,27 +2352,27 @@ split_double (value, first, second) ...@@ -2320,27 +2352,27 @@ split_double (value, first, second)
/* In an integer, the words are defined as most and least significant. /* In an integer, the words are defined as most and least significant.
So order them by the target's convention. */ So order them by the target's convention. */
#if WORDS_BIG_ENDIAN #if WORDS_BIG_ENDIAN
*first = gen_rtx (CONST_INT, VOIDmode, CONST_DOUBLE_HIGH (value)); *first = GEN_INT (CONST_DOUBLE_HIGH (value));
*second = gen_rtx (CONST_INT, VOIDmode, CONST_DOUBLE_LOW (value)); *second = GEN_INT (CONST_DOUBLE_LOW (value));
#else #else
*first = gen_rtx (CONST_INT, VOIDmode, CONST_DOUBLE_LOW (value)); *first = GEN_INT (CONST_DOUBLE_LOW (value));
*second = gen_rtx (CONST_INT, VOIDmode, CONST_DOUBLE_HIGH (value)); *second = GEN_INT (CONST_DOUBLE_HIGH (value));
#endif #endif
} }
else else
{ {
if ((HOST_FLOAT_FORMAT != TARGET_FLOAT_FORMAT if ((HOST_FLOAT_FORMAT != TARGET_FLOAT_FORMAT
|| HOST_BITS_PER_INT != BITS_PER_WORD) || HOST_BITS_PER_WIDE_INT != BITS_PER_WORD)
&& ! flag_pretend_float) && ! flag_pretend_float)
abort (); abort ();
#if defined (HOST_WORDS_BIG_ENDIAN) == WORDS_BIG_ENDIAN #if defined (HOST_WORDS_BIG_ENDIAN) == WORDS_BIG_ENDIAN
/* Host and target agree => no need to swap. */ /* Host and target agree => no need to swap. */
*first = gen_rtx (CONST_INT, VOIDmode, CONST_DOUBLE_LOW (value)); *first = GEN_INT (CONST_DOUBLE_LOW (value));
*second = gen_rtx (CONST_INT, VOIDmode, CONST_DOUBLE_HIGH (value)); *second = GEN_INT (CONST_DOUBLE_HIGH (value));
#else #else
*second = gen_rtx (CONST_INT, VOIDmode, CONST_DOUBLE_LOW (value)); *second = GEN_INT (CONST_DOUBLE_LOW (value));
*first = gen_rtx (CONST_INT, VOIDmode, CONST_DOUBLE_HIGH (value)); *first = GEN_INT (CONST_DOUBLE_HIGH (value));
#endif #endif
} }
} }
......
...@@ -79,8 +79,8 @@ print_node_brief (file, prefix, node, indent) ...@@ -79,8 +79,8 @@ print_node_brief (file, prefix, node, indent)
name if any. */ name if any. */
if (indent > 0) if (indent > 0)
fprintf (file, " "); fprintf (file, " ");
fprintf (file, "%s <%s %x", prefix, fprintf (file, "%s <%s ", prefix, tree_code_name[(int) TREE_CODE (node)]);
tree_code_name[(int) TREE_CODE (node)], (int) node); fprintf (file, HOST_PTR_PRINTF, node);
if (class == 'd') if (class == 'd')
{ {
...@@ -110,9 +110,21 @@ print_node_brief (file, prefix, node, indent) ...@@ -110,9 +110,21 @@ print_node_brief (file, prefix, node, indent)
&& TREE_INT_CST_LOW (node) != 0) && TREE_INT_CST_LOW (node) != 0)
fprintf (file, " -%1u", -TREE_INT_CST_LOW (node)); fprintf (file, " -%1u", -TREE_INT_CST_LOW (node));
else else
fprintf (file, " 0x%x%08x", fprintf (file,
TREE_INT_CST_HIGH (node), #if HOST_BITS_PER_WIDE_INT == 64
TREE_INT_CST_LOW (node)); #if HOST_BITS_PER_WIDE_INT != HOST_BITS_PER_INT
" 0x%lx%016lx",
#else
" 0x%x%016x",
#endif
#else
#if HOST_BITS_PER_WIDE_INT != HOST_BITS_PER_INT
" 0x%lx%08lx",
#else
" 0x%x%08x",
#endif
#endif
TREE_INT_CST_HIGH (node), TREE_INT_CST_LOW (node));
} }
if (TREE_CODE (node) == REAL_CST) if (TREE_CODE (node) == REAL_CST)
{ {
...@@ -213,8 +225,8 @@ print_node (file, prefix, node, indent) ...@@ -213,8 +225,8 @@ print_node (file, prefix, node, indent)
indent_to (file, indent); indent_to (file, indent);
/* Print the slot this node is in, and its code, and address. */ /* Print the slot this node is in, and its code, and address. */
fprintf (file, "%s <%s %x", prefix, fprintf (file, "%s <%s ", prefix, tree_code_name[(int) TREE_CODE (node)]);
tree_code_name[(int) TREE_CODE (node)], (int) node); fprintf (file, HOST_PTR_PRINTF, node);
/* Print the name, if any. */ /* Print the name, if any. */
if (class == 'd') if (class == 'd')
...@@ -374,7 +386,10 @@ print_node (file, prefix, node, indent) ...@@ -374,7 +386,10 @@ print_node (file, prefix, node, indent)
print_rtl (file, DECL_INCOMING_RTL (node)); print_rtl (file, DECL_INCOMING_RTL (node));
} }
else if (TREE_CODE (node) == FUNCTION_DECL) else if (TREE_CODE (node) == FUNCTION_DECL)
fprintf (file, "saved-insns 0x%x", DECL_SAVED_INSNS (node)); {
fprintf (file, "saved-insns ");
fprintf (file, HOST_PTR_PRINTF, DECL_SAVED_INSNS (node));
}
} }
/* Print the decl chain only if decl is at second level. */ /* Print the decl chain only if decl is at second level. */
...@@ -525,9 +540,21 @@ print_node (file, prefix, node, indent) ...@@ -525,9 +540,21 @@ print_node (file, prefix, node, indent)
&& TREE_INT_CST_LOW (node) != 0) && TREE_INT_CST_LOW (node) != 0)
fprintf (file, " -%1u", -TREE_INT_CST_LOW (node)); fprintf (file, " -%1u", -TREE_INT_CST_LOW (node));
else else
fprintf (file, " 0x%x%08x", fprintf (file,
TREE_INT_CST_HIGH (node), #if HOST_BITS_PER_WIDE_INT == 64
TREE_INT_CST_LOW (node)); #if HOST_BITS_PER_WIDE_INT != HOST_BITS_PER_INT
" 0x%lx%016lx",
#else
" 0x%x%016x",
#endif
#else
#if HOST_BITS_PER_WIDE_INT != HOST_BITS_PER_INT
" 0x%lx%08lx",
#else
" 0x%x%08x",
#endif
#endif
TREE_INT_CST_HIGH (node), TREE_INT_CST_LOW (node));
break; break;
case REAL_CST: case REAL_CST:
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment